home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / program / language / bcpl / BCPL / alib / headers / Brazil next >
Encoding:
Text File  |  1986-08-21  |  1.7 KB  |  136 lines
  1.  
  2. ; SVC calls
  3. WriteC        *    0
  4. WriteS        *    1
  5. Write0        *    2
  6. NewLine     *    3
  7. ReadC        *    4
  8. CLI        *    5
  9. Byte        *    6
  10. Word        *    7
  11. File        *    8
  12. Args        *    9
  13. BGet        *    &a
  14. BPut        *    &b
  15. Multiple    *    &c
  16. Open        *    &d
  17. ReadLine    *    &e
  18. Control     *    &f
  19. GetEnv        *    &10
  20. Exit        *    &11
  21. SetEnv        *    &12
  22. IntOn        *    &13
  23. IntOff        *    &14
  24. CallBack    *    &15
  25. EnterSVC    *    &16
  26. BreakPt     *    &17
  27. BreakCtrl    *    &18
  28. UnusedSWI    *    &19
  29. KUpdateMEMC    *    &1A
  30. SetCallBack    *    &1B
  31.  
  32. WriteI        *    &100
  33.  
  34.     MACRO
  35.     OSbyte $no,$arg1,$arg2
  36.  [ "$arg2"<>""
  37.     MOV    r2, #$arg2
  38.  ]
  39.  [ "$arg1"<>""
  40.     MOV    r1, #$arg1
  41.  ]
  42.     MOV    r0, #$no
  43.     SWI    Byte
  44.     MEND
  45.  
  46.     MACRO
  47.     OSword $no,$buffer,$code
  48.  [ "$code"<>""
  49.     ADR    r1, $buffer
  50.  |
  51.     ADD    r1, sb, #$buffer._offset
  52.  ]
  53.     MOV    r0, #$no
  54.     SWI    Word
  55.     MEND
  56.  
  57.     MACRO
  58.     writes    $Arg1
  59.     ADR    r0, %F00
  60.     SWI    Write0
  61.     B    %F01
  62. 00
  63.     =    "$Arg1"
  64.     =    0
  65.     ALIGN
  66. 01
  67.     MEND
  68.  
  69.     MACRO
  70.     writeln $Arg1
  71.     ADR    r0, %F00
  72.     SWI    Write0
  73.     B    %F01
  74. 00
  75.     =    "$Arg1"
  76.     =    10, 13, 0
  77.     ALIGN
  78. 01
  79.     MEND
  80.  
  81.     MACRO
  82.     wrch    $Arg1
  83.     SWI    &100+"$Arg1"
  84.     MEND
  85.  
  86. ;
  87. ; OSBYTE numbers
  88. ChangeOutput        *    3
  89. ControlCursorEditing    *    4
  90. SetAutoRepeatDelay    *    11
  91. SetAutoRepeatRate    *    12
  92. DisableEvent        *    13
  93. EnableEvent        *    14
  94. ResetSoftKeys        *    18
  95. KeyboardScan        *    121
  96. GetBufferStatus     *    128
  97. InsertIntoBuffer    *    138
  98. RemoveFromBuffer    *    145
  99. ReadPageFC        *    146
  100. WritePageFC        *    147
  101. ReadWriteTabCharacter    *    219
  102. ReadWriteEscapeStatus    *    229
  103. ;
  104. ; OSWORD numbers
  105. ;
  106. ReadClock    *    1
  107. WriteClock    *    2
  108. ReadTimer    *    3
  109. WriteTimer    *    4
  110. ;
  111. ; Event numbers
  112. ;
  113. BufferEmptyEvent    *    0
  114. BufferFullEvent     *    1
  115. KeyboardEvent        *    2
  116. ADCEvent        *    3
  117. VsyncEvent        *    4
  118. TimerEvent        *    5
  119. EscapeEvent        *    6
  120. EconetEvent        *    254
  121.  
  122. ; Arguments for CHANGEOUTPUT OSbyte call
  123. RS423Only    *    1+2+4+&10
  124. PrinterOnly    *    2+8+&10
  125. VDUOnly     *    4+&10
  126.  
  127. ; Buffer numbers
  128. ;
  129. KBBuffer    *    0
  130. SerialInBuffer    *    1
  131. SerialOutBuffer *    2
  132. PrinterBuffer    *    3
  133. Sound1Buffer    *    4 ; First sound buffer
  134.  
  135.     END
  136.