|
DataMuseum.dkPresents historical artifacts from the history of: Q1 computer |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Q1 computer Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2664 (0xa68)
Types: Q1_Text, reclen=37
Notes: q1file
Names: »SIDOR«
└─⟦76544940c⟧ Bits:30008688 DDMQ1-0128_NYCKEL
└─⟦this⟧ »SIDOR«
ADCON A12 ADDR 36 ALLO 41 ALLOCATE 41 ASM A13 BASED 37 CALL 16 CALL CHOOSE A10 CALL KEYFUN A10 CALL OUTPUT A11 CALL SEOF 16, 27 CALL TYPIST A11 CAT 12, A13, A14 CATLIST A14 CHAR 13 CHARACTER 13 CLOSE 16 CON A12 COPY 41 DCL 10, 22 DEBUG A8 DECLARE 10, 22 DELETE 42 DISK UTILITY 41 DISP 7 DISPLAY 7 DO 25 EDIT 3, 42 EDIT,N 3, 42 EDITET OUTPUT 18 ELSE 9 END 3 FILES 14, 33 FLOAT 29 GET 3, 7 GO TO 8, 17 IF 9, 26 INDEX 13 INIT 25 INITIAL 25 INTO 15 KEY 15 KEYFUN A10 KEYTO 35 LENGTH 12 LIST 3 MATHEMATICAL FUNCTIONS 27 ON 16 ON ENDFILE 17 ON ERROR 17 ONCODE 17 OPEN 14 PL1,L A8 POINTER 36 PRINT 3, 45 PROCEDURE 28, 29 PUT 3, 6, 7, 18 READ 14, 36 READ KEY 15 RENAME 42 REWRITE 15 SEOF 16, 27 SKIP 3 SORT 45 STRUCTURES 32 SUBSTR 12 SYMBOLER 9, 31 THEN 9 UNCAT A14 UNSPEC 34, 38 VERIFY 13 WRITE 16, 36