Augusta Keywords, (C) Copyright Computer Linguistics 1983
13,32,76,73,78,69,32,80,82,79,67,32,32,66,89,84,69,83,32
79,70,70,83,69,84,32,83,79,85,82,67,69,13,10
0
0123456789
0123456789ABCDEF
ABCDEFGHIJKLMNOPQRSTUVWXYZ
abcdefghijklmnopqrstuvwxyz
ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_
1
3
4
6
7
11
0
0
13
0
0
16
19
20
22
26
0
28
0
30
0
0
31
0
0
0
FILEARRA,5,4,0,,50,,
STRARRAY,0,4,0,,81,,
CHARRAY,2,4,0,,2,,
INTARRAY,1,4,0,,2,,
BOOLARRA,4,4,0,,2,,
TRUE,4,0,,-1,,,
FALSE,4,0,,0,,,
MININT,1,0,,-32767,,,
MAXINT,1,0,,32767,,,
INOUTFIL,5,4,0,,50,,
KEYPRESS,4,3,,,,40,0
SEARCH,1,3,,,,39,0
STR,,2,,,,38,0
VALUE,1,3,,,,37,0
INITFILE,,2,,,,36,0
ASSIGN,,2,,,,35,0
APPEND,,2,,,,34,0
FREEMEM,,2,,,,33,0
GETMEM,1,3,,,,32,0
IOERROR,1,3,,,,31,0
PUTBOOL,,2,,,,30,0
SKIPLINE,,2,,,,29,0
CHAR,2,3,,,,28,0
NEXTWRIT,1,3,,,,27,0
SETWRITE,,2,,,,26,0
NEXTREAD,1,3,,,,25,0
SETREAD,,2,,,,24,0
WRITE,,2,,,,23,0
READ,,2,,,,22,0
ISOPEN,4,3,,,,21,0
RENAME,1,3,,,,20,0
ERASE,1,3,,,,19,0
CLOSE,,2,,,,18,0
CREATE,,2,,,,17,0
OPEN,,2,,,,16,0
SCANB,1,3,,,,15,0
SCANF,1,3,,,,14,0
MOVERIGH,,2,,,,13,0
MOVELEFT,,2,,,,12,0
SUBSTR,,2,,,,11,0
POKE,,2,,,,10,0
PEEK,1,3,,,,9,0
PUTSTR,,2,,,,8,0
NEWLINE,,2,,,,7,0
PUTCHAR,,2,,,,6,0
GETCHAR,,2,,,,5,0
PUTINT,,2,,,,4,0
GETINT,,2,,,,3,0
PUTLINE,,2,,,,2,0
GETSTR,,2,,,,1,0
STRING,0,4,1,,81,,
INTEGER,1,4,1,,2,,
BOOLEAN,4,4,1,,2,,
CHARACTE,2,4,1,,2,,
*END*,,,,,,,
AND
ARRAY
BEGIN
CASE
CONSTANT
DECLARE
ELSE
ELSEIF
END
EXIT
FOR
FUNCTION
IF
IN
IS
LOOP
LAST
LENGTH
MOD
NOT
NULL
OF
OR
OTHERS
OUT
PRAGMA
PROCEDURE
RETURN
REVERSE
THEN
WHEN
WHILE