Home » CEEFAX disks » telesoftware9.adl » 02-09-88/GEIRIAD

02-09-88/GEIRIAD

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 » CEEFAX disks » telesoftware9.adl
Filename: 02-09-88/GEIRIAD
Read OK:
File size: 0768 bytes
Load address: 0000
Exec address: FFFFFFFF
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
WELSH     ENGLISH
-----     -------

ABS       ABS
AC        AND
ACS       ACS
ADENNILL  RESTORE
ADRODD    REPORT
AGALL     OPENOUT
AGMN      OPENIN
AGORFF    OPENUP
AI        SQR
AILADRODD REPEAT
AILNIFER  RENUMBER
AM        FOR
AMGEN     ELSE
AMLEN     ENVELOPE
AMSER     TIME
ANWIR     FALSE
AROL      THEN
ARW       SGN
ASC       ASC
ASN       ASN
AT        TO
ATN       ATN
AWTO      AUTO

BCAEL     BGET
BWLCH     SPC

CADW      SAVE
CADWYN    CHAIN
CAEL      GET
CAEL$     GET$
CAM       STEP
CAN$(     MID$(
CAU       CLOSE
CLG       CLG
CLIR      CLEAR
CLS       CLS
COD       ERR
COS       COS
CYFRIF    COUNT

CHWITH$(  LEFT$(

DAL       STOP
DARLL     READ
DATA      DATA
DE$(      RIGHT$(
DEG       DEG
DFF       EOF
DIFF      DEF
DIFFODD   OFF
DILEU     DELETE
DIM       DIM
DIWEDD    END
DYCHWEL   RETURN

ENRH      EVAL
ESB       EXP
EWCH      GOSUB
EWCHI     GOTO

FN        FN
FSAF      VPOS

GAD       LET
GALW      CALL
GLLIW     GCOL
GOL       EDIT
GWALL     ERROR
GWE       VAL
GWEITH    PROC
GWIR      TRUE
GWL       ERL

HAP       RND
HEN       OLD
HYD       LEN

INT       CYF
ISGOF     LOMEM

LEIN      LINE
LN        LN
LOG       LOG

LLEOL     LOCAL
LLIN$(    STRING$(
LLIW      COLOUR
LLN$      STR$
LLUN      DRAW
LLYTH     LOAD

MAINT     EXT
MEWN      INPUT
MOD       MOD
MODD      MODE

NES       UNTIL
NESAF     NEXT
NEU       OR
NEUA      EOR
NEW       NEW
NID       NOT
NOD$      CHR$

OLIN      TRACE
OS        IF
OSCLI     OSCLI

PI        PI
PLOT      PLOT
PNT       PTR
PRINT     PRINT
PRYD      ON
PWYNT(    POINT(

RAD       RAD

RH(       INSTR(
RHAN      DIV
RHED      RUN
RHES      LIST
RHIF      INKEY
RHIF$     INKEY$
RHOI      BPUT

SAF       POS
SIN       SIN
SWN       SOUND
SYLW      REM
SYMUD     MOVE

TAB(      TAB(
TAD       ADVAL
TAN       TAN
TERFYN    ENDPROC
TUD       PAGE

UAW       VDU
UGOF      HIMEM
USR       USR

WIDTH     WIDTH

00000000  57 45 4c 53 48 20 20 20  20 20 45 4e 47 4c 49 53  |WELSH     ENGLIS|
00000010  48 0d 2d 2d 2d 2d 2d 20  20 20 20 20 2d 2d 2d 2d  |H.-----     ----|
00000020  2d 2d 2d 0d 0d 41 42 53  20 20 20 20 20 20 20 41  |---..ABS       A|
00000030  42 53 0d 41 43 20 20 20  20 20 20 20 20 41 4e 44  |BS.AC        AND|
00000040  0d 41 43 53 20 20 20 20  20 20 20 41 43 53 0d 41  |.ACS       ACS.A|
00000050  44 45 4e 4e 49 4c 4c 20  20 52 45 53 54 4f 52 45  |DENNILL  RESTORE|
00000060  0d 41 44 52 4f 44 44 20  20 20 20 52 45 50 4f 52  |.ADRODD    REPOR|
00000070  54 0d 41 47 41 4c 4c 20  20 20 20 20 4f 50 45 4e  |T.AGALL     OPEN|
00000080  4f 55 54 0d 41 47 4d 4e  20 20 20 20 20 20 4f 50  |OUT.AGMN      OP|
00000090  45 4e 49 4e 0d 41 47 4f  52 46 46 20 20 20 20 4f  |ENIN.AGORFF    O|
000000a0  50 45 4e 55 50 0d 41 49  20 20 20 20 20 20 20 20  |PENUP.AI        |
000000b0  53 51 52 0d 41 49 4c 41  44 52 4f 44 44 20 52 45  |SQR.AILADRODD RE|
000000c0  50 45 41 54 0d 41 49 4c  4e 49 46 45 52 20 20 52  |PEAT.AILNIFER  R|
000000d0  45 4e 55 4d 42 45 52 0d  41 4d 20 20 20 20 20 20  |ENUMBER.AM      |
000000e0  20 20 46 4f 52 0d 41 4d  47 45 4e 20 20 20 20 20  |  FOR.AMGEN     |
000000f0  45 4c 53 45 0d 41 4d 4c  45 4e 20 20 20 20 20 45  |ELSE.AMLEN     E|
00000100  4e 56 45 4c 4f 50 45 0d  41 4d 53 45 52 20 20 20  |NVELOPE.AMSER   |
00000110  20 20 54 49 4d 45 0d 41  4e 57 49 52 20 20 20 20  |  TIME.ANWIR    |
00000120  20 46 41 4c 53 45 0d 41  52 4f 4c 20 20 20 20 20  | FALSE.AROL     |
00000130  20 54 48 45 4e 0d 41 52  57 20 20 20 20 20 20 20  | THEN.ARW       |
00000140  53 47 4e 0d 41 53 43 20  20 20 20 20 20 20 41 53  |SGN.ASC       AS|
00000150  43 0d 41 53 4e 20 20 20  20 20 20 20 41 53 4e 0d  |C.ASN       ASN.|
00000160  41 54 20 20 20 20 20 20  20 20 54 4f 0d 41 54 4e  |AT        TO.ATN|
00000170  20 20 20 20 20 20 20 41  54 4e 0d 41 57 54 4f 20  |       ATN.AWTO |
00000180  20 20 20 20 20 41 55 54  4f 0d 0d 42 43 41 45 4c  |     AUTO..BCAEL|
00000190  20 20 20 20 20 42 47 45  54 0d 42 57 4c 43 48 20  |     BGET.BWLCH |
000001a0  20 20 20 20 53 50 43 0d  0d 43 41 44 57 20 20 20  |    SPC..CADW   |
000001b0  20 20 20 53 41 56 45 0d  43 41 44 57 59 4e 20 20  |   SAVE.CADWYN  |
000001c0  20 20 43 48 41 49 4e 0d  43 41 45 4c 20 20 20 20  |  CHAIN.CAEL    |
000001d0  20 20 47 45 54 0d 43 41  45 4c 24 20 20 20 20 20  |  GET.CAEL$     |
000001e0  47 45 54 24 0d 43 41 4d  20 20 20 20 20 20 20 53  |GET$.CAM       S|
000001f0  54 45 50 0d 43 41 4e 24  28 20 20 20 20 20 4d 49  |TEP.CAN$(     MI|
00000200  44 24 28 0d 43 41 55 20  20 20 20 20 20 20 43 4c  |D$(.CAU       CL|
00000210  4f 53 45 0d 43 4c 47 20  20 20 20 20 20 20 43 4c  |OSE.CLG       CL|
00000220  47 0d 43 4c 49 52 20 20  20 20 20 20 43 4c 45 41  |G.CLIR      CLEA|
00000230  52 0d 43 4c 53 20 20 20  20 20 20 20 43 4c 53 0d  |R.CLS       CLS.|
00000240  43 4f 44 20 20 20 20 20  20 20 45 52 52 0d 43 4f  |COD       ERR.CO|
00000250  53 20 20 20 20 20 20 20  43 4f 53 0d 43 59 46 52  |S       COS.CYFR|
00000260  49 46 20 20 20 20 43 4f  55 4e 54 0d 0d 43 48 57  |IF    COUNT..CHW|
00000270  49 54 48 24 28 20 20 4c  45 46 54 24 28 0d 0d 44  |ITH$(  LEFT$(..D|
00000280  41 4c 20 20 20 20 20 20  20 53 54 4f 50 0d 44 41  |AL       STOP.DA|
00000290  52 4c 4c 20 20 20 20 20  52 45 41 44 0d 44 41 54  |RLL     READ.DAT|
000002a0  41 20 20 20 20 20 20 44  41 54 41 0d 44 45 24 28  |A      DATA.DE$(|
000002b0  20 20 20 20 20 20 52 49  47 48 54 24 28 0d 44 45  |      RIGHT$(.DE|
000002c0  47 20 20 20 20 20 20 20  44 45 47 0d 44 46 46 20  |G       DEG.DFF |
000002d0  20 20 20 20 20 20 45 4f  46 0d 44 49 46 46 20 20  |      EOF.DIFF  |
000002e0  20 20 20 20 44 45 46 0d  44 49 46 46 4f 44 44 20  |    DEF.DIFFODD |
000002f0  20 20 4f 46 46 0d 44 49  4c 45 55 20 20 20 20 20  |  OFF.DILEU     |
00000300  44 45 4c 45 54 45 0d 44  49 4d 20 20 20 20 20 20  |DELETE.DIM      |
00000310  20 44 49 4d 0d 44 49 57  45 44 44 20 20 20 20 45  | DIM.DIWEDD    E|
00000320  4e 44 0d 44 59 43 48 57  45 4c 20 20 20 52 45 54  |ND.DYCHWEL   RET|
00000330  55 52 4e 0d 0d 45 4e 52  48 20 20 20 20 20 20 45  |URN..ENRH      E|
00000340  56 41 4c 0d 45 53 42 20  20 20 20 20 20 20 45 58  |VAL.ESB       EX|
00000350  50 0d 45 57 43 48 20 20  20 20 20 20 47 4f 53 55  |P.EWCH      GOSU|
00000360  42 0d 45 57 43 48 49 20  20 20 20 20 47 4f 54 4f  |B.EWCHI     GOTO|
00000370  0d 0d 46 4e 20 20 20 20  20 20 20 20 46 4e 0d 46  |..FN        FN.F|
00000380  53 41 46 20 20 20 20 20  20 56 50 4f 53 0d 0d 47  |SAF      VPOS..G|
00000390  41 44 20 20 20 20 20 20  20 4c 45 54 0d 47 41 4c  |AD       LET.GAL|
000003a0  57 20 20 20 20 20 20 43  41 4c 4c 0d 47 4c 4c 49  |W      CALL.GLLI|
000003b0  57 20 20 20 20 20 47 43  4f 4c 0d 47 4f 4c 20 20  |W     GCOL.GOL  |
000003c0  20 20 20 20 20 45 44 49  54 0d 47 57 41 4c 4c 20  |     EDIT.GWALL |
000003d0  20 20 20 20 45 52 52 4f  52 0d 47 57 45 20 20 20  |    ERROR.GWE   |
000003e0  20 20 20 20 56 41 4c 0d  47 57 45 49 54 48 20 20  |    VAL.GWEITH  |
000003f0  20 20 50 52 4f 43 0d 47  57 49 52 20 20 20 20 20  |  PROC.GWIR     |
00000400  20 54 52 55 45 0d 47 57  4c 20 20 20 20 20 20 20  | TRUE.GWL       |
00000410  45 52 4c 0d 0d 48 41 50  20 20 20 20 20 20 20 52  |ERL..HAP       R|
00000420  4e 44 0d 48 45 4e 20 20  20 20 20 20 20 4f 4c 44  |ND.HEN       OLD|
00000430  0d 48 59 44 20 20 20 20  20 20 20 4c 45 4e 0d 0d  |.HYD       LEN..|
00000440  49 4e 54 20 20 20 20 20  20 20 43 59 46 0d 49 53  |INT       CYF.IS|
00000450  47 4f 46 20 20 20 20 20  4c 4f 4d 45 4d 0d 0d 4c  |GOF     LOMEM..L|
00000460  45 49 4e 20 20 20 20 20  20 4c 49 4e 45 0d 4c 4e  |EIN      LINE.LN|
00000470  20 20 20 20 20 20 20 20  4c 4e 0d 4c 4f 47 20 20  |        LN.LOG  |
00000480  20 20 20 20 20 4c 4f 47  0d 0d 4c 4c 45 4f 4c 20  |     LOG..LLEOL |
00000490  20 20 20 20 4c 4f 43 41  4c 0d 4c 4c 49 4e 24 28  |    LOCAL.LLIN$(|
000004a0  20 20 20 20 53 54 52 49  4e 47 24 28 0d 4c 4c 49  |    STRING$(.LLI|
000004b0  57 20 20 20 20 20 20 43  4f 4c 4f 55 52 0d 4c 4c  |W      COLOUR.LL|
000004c0  4e 24 20 20 20 20 20 20  53 54 52 24 0d 4c 4c 55  |N$      STR$.LLU|
000004d0  4e 20 20 20 20 20 20 44  52 41 57 0d 4c 4c 59 54  |N      DRAW.LLYT|
000004e0  48 20 20 20 20 20 4c 4f  41 44 0d 0d 4d 41 49 4e  |H     LOAD..MAIN|
000004f0  54 20 20 20 20 20 45 58  54 0d 4d 45 57 4e 20 20  |T     EXT.MEWN  |
00000500  20 20 20 20 49 4e 50 55  54 0d 4d 4f 44 20 20 20  |    INPUT.MOD   |
00000510  20 20 20 20 4d 4f 44 0d  4d 4f 44 44 20 20 20 20  |    MOD.MODD    |
00000520  20 20 4d 4f 44 45 0d 0d  4e 45 53 20 20 20 20 20  |  MODE..NES     |
00000530  20 20 55 4e 54 49 4c 0d  4e 45 53 41 46 20 20 20  |  UNTIL.NESAF   |
00000540  20 20 4e 45 58 54 0d 4e  45 55 20 20 20 20 20 20  |  NEXT.NEU      |
00000550  20 4f 52 0d 4e 45 55 41  20 20 20 20 20 20 45 4f  | OR.NEUA      EO|
00000560  52 0d 4e 45 57 20 20 20  20 20 20 20 4e 45 57 0d  |R.NEW       NEW.|
00000570  4e 49 44 20 20 20 20 20  20 20 4e 4f 54 0d 4e 4f  |NID       NOT.NO|
00000580  44 24 20 20 20 20 20 20  43 48 52 24 0d 0d 4f 4c  |D$      CHR$..OL|
00000590  49 4e 20 20 20 20 20 20  54 52 41 43 45 0d 4f 53  |IN      TRACE.OS|
000005a0  20 20 20 20 20 20 20 20  49 46 0d 4f 53 43 4c 49  |        IF.OSCLI|
000005b0  20 20 20 20 20 4f 53 43  4c 49 0d 0d 50 49 20 20  |     OSCLI..PI  |
000005c0  20 20 20 20 20 20 50 49  0d 50 4c 4f 54 20 20 20  |      PI.PLOT   |
000005d0  20 20 20 50 4c 4f 54 0d  50 4e 54 20 20 20 20 20  |   PLOT.PNT     |
000005e0  20 20 50 54 52 0d 50 52  49 4e 54 20 20 20 20 20  |  PTR.PRINT     |
000005f0  50 52 49 4e 54 0d 50 52  59 44 20 20 20 20 20 20  |PRINT.PRYD      |
00000600  4f 4e 0d 50 57 59 4e 54  28 20 20 20 20 50 4f 49  |ON.PWYNT(    POI|
00000610  4e 54 28 0d 0d 52 41 44  20 20 20 20 20 20 20 52  |NT(..RAD       R|
00000620  41 44 0d 0d 52 48 28 20  20 20 20 20 20 20 49 4e  |AD..RH(       IN|
00000630  53 54 52 28 0d 52 48 41  4e 20 20 20 20 20 20 44  |STR(.RHAN      D|
00000640  49 56 0d 52 48 45 44 20  20 20 20 20 20 52 55 4e  |IV.RHED      RUN|
00000650  0d 52 48 45 53 20 20 20  20 20 20 4c 49 53 54 0d  |.RHES      LIST.|
00000660  52 48 49 46 20 20 20 20  20 20 49 4e 4b 45 59 0d  |RHIF      INKEY.|
00000670  52 48 49 46 24 20 20 20  20 20 49 4e 4b 45 59 24  |RHIF$     INKEY$|
00000680  0d 52 48 4f 49 20 20 20  20 20 20 42 50 55 54 0d  |.RHOI      BPUT.|
00000690  0d 53 41 46 20 20 20 20  20 20 20 50 4f 53 0d 53  |.SAF       POS.S|
000006a0  49 4e 20 20 20 20 20 20  20 53 49 4e 0d 53 57 4e  |IN       SIN.SWN|
000006b0  20 20 20 20 20 20 20 53  4f 55 4e 44 0d 53 59 4c  |       SOUND.SYL|
000006c0  57 20 20 20 20 20 20 52  45 4d 0d 53 59 4d 55 44  |W      REM.SYMUD|
000006d0  20 20 20 20 20 4d 4f 56  45 0d 0d 54 41 42 28 20  |     MOVE..TAB( |
000006e0  20 20 20 20 20 54 41 42  28 0d 54 41 44 20 20 20  |     TAB(.TAD   |
000006f0  20 20 20 20 41 44 56 41  4c 0d 54 41 4e 20 20 20  |    ADVAL.TAN   |
00000700  20 20 20 20 54 41 4e 0d  54 45 52 46 59 4e 20 20  |    TAN.TERFYN  |
00000710  20 20 45 4e 44 50 52 4f  43 0d 54 55 44 20 20 20  |  ENDPROC.TUD   |
00000720  20 20 20 20 50 41 47 45  0d 0d 55 41 57 20 20 20  |    PAGE..UAW   |
00000730  20 20 20 20 56 44 55 0d  55 47 4f 46 20 20 20 20  |    VDU.UGOF    |
00000740  20 20 48 49 4d 45 4d 0d  55 53 52 20 20 20 20 20  |  HIMEM.USR     |
00000750  20 20 55 53 52 0d 0d 57  49 44 54 48 20 20 20 20  |  USR..WIDTH    |
00000760  20 57 49 44 54 48 0d 0d                           | WIDTH..|
00000768
02-09-88/GEIRIAD.m0
02-09-88/GEIRIAD.m1
02-09-88/GEIRIAD.m2
02-09-88/GEIRIAD.m4
02-09-88/GEIRIAD.m5