Home » Archimedes archive » Archimedes World » AW-1992-02 - Virus Removed.adf » February92 » !AWFeb92/Goodies/BasPrint/!BasPrint/TokenData

!AWFeb92/Goodies/BasPrint/!BasPrint/TokenData

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1992-02 - Virus Removed.adf » February92
Filename: !AWFeb92/Goodies/BasPrint/!BasPrint/TokenData
Read OK:
File size: 071B bytes
Load address: 0000
Exec address: 0000
File contents
94    ABS
95    ACS
96    ADVAL
80    AND
C7 8E APPEND
97    ASC
98    ASN
99    ATN
C7 8F AUTO
C6 8F BEAT
C8 9E BEATS
9A    BGET
D5    BPUT
D6    CALL
C8 8E CASE
D7    CHAIN
BD    CHR$
C8 8F CIRCLE
D8    CLEAR
DA    CLG
D9    CLOSE
DB    CLS
FB    COLOUR
9B    COS
9C    COUNT
DC    DATA
DD    DEF
9D    DEG
C7 90 DELETE
DE    DIM
81    DIV
DF    DRAW
C7 91 EDIT
C8 9D ELLIPSE
CC    ELSE
8B    ELSE
E0    END
CB    ENDCASE
CD    ENDIF
E1    ENDPROC
CE    ENDWHILE
C5    EOF
82    EOR
9E    ERL
9F    ERR
85    ERROR
A0    EVAL
A1    EXP
A2    EXT
A3    FALSE
C8 90 FILL
A4    FN
E3    FOR
E6    GCOL
A5    GET
BE    GET$
E4    GOSUB
E5    GOTO
C7 92 HELP
D3    HIMEM
93    HIMEM
E7    IF
A6    INKEY
BF    INKEY$
E8    INPUT
C8 9A INSTALL
A7    INSTR(
A8    INT
C0    LEFT$(
A9    LEN
E9    LET
C8 9B LIBRARY
86    LINE
C7 93 LIST
AA    LN
C7 94 LOAD
EA    LOCAL
AB    LOG
D2    LOMEM
92    LOMEM
C7 95 LVAR
C1    MID$(
83    MOD
EB    MODE
C8 97 MOUSE
EC    MOVE
C7 96 NEW
ED    NEXT
AC    NOT
CA    OF
87    OFF
C7 97 OLD
EE    ON
8E    OPENIN
AE    OPENOUT
AD    OPENUP
84    OR
C8 91 ORIGIN
FF    OSCLI
7F    OTHERWISE
C8 A3 OVERLAY
D0    PAGE
90    PAGE
AF    PI
F0    PLOT
C8 92 POINT
B0    POINT(
B1    POS
F1    PRINT
F2    PROC
CF    PTR
8F    PTR
C8 98 QUIT
F3    READ
C8 93 RECTANGLE
F4    REM
C7 98 RENUMBER
F5    REPEAT
F6    REPORT
F7    RESTORE
F8    RETURN
C2    RIGHT$(
B3    RND
F9    RUN
C7 99 SAVE
B4    SGN
B5    SIN
D4    SOUND
89    SPC
B6    SQR
88    STEP
C8 A2 STEREO
FA    STOP
C3    STR$
C4    STRING$(
C6 8E SUM
C8 94 SWAP
C8 99 SYS
8A    TAB(
B7    TAN
C8 9F TEMPO
8C    THEN
D1    TIME
91    TIME
C8 9C TINT
B8    TO
FC    TRACE
B9    TRUE
C7 9A TWIN
C7 9B TWINO
FD    UNTIL
BA    USR
BB    VAL
EF    VDU
C8 A1 VOICE
C8 A0 VOICES
BC    VPOS
C8 96 WAIT
C9    WHEN
C8 95 WHILE
FE    WIDTH
00000000  39 34 20 20 20 20 41 42  53 0a 39 35 20 20 20 20  |94    ABS.95    |
00000010  41 43 53 0a 39 36 20 20  20 20 41 44 56 41 4c 0a  |ACS.96    ADVAL.|
00000020  38 30 20 20 20 20 41 4e  44 0a 43 37 20 38 45 20  |80    AND.C7 8E |
00000030  41 50 50 45 4e 44 0a 39  37 20 20 20 20 41 53 43  |APPEND.97    ASC|
00000040  0a 39 38 20 20 20 20 41  53 4e 0a 39 39 20 20 20  |.98    ASN.99   |
00000050  20 41 54 4e 0a 43 37 20  38 46 20 41 55 54 4f 0a  | ATN.C7 8F AUTO.|
00000060  43 36 20 38 46 20 42 45  41 54 0a 43 38 20 39 45  |C6 8F BEAT.C8 9E|
00000070  20 42 45 41 54 53 0a 39  41 20 20 20 20 42 47 45  | BEATS.9A    BGE|
00000080  54 0a 44 35 20 20 20 20  42 50 55 54 0a 44 36 20  |T.D5    BPUT.D6 |
00000090  20 20 20 43 41 4c 4c 0a  43 38 20 38 45 20 43 41  |   CALL.C8 8E CA|
000000a0  53 45 0a 44 37 20 20 20  20 43 48 41 49 4e 0a 42  |SE.D7    CHAIN.B|
000000b0  44 20 20 20 20 43 48 52  24 0a 43 38 20 38 46 20  |D    CHR$.C8 8F |
000000c0  43 49 52 43 4c 45 0a 44  38 20 20 20 20 43 4c 45  |CIRCLE.D8    CLE|
000000d0  41 52 0a 44 41 20 20 20  20 43 4c 47 0a 44 39 20  |AR.DA    CLG.D9 |
000000e0  20 20 20 43 4c 4f 53 45  0a 44 42 20 20 20 20 43  |   CLOSE.DB    C|
000000f0  4c 53 0a 46 42 20 20 20  20 43 4f 4c 4f 55 52 0a  |LS.FB    COLOUR.|
00000100  39 42 20 20 20 20 43 4f  53 0a 39 43 20 20 20 20  |9B    COS.9C    |
00000110  43 4f 55 4e 54 0a 44 43  20 20 20 20 44 41 54 41  |COUNT.DC    DATA|
00000120  0a 44 44 20 20 20 20 44  45 46 0a 39 44 20 20 20  |.DD    DEF.9D   |
00000130  20 44 45 47 0a 43 37 20  39 30 20 44 45 4c 45 54  | DEG.C7 90 DELET|
00000140  45 0a 44 45 20 20 20 20  44 49 4d 0a 38 31 20 20  |E.DE    DIM.81  |
00000150  20 20 44 49 56 0a 44 46  20 20 20 20 44 52 41 57  |  DIV.DF    DRAW|
00000160  0a 43 37 20 39 31 20 45  44 49 54 0a 43 38 20 39  |.C7 91 EDIT.C8 9|
00000170  44 20 45 4c 4c 49 50 53  45 0a 43 43 20 20 20 20  |D ELLIPSE.CC    |
00000180  45 4c 53 45 0a 38 42 20  20 20 20 45 4c 53 45 0a  |ELSE.8B    ELSE.|
00000190  45 30 20 20 20 20 45 4e  44 0a 43 42 20 20 20 20  |E0    END.CB    |
000001a0  45 4e 44 43 41 53 45 0a  43 44 20 20 20 20 45 4e  |ENDCASE.CD    EN|
000001b0  44 49 46 0a 45 31 20 20  20 20 45 4e 44 50 52 4f  |DIF.E1    ENDPRO|
000001c0  43 0a 43 45 20 20 20 20  45 4e 44 57 48 49 4c 45  |C.CE    ENDWHILE|
000001d0  0a 43 35 20 20 20 20 45  4f 46 0a 38 32 20 20 20  |.C5    EOF.82   |
000001e0  20 45 4f 52 0a 39 45 20  20 20 20 45 52 4c 0a 39  | EOR.9E    ERL.9|
000001f0  46 20 20 20 20 45 52 52  0a 38 35 20 20 20 20 45  |F    ERR.85    E|
00000200  52 52 4f 52 0a 41 30 20  20 20 20 45 56 41 4c 0a  |RROR.A0    EVAL.|
00000210  41 31 20 20 20 20 45 58  50 0a 41 32 20 20 20 20  |A1    EXP.A2    |
00000220  45 58 54 0a 41 33 20 20  20 20 46 41 4c 53 45 0a  |EXT.A3    FALSE.|
00000230  43 38 20 39 30 20 46 49  4c 4c 0a 41 34 20 20 20  |C8 90 FILL.A4   |
00000240  20 46 4e 0a 45 33 20 20  20 20 46 4f 52 0a 45 36  | FN.E3    FOR.E6|
00000250  20 20 20 20 47 43 4f 4c  0a 41 35 20 20 20 20 47  |    GCOL.A5    G|
00000260  45 54 0a 42 45 20 20 20  20 47 45 54 24 0a 45 34  |ET.BE    GET$.E4|
00000270  20 20 20 20 47 4f 53 55  42 0a 45 35 20 20 20 20  |    GOSUB.E5    |
00000280  47 4f 54 4f 0a 43 37 20  39 32 20 48 45 4c 50 0a  |GOTO.C7 92 HELP.|
00000290  44 33 20 20 20 20 48 49  4d 45 4d 0a 39 33 20 20  |D3    HIMEM.93  |
000002a0  20 20 48 49 4d 45 4d 0a  45 37 20 20 20 20 49 46  |  HIMEM.E7    IF|
000002b0  0a 41 36 20 20 20 20 49  4e 4b 45 59 0a 42 46 20  |.A6    INKEY.BF |
000002c0  20 20 20 49 4e 4b 45 59  24 0a 45 38 20 20 20 20  |   INKEY$.E8    |
000002d0  49 4e 50 55 54 0a 43 38  20 39 41 20 49 4e 53 54  |INPUT.C8 9A INST|
000002e0  41 4c 4c 0a 41 37 20 20  20 20 49 4e 53 54 52 28  |ALL.A7    INSTR(|
000002f0  0a 41 38 20 20 20 20 49  4e 54 0a 43 30 20 20 20  |.A8    INT.C0   |
00000300  20 4c 45 46 54 24 28 0a  41 39 20 20 20 20 4c 45  | LEFT$(.A9    LE|
00000310  4e 0a 45 39 20 20 20 20  4c 45 54 0a 43 38 20 39  |N.E9    LET.C8 9|
00000320  42 20 4c 49 42 52 41 52  59 0a 38 36 20 20 20 20  |B LIBRARY.86    |
00000330  4c 49 4e 45 0a 43 37 20  39 33 20 4c 49 53 54 0a  |LINE.C7 93 LIST.|
00000340  41 41 20 20 20 20 4c 4e  0a 43 37 20 39 34 20 4c  |AA    LN.C7 94 L|
00000350  4f 41 44 0a 45 41 20 20  20 20 4c 4f 43 41 4c 0a  |OAD.EA    LOCAL.|
00000360  41 42 20 20 20 20 4c 4f  47 0a 44 32 20 20 20 20  |AB    LOG.D2    |
00000370  4c 4f 4d 45 4d 0a 39 32  20 20 20 20 4c 4f 4d 45  |LOMEM.92    LOME|
00000380  4d 0a 43 37 20 39 35 20  4c 56 41 52 0a 43 31 20  |M.C7 95 LVAR.C1 |
00000390  20 20 20 4d 49 44 24 28  0a 38 33 20 20 20 20 4d  |   MID$(.83    M|
000003a0  4f 44 0a 45 42 20 20 20  20 4d 4f 44 45 0a 43 38  |OD.EB    MODE.C8|
000003b0  20 39 37 20 4d 4f 55 53  45 0a 45 43 20 20 20 20  | 97 MOUSE.EC    |
000003c0  4d 4f 56 45 0a 43 37 20  39 36 20 4e 45 57 0a 45  |MOVE.C7 96 NEW.E|
000003d0  44 20 20 20 20 4e 45 58  54 0a 41 43 20 20 20 20  |D    NEXT.AC    |
000003e0  4e 4f 54 0a 43 41 20 20  20 20 4f 46 0a 38 37 20  |NOT.CA    OF.87 |
000003f0  20 20 20 4f 46 46 0a 43  37 20 39 37 20 4f 4c 44  |   OFF.C7 97 OLD|
00000400  0a 45 45 20 20 20 20 4f  4e 0a 38 45 20 20 20 20  |.EE    ON.8E    |
00000410  4f 50 45 4e 49 4e 0a 41  45 20 20 20 20 4f 50 45  |OPENIN.AE    OPE|
00000420  4e 4f 55 54 0a 41 44 20  20 20 20 4f 50 45 4e 55  |NOUT.AD    OPENU|
00000430  50 0a 38 34 20 20 20 20  4f 52 0a 43 38 20 39 31  |P.84    OR.C8 91|
00000440  20 4f 52 49 47 49 4e 0a  46 46 20 20 20 20 4f 53  | ORIGIN.FF    OS|
00000450  43 4c 49 0a 37 46 20 20  20 20 4f 54 48 45 52 57  |CLI.7F    OTHERW|
00000460  49 53 45 0a 43 38 20 41  33 20 4f 56 45 52 4c 41  |ISE.C8 A3 OVERLA|
00000470  59 0a 44 30 20 20 20 20  50 41 47 45 0a 39 30 20  |Y.D0    PAGE.90 |
00000480  20 20 20 50 41 47 45 0a  41 46 20 20 20 20 50 49  |   PAGE.AF    PI|
00000490  0a 46 30 20 20 20 20 50  4c 4f 54 0a 43 38 20 39  |.F0    PLOT.C8 9|
000004a0  32 20 50 4f 49 4e 54 0a  42 30 20 20 20 20 50 4f  |2 POINT.B0    PO|
000004b0  49 4e 54 28 0a 42 31 20  20 20 20 50 4f 53 0a 46  |INT(.B1    POS.F|
000004c0  31 20 20 20 20 50 52 49  4e 54 0a 46 32 20 20 20  |1    PRINT.F2   |
000004d0  20 50 52 4f 43 0a 43 46  20 20 20 20 50 54 52 0a  | PROC.CF    PTR.|
000004e0  38 46 20 20 20 20 50 54  52 0a 43 38 20 39 38 20  |8F    PTR.C8 98 |
000004f0  51 55 49 54 0a 46 33 20  20 20 20 52 45 41 44 0a  |QUIT.F3    READ.|
00000500  43 38 20 39 33 20 52 45  43 54 41 4e 47 4c 45 0a  |C8 93 RECTANGLE.|
00000510  46 34 20 20 20 20 52 45  4d 0a 43 37 20 39 38 20  |F4    REM.C7 98 |
00000520  52 45 4e 55 4d 42 45 52  0a 46 35 20 20 20 20 52  |RENUMBER.F5    R|
00000530  45 50 45 41 54 0a 46 36  20 20 20 20 52 45 50 4f  |EPEAT.F6    REPO|
00000540  52 54 0a 46 37 20 20 20  20 52 45 53 54 4f 52 45  |RT.F7    RESTORE|
00000550  0a 46 38 20 20 20 20 52  45 54 55 52 4e 0a 43 32  |.F8    RETURN.C2|
00000560  20 20 20 20 52 49 47 48  54 24 28 0a 42 33 20 20  |    RIGHT$(.B3  |
00000570  20 20 52 4e 44 0a 46 39  20 20 20 20 52 55 4e 0a  |  RND.F9    RUN.|
00000580  43 37 20 39 39 20 53 41  56 45 0a 42 34 20 20 20  |C7 99 SAVE.B4   |
00000590  20 53 47 4e 0a 42 35 20  20 20 20 53 49 4e 0a 44  | SGN.B5    SIN.D|
000005a0  34 20 20 20 20 53 4f 55  4e 44 0a 38 39 20 20 20  |4    SOUND.89   |
000005b0  20 53 50 43 0a 42 36 20  20 20 20 53 51 52 0a 38  | SPC.B6    SQR.8|
000005c0  38 20 20 20 20 53 54 45  50 0a 43 38 20 41 32 20  |8    STEP.C8 A2 |
000005d0  53 54 45 52 45 4f 0a 46  41 20 20 20 20 53 54 4f  |STEREO.FA    STO|
000005e0  50 0a 43 33 20 20 20 20  53 54 52 24 0a 43 34 20  |P.C3    STR$.C4 |
000005f0  20 20 20 53 54 52 49 4e  47 24 28 0a 43 36 20 38  |   STRING$(.C6 8|
00000600  45 20 53 55 4d 0a 43 38  20 39 34 20 53 57 41 50  |E SUM.C8 94 SWAP|
00000610  0a 43 38 20 39 39 20 53  59 53 0a 38 41 20 20 20  |.C8 99 SYS.8A   |
00000620  20 54 41 42 28 0a 42 37  20 20 20 20 54 41 4e 0a  | TAB(.B7    TAN.|
00000630  43 38 20 39 46 20 54 45  4d 50 4f 0a 38 43 20 20  |C8 9F TEMPO.8C  |
00000640  20 20 54 48 45 4e 0a 44  31 20 20 20 20 54 49 4d  |  THEN.D1    TIM|
00000650  45 0a 39 31 20 20 20 20  54 49 4d 45 0a 43 38 20  |E.91    TIME.C8 |
00000660  39 43 20 54 49 4e 54 0a  42 38 20 20 20 20 54 4f  |9C TINT.B8    TO|
00000670  0a 46 43 20 20 20 20 54  52 41 43 45 0a 42 39 20  |.FC    TRACE.B9 |
00000680  20 20 20 54 52 55 45 0a  43 37 20 39 41 20 54 57  |   TRUE.C7 9A TW|
00000690  49 4e 0a 43 37 20 39 42  20 54 57 49 4e 4f 0a 46  |IN.C7 9B TWINO.F|
000006a0  44 20 20 20 20 55 4e 54  49 4c 0a 42 41 20 20 20  |D    UNTIL.BA   |
000006b0  20 55 53 52 0a 42 42 20  20 20 20 56 41 4c 0a 45  | USR.BB    VAL.E|
000006c0  46 20 20 20 20 56 44 55  0a 43 38 20 41 31 20 56  |F    VDU.C8 A1 V|
000006d0  4f 49 43 45 0a 43 38 20  41 30 20 56 4f 49 43 45  |OICE.C8 A0 VOICE|
000006e0  53 0a 42 43 20 20 20 20  56 50 4f 53 0a 43 38 20  |S.BC    VPOS.C8 |
000006f0  39 36 20 57 41 49 54 0a  43 39 20 20 20 20 57 48  |96 WAIT.C9    WH|
00000700  45 4e 0a 43 38 20 39 35  20 57 48 49 4c 45 0a 46  |EN.C8 95 WHILE.F|
00000710  45 20 20 20 20 57 49 44  54 48 0a                 |E    WIDTH.|
0000071b