mirror of https://github.com/A2osX/A2osX.git
89 lines
2.7 KiB
Plaintext
89 lines
2.7 KiB
Plaintext
NEW
|
||
AUTO 3,1
|
||
*--------------------------------------
|
||
.DO 1
|
||
*--------------------------------
|
||
DIR. .SE 0
|
||
.MA DIR
|
||
.DO "]1"=DIR.=0
|
||
.DA #"]1"-$C0
|
||
DIR. .SE "]1"
|
||
.FIN
|
||
.DA #"]2"-$40,]3-1 .]1]2
|
||
.EM
|
||
*--------------------------------
|
||
OPTBL.DIR >DIR A,C,DIR.AC ASCII STRING COMPRESSED
|
||
>DIR A,S,PSAS ASCII STRING
|
||
>DIR A,T,PSAT ASCII STRING WITH LAST BYTE
|
||
>DIR A,Z,PSAZ ASCII STRING WITH ZERO END
|
||
>DIR B,S,PSBS BLOCK STORAGE
|
||
>DIR C,S,DIR1.CS C STRING
|
||
>DIR C,Z,DIR1.CZ C STRING WITH ZERO END
|
||
>DIR D,A,PSDA DATA
|
||
>DIR D,O,PSDO DO
|
||
>DIR D,U,D.DUMMY DUMMY
|
||
>DIR E,D,D.END.DUMMY
|
||
>DIR E,L,PSEL ELSE
|
||
>DIR E,N,PSEN END OF SOURCE
|
||
>DIR E,P,D.END.PHASE
|
||
>DIR E,Q,PSEQ EQUATE
|
||
>DIR F,I,PSFI FIN
|
||
>DIR H,S,PSHS HEX STRING
|
||
>DIR H,X,PSHX HEX DIGIT STRING
|
||
>DIR I,N,PSIN INCLUDE
|
||
>DIR L,I,PSLI LIST ON,/ OFF
|
||
>DIR M,A,PSMA MACRO
|
||
>DIR O,P,PSOP OPCODE TABLE SELECT
|
||
>DIR O,R,PSOR ORIGIN
|
||
>DIR P,G,PSPG PAGE EJECT
|
||
>DIR P,H,D.PHASE PHASE
|
||
>DIR P,S,DIR1.PS PASCAL STRING
|
||
>DIR T,A,PSTA TARGET ADDRESS
|
||
>DIR T,F,PSTF TARGET FILE
|
||
>DIR T,I,PSTI TITLE
|
||
>DIR U,S,PSUSER USER DIRECTIVE
|
||
.HS 41 <<<TERMINATOR>>>
|
||
*--------------------------------
|
||
.ELSE
|
||
*--------------------------------
|
||
* DIRECTIVE TABLE
|
||
*--------------------------------
|
||
.MA DIR
|
||
.AS /]1/
|
||
.DA ]2-1
|
||
.EM
|
||
*---------------------------------
|
||
OPTBL.DIR
|
||
.HS 0402 ITEM SIZE, KEY SIZE
|
||
>DIR AS,PSAS ASCII STRING
|
||
>DIR AT,PSAT ASCII STRING WITH LAST BYTE
|
||
>DIR BS,PSBS BLOCK STORAGE
|
||
>DIR DA,PSDA DATA
|
||
>DIR DO,PSDO DO
|
||
>DIR DU,D.DUMMY DUMMY
|
||
>DIR ED,D.END.DUMMY
|
||
>DIR EL,PSEL ELSE
|
||
>DIR EN,PSEN END OF SOURCE
|
||
>DIR EP,D.END.PHASE
|
||
>DIR EQ,PSEQ EQUATE
|
||
>DIR FI,PSFI FIN
|
||
>DIR HS,PSHS HEX STRING
|
||
>DIR IN,PSIN INCLUDE
|
||
>DIR LI,PSLI LIST ON,/ OFF
|
||
>DIR MA,PSMA MACRO
|
||
>DIR OP,PSOP OPCODE TABLE SELECT
|
||
>DIR OR,PSOR ORIGIN
|
||
>DIR PG,PSPG PAGE EJECT
|
||
>DIR PH,D.PHASE PHASE
|
||
>DIR TA,PSTA TARGET ADDRESS
|
||
>DIR TF,PSTF TARGET FILE
|
||
>DIR TI,PSTI TITLE
|
||
>DIR US,PSUSER USER DIRECTIVE
|
||
.HS 00 MARK END OF TABLE
|
||
.FIN
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE usr/src/scmasm.31/scmasm.s.xtdir
|
||
LOAD usr/src/scmasm.31/scmasm.s
|
||
ASM
|