mirror of
https://github.com/uffejakobsen/acme.git
synced 2024-09-30 20:55:04 +00:00
cf115c042e
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@10 4df02467-bbd4-4a76-a152-e7ce94205b78
89 lines
2.6 KiB
Plaintext
89 lines
2.6 KiB
Plaintext
;ACME 0.94.4
|
|
|
|
!ifdef lib_cbm_basic1_a !eof
|
|
lib_cbm_basic1_a = 1
|
|
|
|
; Macros for inserting BASIC commands. Note that "#" and "$" characters in
|
|
; BASIC keywords have been converted to "_" in the macro names.
|
|
; *All* function macros already include the '(' character.
|
|
|
|
!macro b_END {!by $80}
|
|
!macro b_FOR {!by $81}
|
|
!macro b_NEXT {!by $82}
|
|
!macro b_DATA {!by $83}
|
|
!macro b_INPUT_ {!by $84} ; INPUT#
|
|
!macro b_INPUT {!by $85}
|
|
!macro b_DIM {!by $86}
|
|
!macro b_READ {!by $87}
|
|
!macro b_LET {!by $88}
|
|
!macro b_GOTO {!by $89}
|
|
!macro b_RUN {!by $8a}
|
|
!macro b_IF {!by $8b}
|
|
!macro b_RESTORE {!by $8c}
|
|
!macro b_GOSUB {!by $8d}
|
|
!macro b_RETURN {!by $8e}
|
|
!macro b_REM {!by $8f}
|
|
!macro b_STOP {!by $90}
|
|
!macro b_ON {!by $91}
|
|
!macro b_WAIT {!by $92}
|
|
!macro b_LOAD {!by $93}
|
|
!macro b_SAVE {!by $94}
|
|
!macro b_VERIFY {!by $95}
|
|
; As "DEF" cannot be used without "FN", here is a macro called "b_DEFFN"
|
|
; instead of one called "b_DEF":
|
|
!macro b_DEFFN {!by $96, $a5}
|
|
!macro b_POKE {!by $97}
|
|
!macro b_PRINT_ {!by $98} ; PRINT#
|
|
!macro b_PRINT {!by $99}
|
|
!macro b_CONT {!by $9a}
|
|
!macro b_LIST {!by $9b}
|
|
!macro b_CLR {!by $9c}
|
|
!macro b_CMD {!by $9d}
|
|
!macro b_SYS {!by $9e}
|
|
!macro b_OPEN {!by $9f}
|
|
!macro b_CLOSE {!by $a0}
|
|
!macro b_GET {!by $a1}
|
|
!macro b_NEW {!by $a2}
|
|
!macro b_TAB {!by $a3} ; the token already includes '('
|
|
!macro b_TO {!by $a4}
|
|
!macro b_FN {!by $a5}
|
|
!macro b_SPC {!by $a6} ; the token already includes '('
|
|
!macro b_THEN {!by $a7}
|
|
!macro b_NOT {!by $a8}
|
|
!macro b_STEP {!by $a9}
|
|
!macro b_ADD {!by $aa} ; '+'
|
|
!macro b_SUBTRACT {!by $ab} ; '-'
|
|
!macro b_MULTIPLY {!by $ac} ; '*'
|
|
!macro b_DIVIDE {!by $ad} ; '/'
|
|
!macro b_POWEROF {!by $ae} ; '^'
|
|
!macro b_AND {!by $af}
|
|
!macro b_OR {!by $b0}
|
|
!macro b_GREATER {!by $b1} ; '>'
|
|
!macro b_EQUAL {!by $b2} ; '='
|
|
!macro b_LESS {!by $b3} ; '<'
|
|
!macro b_SGN {!by $b4:!pet '('}
|
|
!macro b_INT {!by $b5:!pet '('}
|
|
!macro b_ABS {!by $b6:!pet '('}
|
|
!macro b_USR {!by $b7:!pet '('}
|
|
!macro b_FRE {!by $b8:!pet '('}
|
|
!macro b_POS {!by $b9:!pet '('}
|
|
!macro b_SQR {!by $ba:!pet '('}
|
|
!macro b_RND {!by $bb:!pet '('}
|
|
!macro b_LOG {!by $bc:!pet '('}
|
|
!macro b_EXP {!by $bd:!pet '('}
|
|
!macro b_COS {!by $be:!pet '('}
|
|
!macro b_SIN {!by $bf:!pet '('}
|
|
!macro b_TAN {!by $c0:!pet '('}
|
|
!macro b_ATN {!by $c1:!pet '('}
|
|
!macro b_PEEK {!by $c2:!pet '('}
|
|
!macro b_LEN {!by $c3:!pet '('}
|
|
!macro b_STR_ {!by $c4:!pet '('} ; STR$(
|
|
!macro b_VAL {!by $c5:!pet '('}
|
|
!macro b_ASC {!by $c6:!pet '('}
|
|
!macro b_CHR_ {!by $c7:!pet '('} ; CHR$(
|
|
!macro b_LEFT_ {!by $c8:!pet '('} ; LEFT$(
|
|
!macro b_RIGHT_ {!by $c9:!pet '('} ; RIGHT$(
|
|
!macro b_MID_ {!by $ca:!pet '('} ; MID$(
|
|
|
|
!macro b_PI {!by $ff}
|