home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OS9_6X09 / SOUNDUTILS / digitz_3_1.lzh / mydefs < prev   
Text File  |  1992-01-11  |  3KB  |  106 lines
  1. * Neat (as in tidy) stuff
  2.  
  3. type set prgrm+objct program object
  4. revs set reent+1 executable reentrant
  5. stacks equ 200 stack space
  6.  
  7. * Remember Basic09?
  8.  
  9. byte equ 1 a byte value
  10. flag equ 1 sorta like boolean
  11. char equ 1 single character
  12. integer equ 2 an integer
  13. longint equ 4 a long integer
  14. lsn equ 3 a Logical Sector Number
  15. path equ byte a path number
  16. address equ integer an address
  17. pointer equ integer a pointer
  18. offset equ integer an offset
  19. boolean equ flag picky, picky...
  20.  
  21. * Other defs
  22.  
  23. intclear equ ^intmasks
  24.  
  25. * Standard ASCII table w/character names
  26.  
  27.  org 0
  28. nul rmb 1 Null
  29. soh rmb 1 Start of Header (for xmodem)
  30. stx rmb 1 Start Of Text (soh equivalent for ymodem)
  31. etx rmb 1 End Of Text
  32. eot rmb 1 End Of Transmission (for xmodem)
  33. enq rmb 1 ENQuiry (for real ASCII terminals)
  34. ack rmb 1 positive ACKnowledge (for xmodem)
  35. bel rmb 1 BELl (for impatient users)
  36. bs rmb 1 BackSpace (for dyslexic users)
  37. ht rmb 1 Horizontal Tab (for users with IBM keyboards)
  38. lf rmb 1 Line Feed (for users with real ASCII terminals)
  39. vt rmb 1 Vertical Tab (for users with really real ASCII terminals)
  40. ff rmb 1 Form Feed (for users with screens, cls)
  41. cr rmb 1 Carriage Return (for users who want to move on)
  42. so rmb 1 Shift Out
  43. si rmb 1 Shift In
  44. dle rmb 1 Data Link Escape (used for quoting in WXModem, maybe ZModem?)
  45. dc1 rmb 1 Device Control 1 (aka xon)
  46. dc2 rmb 1 Device Control 2 (open buffer)
  47. dc3 rmb 1 Device Control 3 (aka xoff)
  48. dc4 rmb 1 Device Control 4 (close buffer)
  49. nak rmb 1 Negative AcKnowledge (for xmodem)
  50. syn rmb 1 SYNchronizing character (soh equivalent for TeLink?)
  51. etb rmb 1 End of Transmission Block
  52. can rmb 1 CANcel (for *modem)
  53. em rmb 1 End of Medium
  54. sub rmb 1 SUBstitute
  55. esc rmb 1 ESCape
  56. fs rmb 1 File Separator
  57. gs rmb 1 Group Separator
  58. rs rmb 1 Record Separator
  59. us rmb 1 Unit Separator
  60. sp rmb 1 SPace
  61.  
  62. * Other names I just like to use
  63.  
  64. space equ sp space character
  65. eor equ cr end of record
  66. linefeed equ lf line feed
  67. formfeed equ ff form feed
  68. cls equ ff clear screen character
  69. bell equ bel bell
  70. tab equ ht Horizontal tab
  71. comma equ ', comma
  72. semicoln equ '; semi-colon
  73. xon equ dc1 start transmission
  74. xoff equ dc3 stop transmission
  75. del equ 127 IBM's DELete key
  76. dash equ '- a dash
  77.  
  78. dashhelp equ dash*256+'? the -? character codes
  79.  
  80. mupper equ $5f uppercase mask
  81. mlower equ $20 lowercase mask
  82.  
  83. bit0 equ 1
  84. bit1 equ bit0*2
  85. bit2 equ bit1*2
  86. bit3 equ bit2*2
  87. bit4 equ bit3*2
  88. bit5 equ bit4*2
  89. bit6 equ bit5*2
  90. bit7 equ bit6*2
  91.  
  92. mask0 equ ^bit0
  93. mask1 equ ^bit1
  94. mask2 equ ^bit2
  95. mask3 equ ^bit3
  96. mask4 equ ^bit4
  97. mask5 equ ^bit5
  98. mask6 equ ^bit6
  99. mask7 equ ^bit7
  100.  
  101.  org 0
  102. stdin rmb 1 standard input
  103. stdout rmb 1 standard output
  104. stderr rmb 1 standard error
  105.  
  106.