home *** CD-ROM | disk | FTP | other *** search
/ com!online 2001 December / COMCD1201.iso / tonline / software / data1.cab / Software / MAKRO / BEISPIEL / XOR.MKR < prev   
Encoding:
Text File  |  2001-08-13  |  405 b   |  18 lines
  1. #   -------------------------------------
  2. #   - Beispielmakro fuer den Befehl xor -
  3. #   -------------------------------------
  4.  
  5. #   Protokollfensterausgaben ermoeglichen
  6. set PROTWIN = "on"
  7. debug "Makroname: ", argv_0, "\n"
  8.  
  9. set Flags = "133"
  10. set Mask  = "255"
  11.  
  12. #   XOR-Operation durchfuehren
  13. xor Result = Flags, Mask
  14.  
  15. #   Ergebnis ausgeben
  16. debug Flags, " XOR ", Mask, " = ", Result, "\n"
  17.  
  18.