DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC700 "Piccolo"

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

See our Wiki for more about RegneCentralen RC700 "Piccolo"

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦35da2cca6⟧

    Length: 384 (0x180)
    Names: »PIN«

Derivation

└─⟦00255762f⟧ Bits:30003588 ID-Comal til COMAL-80 Konverteringsprogram
    └─ ⟦this⟧ »PIN« 

Hex Dump

0x000…020 30 30 31 30 20 2f 2f 0d 0a 30 30 32 30 20 50 52 4f 43 20 70 69 6e 00 28 70 6f 72 74 2c 00 52 45   ┆0010 //  0020 PROC pin (port, RE┆
0x020…040 46 00 20 76 61 6c 75 65 00 29 00 20 43 4c 4f 53 45 44 0d 0a 30 30 33 30 20 20 20 2f 2f 0d 0a 30   ┆F  value )  CLOSED  0030   //  0┆
0x040…060 30 34 30 20 20 20 2f 2f 20 53 54 52 5c 4d 20 35 20 4d 5d 20 49 4b 4b 45 20 42 45 4e 59 54 54 45   ┆040   // STRØM 5 MÅ IKKE BENYTTE┆
0x060…080 53 20 49 20 48 4f 56 45 44 50 52 4f 47 52 41 4d 0d 0a 30 30 35 30 20 20 20 2f 2f 0d 0a 30 30 36   ┆S I HOVEDPROGRAM  0050   //  006┆
0x080…0a0 30 20 20 20 4f 50 45 4e 20 46 49 4c 45 20 35 2c 22 2f 22 2b 00 53 54 52 24 28 70 6f 72 74 29 00   ┆0   OPEN FILE 5,"/"+ STR$(port) ┆
0x0a0…0c0 2b 00 22 2f 70 6f 72 74 22 2c 20 52 45 41 44 20 0d 0a 30 30 37 30 20 20 20 76 61 6c 75 65 00 3a   ┆+ "/port", READ   0070   value :┆
0x0c0…0e0 3d 4f 52 44 00 28 47 45 54 24 28 35 2c 31 29 00 29 00 0d 0a 30 30 38 30 20 20 20 43 4c 4f 53 45   ┆=ORD (GET$(5,1) )   0080   CLOSE┆
0x0e0…100 00 20 46 49 4c 45 20 35 0d 0a 30 30 39 30 20 45 4e 44 50 52 4f 43 00 20 70 69 6e 00 0d 0a 30 31   ┆  FILE 5  0090 ENDPROC  pin   01┆
0x100…120 30 30 20 2f 2f 0d 0a 19 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆00 //                           ┆
0x120…140 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
       […0x2…]