DataMuseum.dk

Presents historical artifacts from the history of:

Jet Computer Jet80

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Jet Computer Jet80

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦a184d7740⟧ TextFile

    Length: 384 (0x180)
    Types: TextFile
    Names: »BIL2.CMD«

Derivation

└─⟦5b35a3f8b⟧ Bits:30002866 MicroPro WordStar release 3.00 for JET80
    └─ ⟦this⟧ »BIL2.CMD«

TextFile

STORE 1 TO BILNR
DO WHILE BILNR<>0
?
?
?
?
?
?
?
?
?
?
?
?
?'		VOGNLAGER FOR ENKELT BIL'
?
?
?
?
?
?
?'INDTAST VOGNNUMMER'
?'VOGNNUMMER INDTASTES SÅLEDES:   EKS. VOGNNUMMER=1415'
?
?'AFSLUT DENNE FUNKTION MED VOGNNUMMER=0'
?
INPUT "INDTAST VOGNNR:  " TO BILNR
IF BILNR=0
	RETURN
ENDIF
LIST FOR TEKST<>" ".AND.VOGNNR=BILNR
ENDDO
«eof»