DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 600 (0x258) Types: TextFile Names: »PLA.J«
└─⟦c2e810e96⟧ Bits:30005799 CR80 Disc Pack ( XAMOS 841129 ILS TOS 10-01 System Disk Tilhører ILS/MSG hard boot boot entry #43c ) └─ ⟦this⟧ »PLA.J«
DEFINE OUTPATTERN 'DETTE ER EN TEST FRA CR80 VIA LTU - PORT TIL TERMINAL' LABEL BEGIN DEFINE INPATTERN1 ' ' DEFINE INPATTERN2 ' ' DEFINE INPATTERN3 ' ' DEFINE INPATTERN4 ' ' WRITELN 'LINE 7' NEWOUT @LTU000-INTR*T0 WRITELN PATTERN ORGOUT WRITELN 'LINE 11' SUBMIT @LTU000-INTR*T0 READLN INPATTERN1 WRITELN 'LINE 14' IF INPATTERN1 <> OUTPATTERN THEN GOTO SLUT LABEL SLUT WRITELN 'PROGRAM ENDED'