
Appendix B
B-60
BASIC Example
The BASIC function code is 12.
procedure COPRO
DIM status : INTEGER
DIM word_val : INTEGER
DIM putbuff(2) : BYTE
.
.
.
word_val := $ABCD
rem * DTL_PUT_WORD
RUN AB_BAS (12, status, word_val, ADDR(putbuff(1)))
.
.
.
References
DTL_GET_WORD(); DTL_GET_FLT();
DTL_GET_3BCD(); DTL_GET_4BCD();
DTL_PUT_FLT(); DTL_PUT_3BCD(); DTL_PUT_4BCD();
Comentarios a estos manuales