DataMuseum.dk

Presents historical artifacts from the history of:

MIKADOS

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

See our Wiki for more about MIKADOS

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦bf9e72b10⟧

    Length: 3552 (0xde0)
    Notes: Mikados_1
    Names: »FPURG«

Derivation

└─⟦7ed48040f⟧ Bits:30004666 MIKADOS Utility programs vers. 10/5/84
    └─⟦this⟧ »FPURG« 
└─⟦e878f42e4⟧ Bits:30005274 SPC/1 EasyCalc version: 1.5
    └─⟦this⟧ »FPURG« 

Hex Dump

0x000…020 (0,) 76 76 20 20 20 20 20 20 76 76 76 76 46 50 55 52 47 20 20 20 50 33 52 31 20 20 50 33 20 20 50 31   ┆vv      vvvvFPURG   P3R1  P3  P1┆
0x020…040      18 40 00 40 7f 4b 01 07 20 05 00 00 08 0d 00 00 76 76 76 13 2e 31 39 38 34 cd 1a 76 76 76 76 76   ┆ @ @ K          vvv .1984  vvvvv┆
0x040…060      76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76   ┆vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv┆
0x060…080      76 76 76 76 76 76 76 76 76 76 46 50 55 52 47 20 20 20 31 41 00 0e 00 00 00 00 00 00 00 bd 02 01   ┆vvvvvvvvvvFPURG   1A            ┆
0x080…0a0      01 02 03 bd 02 01 01 00 20 00 42 03 e0 00 c0 00 c0 00 01 b9 bd 02 01 76 76 76 46 50 55 52 47 20   ┆          B            vvvFPURG ┆
0x0a0…0c0      20 20 31 41 00 0e 00 00 00 00 00 00 00 bd 02 0f 00 00 00 01 00 00 00 00 00 00 76 76 20 20 20 20   ┆  1A                      vv    ┆
0x0c0…0e0      20 20 76 76 76 76 46 50 55 52 47 20 20 20 50 33 52 31 20 20 50 33 20 20 50 31 18 40 00 40 7f 4b   ┆  vvvvFPURG   P3R1  P3  P1 @ @ K┆
0x0e0…100      46 50 55 52 47 20 76 65 72 73 69 6f 6e 20 30 32 2e 30 35 2e 31 39 38 34 cd fc 47 01 00 40 11 18   ┆FPURG version 02.05.1984  G  @  ┆
0x100…120      00 cd 63 48 3e 01 32 d0 46 3e 04 32 a0 42 3e 08 21 05 42 cd 55 00 cd 6c 48 01 ed 41 3e 20 16 18   ┆  cH> 2 F> 2 B> ! B U  lH  A>   ┆
0x120…140      cd e2 41 da 99 41 01 0d 42 3e 19 16 18 cd e2 41 da 99 41 06 00 3e 2a 0e 08 21 05 42 be c2 61 40   ┆  A  A  B>     A  A  >*  ! B  a@┆
0x140…160      04 23 0d c2 5c 40 21 25 42 be c2 6e 40 04 78 fe 09 ca 6e 41 32 88 42 21 89 42 97 cd 8a 48 da 99   ┆ #  Ø@!%B  n@ x   nA2 B! B   H  ┆
0x160…180      41 a7 c2 77 40 22 26 42 3a 88 42 a7 c2 bc 40 97 32 9f 42 11 05 42 21 89 42 06 08 cd 73 00 3a 25   ┆A  w@"&B: B   @ 2 B  B! B   s :%┆
0x180…1a0      42 77 11 89 42 cd a5 41 d2 39 40 fe 01 c2 8a 41 01 5f 42 11 18 00 cd 63 48 c3 39 40 21 00 00 22   ┆Bw  B  A 9@    A _B    cH 9@!  "┆
0x1a0…1c0      9c 42 3e 01 32 9e 42 3e 04 32 9f 42 2a a9 42 01 04 00 09 5e 23 56 13 01 01 00 09 7e 21 00 00 19   ┆ B> 2 B> 2 B* B    ^#V     ü!   ┆
0x1c0…1e0      3d c2 df 40 22 e9 47 21 89 42 3e 01 cd d0 00 a7 c2 8a 41 01 b9 42 60 69 3e 04 32 eb 47 3e 13 32   ┆=  @" G! B>       A  B`i> 2 G> 2┆
0x1e0…200      ec 47 7e a7 ca 38 41 fe 01 ca 2a 41 c5 e5 11 05 42 3a 25 42 cd 34 49 da 28 41 cd 6c 48 da 7a 41   ┆ Gü  8A   *A    B:%B 4I (A lH zA┆
0x200…220      d1 d5 cd a5 41 da 88 41 e1 c1 11 0d 00 19 3a ec 47 3d 32 ec 47 c2 02 41 2a e9 47 2b 22 e9 47 7c   ┆    A  A      : G=2 G  A* G+" Gø┆
0x220…240      b5 ca 39 40 21 00 01 09 44 4d 3a eb 47 3d 32 eb 47 c2 fd 40 21 9c 42 cd eb 00 7a 21 04 00 11 89   ┆  9@!   DM: G=2 G  @! B   z!    ┆
0x240…260      42 cd cd 00 7a 21 9c 42 cd ee 00 c3 e7 40 01 4d 42 11 12 00 cd 63 48 c3 99 41 c1 c1 01 77 42 11   ┆B   z! B     @ MB    cH  A   wB ┆
0x260…280      06 00 cd 63 48 c3 99 41 c1 c1 21 3a 42 cd 40 00 01 28 42 11 14 00 cd 63 48 01 3c 42 11 11 00 cd   ┆   cH  A  !:B @  (B    cH <B    ┆
0x280…2a0      63 48 cd a6 00 21 f0 47 06 08 cd 73 00 23 1a 77 01 ed 47 11 0f 00 cd 63 48 21 01 00 e5 2a 26 42   ┆cH   ! G   s # w  G    cH!   *&B┆
0x2a0…2c0      e5 3a f9 47 67 e5 21 f0 47 e5 21 b9 46 e5 cd 97 49 a7 ca d7 41 37 c9 01 7d 42 11 0b 00 cd 63 48   ┆ : Gg ! G ! F   I   A7  åB    cH┆
0x2c0…2e0      a7 c9 2a 35 48 cd 20 4b 4f 78 41 07 c9 45 6e 74 65 72 20 6d 61 73 74 65 72 20 66 69 6c 65 20 6e   ┆  *5H  KOxA  Enter master file n┆
0x2e0…300      61 6d 65 3a 20 20 20 20 20 20 20 20 20 45 6e 74 65 72 20 6d 61 73 74 65 72 20 66 69 6c 65 20 74   ┆ame:         Enter master file t┆
0x300…320      79 70 65 3a 20 20 20 20 46 69 6c 65 20 73 79 73 74 65 6d 20 65 72 72 6f 72 20 2e 2e 46 50 55 52   ┆ype:    File system error ..FPUR┆
0x320…340      47 20 74 65 72 6d 69 6e 61 74 65 64 2e 55 73 65 20 50 4c 49 4e 49 20 69 6e 73 74 65 61 64 21 54   ┆G terminated.Use PLINI instead!T┆
0x340…360      68 65 20 66 69 6c 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 2e 42 72 65 61 6b 21 6e 6f 77   ┆he file does not exist.Break!now┆
0x360…380      20 70 75 72 67 65 64 2e 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76   ┆ purged.vvvvvvvvvvvvvvvvvvvvvvvv┆
0x380…3a0      76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76   ┆vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv┆
       […0x29…]
0x8c0…8e0      76 76 76 76 76 76 76 76 76 76 76 76 76 3c 53 3e 20 20 20 20 20 20 20 20 20 20 20 20 21 2d 48 cd   ┆vvvvvvvvvvvvv<S>            !-H ┆
0x8e0…900      70 00 3e 28 21 3b 48 cd 55 00 2a 31 48 7c b5 c8 eb 3a 33 48 fe 28 da 1b 48 3e 28 47 21 3b 48 cd   ┆p >(!;H U *1Hø   :3H (  H>(G!;H ┆
0x900…920      73 00 2a 31 48 eb 2a 33 48 cd 9d 00 c9 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76   ┆s *1H *3H    vvvvvvvvvvvvvvvvvvv┆
0x920…940      76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76 76   ┆vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv┆
0x940…960      76 76 76 3e 02 2a 35 48 cd 91 00 c9 d5 e5 2a 2f 48 5e 23 56 21 06 00 19 f3 7e 36 00 fb e1 d1 a7   ┆vvv> *5H      */H^#V!    ü6     ┆
0x960…980      c8 37 c9 22 32 49 eb c3 be 48 22 32 49 eb 11 1a 49 a7 ca a2 48 22 11 49 11 13 49 3d ca a2 48 11   ┆ 7 "2I   H"2I   I   H" I  I=  H ┆
0x980…9a0      26 49 21 ea 48 06 0c cd 73 00 01 e4 48 3e 2f 16 2d 2a 35 48 cd 20 4b 04 ca e2 48 2a 11 49 7d e6   ┆&I! H   s   H>/ -*5H  K   H* Iå ┆
0x9a0…9c0      5f fe 50 ca cd 48 7c fe 20 c2 de 48 65 2e 50 eb 2a 32 49 cd ca 00 a7 c0 eb 5e 23 56 eb c9 3e 0a   ┆_ P  Hø    He.P *2I      ^#V  > ┆
0x9c0…9e0      a7 c9 37 c9 45 6e 74 65 72 20 76 76 76 76 76 76 76 76 76 76 76 76 64 69 73 63 20 64 72 69 76 65   ┆  7 Enter vvvvvvvvvvvvdisc drive┆
0x9e0…a00      20 69 64 65 6e 74 69 66 69 63 61 74 69 6f 6e 20 50 20 20 73 6f 75 72 63 65 20 00 00 00 00 00 00   ┆ identification P  source       ┆
0xa00…a20      00 00 00 00 00 00 64 65 73 74 69 6e 61 74 69 6f 6e 20 76 76 32 95 49 97 32 96 49 e5 21 8d 49 06   ┆      destination vv2 I 2 I ! I ┆
0xa20…a40      08 cd 73 00 21 8d 49 d1 0e 09 7e fe 2a ca 7b 49 fe 61 d2 5d 49 1a be ca 7b 49 c3 8b 49 e6 5f 47   ┆  s ! I   ü * æI a ÅI   æI  I _G┆
0xa40…a60      1a b8 ca 70 49 3a 96 49 f6 01 32 96 49 c3 7b 49 3a 96 49 f6 10 32 96 49 c3 7b 49 13 23 0d c2 4a   ┆   pI: I  2 I æI: I  2 I æI #  J┆
0xa60…a80      49 3a 96 49 fe 10 ca 8b 49 97 c9 37 c9 76 76 76 76 76 76 76 76 76 76 cd 82 4a e1 c0 0e 03 e5 cd   ┆I: I    I  7 vvvvvvvvvv  J      ┆
0xa80…aa0      d9 00 a7 ca a8 49 e1 c9 e1 e5 0e 01 cd e2 00 a7 ca b8 49 e1 f5 c3 72 4a e1 e5 3e 01 cd c4 00 47   ┆     I            I   rJ  >    G┆
0xaa0…ac0      05 ca cc 49 f2 6b 4a 3e 01 c3 6b 4a 77 01 09 00 09 7e 23 cd eb 00 e1 c5 d5 e5 f5 3e 02 cd d0 00   ┆   I kJ>  kJw    ü#        >    ┆
0xac0…ae0      a7 ca eb 49 c1 e1 c1 c1 c3 6a 4a f1 e1 d1 c1 fe 2a ca 69 4a e5 7a 11 13 00 19 cd ee 00 23 3e 01   ┆   I     jJ     * iJ z       #> ┆
0xae0…b00      77 e1 e5 cd d0 00 a7 c2 6b 4a d1 d5 21 30 00 19 06 09 1a be c2 78 4a 13 23 05 c2 12 4a 7e fe 41   ┆w       kJ  !0       xJ #   Jü A┆
0xb00…b20      c2 2e 4a 32 18 4b 23 7e 32 17 4b c3 40 4a 21 18 4b 34 be c2 7d 4a 3a 17 4b 3d fa 7d 4a 32 17 4b   ┆ .J2 K#ü2 K @J! K4  åJ: K= åJ2 K┆
0xb20…b40      d1 d5 21 30 00 19 36 00 3e 02 eb cd d0 00 a7 c2 6b 4a e1 e5 01 3d 00 09 cd eb 00 e1 78 b1 b2 c2   ┆  !0  6 >       kJ   =      x   ┆
0xb40…b60      f4 49 3a 17 4b a7 c2 7d 4a 97 e5 e1 f5 e5 cd df 00 e1 cd dc 00 f1 a7 c9 3e 09 c3 6b 4a 3e 14 c3   ┆ I: K  åJ               >  kJ>  ┆
0xb60…b80      6b 4a 97 32 1f 4b e1 22 19 4b e1 22 1b 4b e1 22 1d 4b 7e 2f 01 29 00 09 be c2 a8 4a 3e 07 32 1f   ┆kJ 2 K " K " K " Kü/ )     J> 2 ┆
0xb80…ba0      4b e1 e1 e1 e1 c3 06 4b 36 ee 2a 1d 4b d1 1a fe 21 da b9 4a fe 7f da be 4a 3e 09 32 1f 4b 06 08   ┆K      K6 * K   !  J    J> 2 K  ┆
0xba0…bc0      cd 73 00 f1 fe 30 da ce 4a fe 5e da d3 4a 3e 11 32 1f 4b 77 2a 1d 4b d1 cd ca 00 ca e1 4a 32 1f   ┆ s   0  J ^  J> 2 Kw* K      J2 ┆
0xbc0…be0      4b d1 7a a7 c2 f0 4a b3 ca f0 4a fe 15 da f5 4a 3e 0f 32 1f 4b 2a 1d 4b 01 17 00 09 73 2a 1d 4b   ┆K z   J   J    J> 2 K* K    s* K┆
0xbe0…c00      01 16 00 09 36 00 2a 1b 4b e5 2a 1d 4b e5 2a 19 4b e5 3a 1f 4b a7 c9 76 76 76 76 76 76 76 76 76   ┆    6 * K * K * K : K  vvvvvvvvv┆
0xc00…c20      e5 d5 f5 c5 00 01 01 04 cd 58 00 e5 2a 50 01 01 10 00 09 7e 12 23 13 7e 12 13 3e 03 12 13 97 12   ┆         X  *P     ü # ü  >     ┆
0xc20…c40      13 e1 c1 e5 eb 71 23 70 23 d1 f1 77 23 36 00 23 f1 77 c1 eb cd ac 00 cd 88 00 e5 06 00 21 0b 00   ┆     q#p#  w#6 # w           !  ┆
0xc40…c60      19 7e fe 10 c2 69 4b 06 ff 21 0c 00 19 7e 21 04 00 19 5e 23 56 e1 c5 01 01 04 cd ac 00 c1 c9 c1   ┆ ü   iK  !   ü!   ^#V           ┆
0xc60…c80      c9 20 43 53 54 29 20 20 41 4e 44 28 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 53 54 52   ┆  CST)  AND(C               (STR┆
0xc80…ca0      47 54 59 50 45 28 47 41 54 54 52 2e 54 59 50 54 52 29 20 20 4f 52 20 28 47 41 54 54 52 2e 54 59   ┆GTYPE(GATTR.TYPTR)  OR (GATTR.TY┆
0xca0…cc0      50 54 52 20 3d 20 43 48 41 52 50 54 52 29 29 3b 43 20 20 20 20 20 20 20 49 46 20 47 41 54 54 52   ┆PTR = CHARPTR));C       IF GATTR┆
0xcc0…ce0      2e 54 59 50 54 52 20 3c 3e 20 4e 49 4c 20 54 48 45 4e 20 2f 20 20 20 20 20 20 20 20 49 46 20 47   ┆.TYPTR <> NIL THEN /        IF G┆
0xce0…d00      41 54 54 52 2e 54 59 50 54 52 5e 2e 46 4f 52 4d 20 3c 3d 20 50 4f 57 45 52 20 54 48 45 4e 20 4c   ┆ATTR.TYPTR^.FORM <= POWER THEN L┆
0xd00…d20      4f 41 44 2f 19 20 20 20 20 20 20 20 20 45 4c 53 45 20 4c 4f 41 44 41 44 44 52 45 53 53 3b 19 23   ┆OAD/         ELSE LOADADDRESS; #┆
0xd20…d40      20 20 20 20 20 20 4c 41 54 54 52 20 3a 3d 20 47 41 54 54 52 3b 20 20 20 20 4c 4f 50 20 3a 3d 20   ┆      LATTR := GATTR;    LOP := ┆
0xd40…d60      4f 50 3b 23 30 20 20 20 20 20 20 49 4e 53 59 4d 42 4f 4c 3b 20 20 20 20 20 20 20 20 20 20 53 49   ┆OP;#0      INSYMBOL;          SI┆
0xd60…d80      4d 50 4c 45 45 58 50 52 45 53 53 49 4f 4e 28 46 53 59 53 29 3b 30 28 20 20 20 20 20 20 47 53 54   ┆MPLEEXPRESSION(FSYS);0(      GST┆
0xd80…da0      52 49 4e 47 20 3a 3d 20 28 47 41 54 54 52 2e 4b 49 4e 44 20 3d 20 43 53 54 29 20 20 41 4e 44 28   ┆RING := (GATTR.KIND = CST)  AND(┆
0xda0…dc0      43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 53 54 52 47 54 59 50 45 28 47 41 54 54 52 2e   ┆C               (STRGTYPE(GATTR.┆
0xdc0…de0      54 59 50 54 52 29 20 20 4f 52 20 28 47 41 54 54 52 2e 54 59 50 54 52 20 3d 20 43 48 41 52 50 63   ┆TYPTR)  OR (GATTR.TYPTR = CHARPc┆