mirror of
https://github.com/uffejakobsen/acme.git
synced 2024-11-29 04:49:20 +00:00
059238874d
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@15 4df02467-bbd4-4a76-a152-e7ce94205b78
127 lines
3.5 KiB
Plaintext
127 lines
3.5 KiB
Plaintext
;ACME 0.94.4
|
|
|
|
!ifdef lib_cbm_basic3_5_a !eof
|
|
lib_cbm_basic3_5_a = 1
|
|
|
|
!source <cbm/basic2.a> ; from 0x80 to $cb
|
|
|
|
; token values
|
|
token_RGR = $cc
|
|
token_RCLR = $cd
|
|
; if this file gets included via "cbm/basic7.a" or "cbm/basic10.a", do not define RLUM
|
|
; (because v7 and higher use $ce as prefix byte for additional functions):
|
|
!ifndef lib_cbm_basic7_a {
|
|
!ifndef lib_cbm_basic10_a {
|
|
token_RLUM = $ce
|
|
}
|
|
}
|
|
token_JOY = $cf
|
|
token_RDOT = $d0
|
|
token_DEC = $d1
|
|
token_HEX_ = $d2 ; HEX$
|
|
token_ERR_ = $d3 ; ERR$
|
|
token_INSTR = $d4
|
|
token_ELSE = $d5
|
|
token_RESUME = $d6
|
|
token_TRAP = $d7
|
|
token_TRON = $d8
|
|
token_TROFF = $d9
|
|
token_SOUND = $da
|
|
token_VOL = $db
|
|
token_AUTO = $dc
|
|
token_PUDEF = $dd
|
|
token_GRAPHIC = $de
|
|
token_PAINT = $df
|
|
token_CHAR = $e0
|
|
token_BOX = $e1
|
|
token_CIRCLE = $e2
|
|
; if this file gets included via "cbm/basic10.a", do not define GSHAPE/SSHAPE/DRAW
|
|
; (because in v10, they are called PASTE/CUT/LINE):
|
|
!ifndef lib_cbm_basic10_a {
|
|
token_GSHAPE = $e3
|
|
token_SSHAPE = $e4
|
|
token_DRAW = $e5
|
|
}
|
|
token_LOCATE = $e6
|
|
token_COLOR = $e7
|
|
token_SCNCLR = $e8
|
|
token_SCALE = $e9
|
|
token_HELP = $ea
|
|
token_DO = $eb
|
|
token_LOOP = $ec
|
|
token_EXIT = $ed
|
|
; if this file gets included via "cbm/basic10.a", do not define DIRECTORY
|
|
; (because in v10, it is called DIR):
|
|
!ifndef lib_cbm_basic10_a {
|
|
token_DIRECTORY = $ee
|
|
}
|
|
token_DSAVE = $ef
|
|
token_DLOAD = $f0
|
|
token_HEADER = $f1
|
|
token_SCRATCH = $f2
|
|
token_COLLECT = $f3
|
|
token_COPY = $f4
|
|
token_RENAME = $f5
|
|
token_BACKUP = $f6
|
|
token_DELETE = $f7
|
|
token_RENUMBER = $f8
|
|
token_KEY = $f9
|
|
token_MONITOR = $fa
|
|
token_USING = $fb
|
|
token_UNTIL = $fc
|
|
token_WHILE = $fd
|
|
|
|
; 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_RGR {!by token_RGR, $28} ; RGR(
|
|
!macro b_RCLR {!by token_RCLR, $28} ; RCLR(
|
|
!macro b_RLUM {!by token_RLUM, $28} ; RLUM(
|
|
!macro b_JOY {!by token_JOY, $28} ; JOY(
|
|
!macro b_RDOT {!by token_RDOT, $28} ; RDOT(
|
|
!macro b_DEC {!by token_DEC, $28} ; DEC(
|
|
!macro b_HEX_ {!by token_HEX_, $28} ; HEX$(
|
|
!macro b_ERR_ {!by token_ERR_, $28} ; ERR$(
|
|
!macro b_INSTR {!by token_INSTR, $28} ; INSTR(
|
|
!macro b_ELSE {!by token_ELSE}
|
|
!macro b_RESUME {!by token_RESUME}
|
|
!macro b_TRAP {!by token_TRAP}
|
|
!macro b_TRON {!by token_TRON}
|
|
!macro b_TROFF {!by token_TROFF}
|
|
!macro b_SOUND {!by token_SOUND}
|
|
!macro b_VOL {!by token_VOL}
|
|
!macro b_AUTO {!by token_AUTO}
|
|
!macro b_PUDEF {!by token_PUDEF}
|
|
!macro b_GRAPHIC {!by token_GRAPHIC}
|
|
!macro b_PAINT {!by token_PAINT}
|
|
!macro b_CHAR {!by token_CHAR}
|
|
!macro b_BOX {!by token_BOX}
|
|
!macro b_CIRCLE {!by token_CIRCLE}
|
|
!macro b_GSHAPE {!by token_GSHAPE}
|
|
!macro b_SSHAPE {!by token_SSHAPE}
|
|
!macro b_DRAW {!by token_DRAW}
|
|
!macro b_LOCATE {!by token_LOCATE}
|
|
!macro b_COLOR {!by token_COLOR}
|
|
!macro b_SCNCLR {!by token_SCNCLR}
|
|
!macro b_SCALE {!by token_SCALE}
|
|
!macro b_HELP {!by token_HELP}
|
|
!macro b_DO {!by token_DO}
|
|
!macro b_LOOP {!by token_LOOP}
|
|
!macro b_EXIT {!by token_EXIT}
|
|
!macro b_DIRECTORY {!by token_DIRECTORY}
|
|
!macro b_DSAVE {!by token_DSAVE}
|
|
!macro b_DLOAD {!by token_DLOAD}
|
|
!macro b_HEADER {!by token_HEADER}
|
|
!macro b_SCRATCH {!by token_SCRATCH}
|
|
!macro b_COLLECT {!by token_COLLECT}
|
|
!macro b_COPY {!by token_COPY}
|
|
!macro b_RENAME {!by token_RENAME}
|
|
!macro b_BACKUP {!by token_BACKUP}
|
|
!macro b_DELETE {!by token_DELETE}
|
|
!macro b_RENUMBER {!by token_RENUMBER}
|
|
!macro b_KEY {!by token_KEY}
|
|
!macro b_MONITOR {!by token_MONITOR}
|
|
!macro b_USING {!by token_USING}
|
|
!macro b_UNTIL {!by token_UNTIL}
|
|
!macro b_WHILE {!by token_WHILE}
|