DataMuseum.dk

Presents historical artifacts from the history of:

CP/M

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

See our Wiki for more about CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦403a3747d⟧

    Length: 1152 (0x480)
    Names: »PARIS.CML«

Derivation

└─⟦960f61816⟧ Bits:30004222 Processstyring til ICL Comet
    └─ ⟦this⟧ »PARIS.CML« 

Hex Dump

0x000…020 31 30 30 30 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆1000 ///////////////////////////┆
0x020…040 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆////////////////////////////////┆
0x040…060 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 31 30 31 30 20 2f 2f 20 48 45 52 20 53 54 41 52 54 45 52 20 50   ┆////////// 1010 // HER STARTER P┆
0x060…080 52 4f 47 52 41 4d 20 54 49 4c 20 53 54 59 52 49 4e 47 20 41 46 20 50 41 52 49 53 45 52 48 4a 55   ┆ROGRAM TIL STYRING AF PARISERHJU┆
0x080…0a0 4c 45 54 2e 20 20 2f 2f 0d 31 30 32 30 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆LET.  // 1020 //////////////////┆
0x0a0…0c0 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆////////////////////////////////┆
0x0c0…0e0 2f 2f 2f 2f 2f 2f 0d 31 30 33 30 20 45 58 45 43 20 53 54 41 52 54 0d 31 30 34 30 20 2f 2f 2f 2f   ┆////// 1030 EXEC START 1040 ////┆
0x0e0…100 2f 2f 2f 2f 2f 2f 2f 2f 0d 31 30 35 30 20 46 4f 52 20 49 47 45 4e 3a 3d 31 20 54 4f 20 33 20 44   ┆//////// 1050 FOR IGEN:=1 TO 3 D┆
0x100…120 4f 20 0d 31 30 36 30 20 20 20 43 55 52 53 4f 52 20 31 30 2c 20 33 0d 31 30 37 30 20 20 20 50 52   ┆O  1060   CURSOR 10, 3 1070   PR┆
0x120…140 49 4e 54 20 22 50 41 53 53 41 47 45 52 20 53 5b 54 54 45 53 20 50 5d 20 22 2c 49 47 45 4e 2c 22   ┆INT "PASSAGER SÆTTES PÅ ",IGEN,"┆
0x140…160 2e 20 47 59 4e 47 45 2e 22 0d 31 30 38 30 20 20 20 45 58 45 43 20 56 45 4e 54 28 35 29 0d 31 30   ┆. GYNGE." 1080   EXEC VENT(5) 10┆
0x160…180 39 30 20 20 20 45 58 45 43 20 53 45 54 28 31 29 0d 31 31 30 30 20 20 20 45 58 45 43 20 54 5b 4c   ┆90   EXEC SET(1) 1100   EXEC TÆL┆
0x180…1a0 4c 45 53 4b 49 56 45 28 31 31 2c 36 29 0d 31 31 31 30 20 20 20 45 58 45 43 20 52 45 53 45 54 28   ┆LESKIVE(11,6) 1110   EXEC RESET(┆
0x1a0…1c0 31 29 0d 31 31 32 30 20 4e 45 58 54 20 49 47 45 4e 0d 31 31 33 30 20 43 55 52 53 4f 52 20 31 30   ┆1) 1120 NEXT IGEN 1130 CURSOR 10┆
0x1c0…1e0 2c 20 33 0d 31 31 34 30 20 50 52 49 4e 54 20 22 50 41 53 53 41 47 45 52 20 53 5b 54 54 45 53 20   ┆, 3 1140 PRINT "PASSAGER SÆTTES ┆
0x1e0…200 50 5d 20 34 2e 20 47 59 4e 47 45 2e 22 0d 31 31 35 30 20 45 58 45 43 20 56 45 4e 54 28 35 29 0d   ┆PÅ 4. GYNGE." 1150 EXEC VENT(5) ┆
0x200…220 31 31 36 30 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆1160 ///////////////////////////┆
0x220…240 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 31 31   ┆///////////////////////////// 11┆
0x240…260 37 30 20 43 55 52 53 4f 52 20 31 30 2c 20 33 0d 31 31 38 30 20 50 52 49 4e 54 20 22 50 41 52 49   ┆70 CURSOR 10, 3 1180 PRINT "PARI┆
0x260…280 53 45 52 48 4a 55 4c 45 54 20 4b 5c 52 45 52 20 4e 55 20 33 20 48 45 4c 45 20 4f 4d 47 41 4e 47   ┆SERHJULET KØRER NU 3 HELE OMGANG┆
0x280…2a0 45 2e 22 0d 31 31 39 30 20 45 58 45 43 20 53 45 54 28 31 29 0d 31 32 30 30 20 45 58 45 43 20 54   ┆E." 1190 EXEC SET(1) 1200 EXEC T┆
0x2a0…2c0 5b 4c 4c 45 53 4b 49 56 45 28 31 31 2c 37 38 29 0d 31 32 31 30 20 45 58 45 43 20 52 45 53 45 54   ┆ÆLLESKIVE(11,78) 1210 EXEC RESET┆
0x2c0…2e0 28 31 29 0d 31 32 32 30 20 43 4c 45 41 52 20 0d 31 32 33 30 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆(1) 1220 CLEAR  1230 ///////////┆
0x2e0…300 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆////////////////////////////////┆
0x300…320 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 31 32 34 30 20 46 4f 52 20 49 47 45 4e 3a 3d 31 20 54 4f   ┆//////////// 1240 FOR IGEN:=1 TO┆
0x320…340 20 33 20 44 4f 20 0d 31 32 35 30 20 20 20 43 55 52 53 4f 52 20 31 30 2c 20 33 0d 31 32 36 30 20   ┆ 3 DO  1250   CURSOR 10, 3 1260 ┆
0x340…360 20 20 50 52 49 4e 54 20 22 50 41 53 53 41 47 45 52 20 50 5d 20 22 2c 49 47 45 4e 2c 22 2e 20 47   ┆  PRINT "PASSAGER PÅ ",IGEN,". G┆
0x360…380 59 4e 47 45 20 53 5b 54 54 45 53 20 41 46 2e 22 0d 31 32 37 30 20 20 20 45 58 45 43 20 56 45 4e   ┆YNGE SÆTTES AF." 1270   EXEC VEN┆
0x380…3a0 54 28 35 29 0d 31 32 38 30 20 20 20 45 58 45 43 20 53 45 54 28 31 29 0d 31 32 39 30 20 20 20 45   ┆T(5) 1280   EXEC SET(1) 1290   E┆
0x3a0…3c0 58 45 43 20 54 5b 4c 4c 45 53 4b 49 56 45 28 31 31 2c 36 29 0d 31 33 30 30 20 20 20 45 58 45 43   ┆XEC TÆLLESKIVE(11,6) 1300   EXEC┆
0x3c0…3e0 20 52 45 53 45 54 28 31 29 0d 31 33 31 30 20 4e 45 58 54 20 49 47 45 4e 0d 31 33 32 30 20 43 55   ┆ RESET(1) 1310 NEXT IGEN 1320 CU┆
0x3e0…400 52 53 4f 52 20 31 30 2c 20 33 0d 31 33 33 30 20 50 52 49 4e 54 20 22 50 41 53 53 41 47 45 52 20   ┆RSOR 10, 3 1330 PRINT "PASSAGER ┆
0x400…420 50 5d 20 34 2e 20 47 59 4e 47 45 20 53 5b 54 54 45 53 20 41 46 2e 22 0d 31 33 34 30 20 43 55 52   ┆PÅ 4. GYNGE SÆTTES AF." 1340 CUR┆
0x420…440 53 4f 52 20 31 30 2c 20 35 0d 31 33 35 30 20 50 52 49 4e 54 20 22 53 5d 20 45 52 20 44 45 4e 4e   ┆SOR 10, 5 1350 PRINT "SÅ ER DENN┆
0x440…460 45 20 50 41 52 49 53 45 52 54 55 52 20 46 4f 52 42 49 2e 22 0d 31 33 36 30 20 45 4e 44 20 0d 55   ┆E PARISERTUR FORBI." 1360 END  U┆
0x460…480 52 53 4f 52 20 31 30 2c 20 33 0d 31 33 33 30 20 50 52 49 4e 54 20 22 50 41 53 53 41 47 45 52 5f   ┆RSOR 10, 3 1330 PRINT "PASSAGER_┆