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

⟦b855af71b⟧

    Length: 2304 (0x900)
    Names: »boom«

Derivation

└─⟦034458d74⟧ Bits:30003043 Aalborg skolevæsen, blandede programeksempler på Piccolo
    └─ ⟦this⟧ »boom« 

Hex Dump

0x000…020 09 81 dd 15 bc 00 9f 04 2c 04 31 2f 62 6f 6f 6d 20 20 20 20 20 20 20 20 20 20 0a 00 96 04 99 ff   ┆        , 1/boom                ┆
0x020…040 01 00 14 00 67 07 7f 8e 04 01 ff df 2d 00 01 00 1e 00 83 04 00 00 01 00 28 00 86 0a fc af 01 20   ┆    g       -           (       ┆
0x040…060 00 00 00 00 00 82 55 00 07 00 01 00 32 00 65 10 fc af 02 80 00 00 00 00 00 82 fc af 01 20 00 00   ┆      U     2 e                 ┆
0x060…080 00 00 00 82 02 02 fa ff 2d 0d 01 00 3c 00 87 13 f4 bf 15 00 5c 4e 53 4b 45 53 20 49 4e 53 54 52   ┆        -   <       ØNSKES INSTR┆
0x080…0a0 55 4b 54 49 4f 4e 20 3f 20 00 12 3a ff df 05 00 01 00 46 00 3e 11 ff df 56 00 00 90 28 00 ff df   ┆UKTION ?   :      F >   V   (   ┆
0x0a0…0c0 fe bf 02 00 6a 4a 39 00 38 00 2d 71 65 00 f6 ff 2d 0d 01 00 50 00 84 10 73 74 ff df 56 00 00 90   ┆    jJ9 8 -qe   -   P   st  V   ┆
0x0c0…0e0 28 00 ff df fd bf 04 00 6a 4a 6e 4e 39 00 38 00 2d 0a 01 00 5a 00 d1 09 f1 ff 00 90 1d 1b eb ff   ┆(       jJnN9 8 -   Z           ┆
0x0e0…100 00 90 1d 00 01 00 64 00 83 04 00 00 01 00 6e 00 b1 03 01 00 78 00 d1 0f e6 ff fc af 01 80 00 00   ┆      d       n     x           ┆
0x100…120 00 00 00 82 4a 00 21 00 4c 00 7f 8d 24 00 1d 00 01 00 82 00 86 0a fc af 01 20 00 00 00 00 00 82   ┆    J ! L   $                   ┆
0x120…140 55 00 07 00 01 00 8c 00 65 0c 7e 8b fc af 02 10 00 00 00 00 00 82 02 02 fa ff 2d 0d 01 00 96 00   ┆U       e ü               -     ┆
0x140…160 86 07 fe bf 02 00 20 49 07 00 01 00 a0 00 65 0c 7e 8b fc af 02 20 00 00 00 00 00 82 02 02 fa ff   ┆       I      e ü               ┆
0x160…180 2d 0d 01 00 aa 00 86 08 fd bf 03 00 28 23 29 00 07 00 01 00 b4 00 d1 0a e0 ff 7f 8e 2b 00 1d 1b   ┆-           (#)             +   ┆
0x180…1a0 d9 ff 7e 87 1d 00 01 00 be 00 3e 0e 4a 00 80 8a 2a 00 2d 71 d1 00 e0 ff 7f 8e 1d 1b d9 ff 7f 8e   ┆  ü       > J   * -q            ┆
0x1a0…1c0 1d 00 01 00 c8 00 d1 0f d2 ff 00 90 1d 1b cd ff 00 90 1d 1b c7 ff 00 90 1d 1b c2 ff 7e 8d 1d 00   ┆                            ü   ┆
0x1c0…1e0 01 00 d2 00 d3 04 01 01 20 20 dc 00 d1 06 c7 ff 00 90 1d 00 01 00 e6 00 83 04 23 75 01 00 f0 00   ┆                          #u    ┆
0x1e0…200 d1 07 bc ff 79 00 56 00 1d 00 01 00 fa 00 3e 0e bc ff fc af 04 90 00 00 00 00 00 82 28 00 2d 71   ┆    y V       >             ( -q┆
0x200…220 65 00 b8 ff 2d 0d 01 00 04 01 d1 08 d9 ff d9 ff e0 ff 24 00 1d 00 01 00 0e 01 65 08 d9 ff e6 ff   ┆e   -             $       e     ┆
0x220…240 02 02 fa ff 2d 0d 01 00 18 01 3f 09 13 76 8d 76 e0 ff 7f 8e 28 00 2d 72 01 00 22 01 86 08 fd bf   ┆    -     ?  v v    ( -r  "     ┆
0x240…260 04 00 20 3a 2d 3e 07 00 01 00 2c 01 5d 04 a9 76 01 00 36 01 86 0b 7e 89 55 00 07 3b fd bf 03 00   ┆   :->    , Å  v  6   ü U  ;    ┆
0x260…280 2d 3a 20 00 07 00 01 00 40 01 80 03 01 00 4a 01 3f 09 13 76 fd 76 c7 ff 7f 8e 28 00 2d 72 01 00   ┆-:      @     J ?  v v    ( -r  ┆
0x280…2a0 54 01 d1 08 c2 ff c2 ff 7f 8e 23 00 1d 00 01 00 5e 01 65 08 7e 8b c2 ff 02 02 fa ff 2d 0d 01 00   ┆T         #     ^ e ü       -   ┆
0x2a0…2c0 68 01 86 0e fe bf 01 00 5e 00 07 3b fc af 03 10 00 00 00 00 00 82 55 00 07 00 01 00 72 01 80 03   ┆h       ^  ;          U     r   ┆
0x2c0…2e0 01 00 7c 01 3f 10 13 76 71 77 d9 ff 7e 8b 23 00 4b 00 7f 8d 27 00 c2 ff e6 ff 28 00 49 00 2d 72   ┆  ø ?  vqw  ü # K   '     ( I -r┆
0x2e0…300 01 00 86 01 65 0c fc af 03 70 00 00 00 00 00 82 e6 ff 02 02 fa ff 2d 0d 01 00 90 01 86 10 7f 88   ┆    e    p            -         ┆
0x300…320 55 00 07 3b 7f 88 55 00 07 3b fb bf 08 00 2a 2a 42 4f 4f 4d 2a 2a 07 00 01 00 9a 01 d1 0b d2 ff   ┆U  ;  U  ;    **BOOM**          ┆
0x320…340 7f 8e 1d 1b eb ff eb ff 7f 8e 24 00 1d 00 01 00 a4 01 80 03 01 00 ae 01 3f 19 13 76 df 77 c2 ff   ┆          $             ?  v w  ┆
0x340…360 7f 8e 28 00 d9 ff 7f 8e 28 00 38 00 d9 ff 7e 87 28 00 38 00 c2 ff e6 ff 23 00 14 00 7f 8b 2b 00   ┆  (     ( 8   ü ( 8     #     + ┆
0x360…380 27 00 38 00 2d 72 01 00 b8 01 86 15 fc af 01 20 00 00 00 00 00 82 55 00 07 3b f7 bf 10 00 46 4f   ┆' 8 -r                U  ;    FO┆
0x380…3a0 52 42 49 45 52 20 21 21 21 21 21 21 21 21 07 00 01 00 c2 01 d1 06 cd ff 7f 8e 1d 00 01 00 cc 01   ┆RBIER !!!!!!!!                  ┆
0x3a0…3c0 80 03 01 00 d6 01 84 0c 19 76 d2 ff 7f 8e 28 00 cd ff 7f 8e 28 00 38 00 2d 0a 01 00 e0 01 65 08   ┆         v    (     ( 8 -     e ┆
0x3c0…3e0 7f 8e 7f 8d 02 02 fa ff 2d 0d 01 00 ea 01 86 13 f2 bf 1a 00 54 52 59 4b 20 50 5d 20 32 20 46 4f   ┆        -           TRYK PÅ 2 FO┆
0x3e0…400 52 20 41 54 20 46 4f 52 54 53 5b 54 54 45 07 00 01 00 f4 01 83 0f 23 75 01 01 20 3e 3d 3d 2d 2d   ┆R AT FORTSÆTTE        #u   >==--┆
0x400…420 20 4c 4f 4f 50 20 2d 2d 3d 3d 3c 20 2f 2f 20 20 fe 01 d1 07 bc ff 79 00 56 00 1d 00 01 00 08 02   ┆ LOOP --==< //        y V       ┆
0x420…440 3e 12 bc ff 7e 8a 28 00 bc ff fc af 01 15 00 00 00 00 00 83 28 00 38 00 2d 71 66 00 2f 78 9e ff   ┆>   ü (             ( 8 -qf /x  ┆
0x440…460 01 00 12 02 84 11 4b 78 00 a0 2d 0a 01 01 20 3e 3d 3d 2d 2d 20 45 4e 44 4c 4f 4f 50 20 2d 2d 3d   ┆      Kx  -    >==-- ENDLOOP --=┆
0x460…480 3d 3c 20 20 1c 02 d2 05 23 75 9e ff 01 00 26 02 3e 0d bc ff 55 00 fe bf 01 00 73 00 19 00 2d 71   ┆=<      #u    & >   U     s   -q┆
0x480…4a0 66 00 23 75 a4 ff 01 00 30 02 63 07 e5 78 00 00 b8 ff 2d 00 01 00 3a 02 d1 06 c7 ff 7f 8e 1d 00   ┆f #u    0 c  x    -   :         ┆
0x4a0…4c0 01 00 44 02 a3 04 b8 ff 01 00 4e 02 d1 08 f1 ff f1 ff 7f 8e 24 00 1d 00 01 00 58 02 84 08 29 75   ┆  D       N         $     X   )u┆
0x4c0…4e0 7f 8e 7f 8a 28 00 2d 0a 01 00 62 02 d2 05 00 00 a4 ff 01 00 6c 02 63 07 9f 7a 00 00 f6 ff 2d 00   ┆    ( -   b         l c  z    - ┆
0x4e0…500 01 00 76 02 86 0a fc af 01 20 00 00 00 00 00 82 55 00 07 00 01 00 80 02 86 29 fc af 01 20 00 00   ┆  v             U        )      ┆
0x500…520 00 00 00 82 5a 00 07 3b e3 bf 38 00 4d 45 44 20 45 4e 20 4c 55 46 54 56 5b 52 4e 53 52 41 4b 45   ┆    Z  ;  8 MED EN LUFTVÆRNSRAKE┆
0x520…540 54 20 4b 41 4e 20 44 55 20 53 4b 59 44 45 20 45 46 54 45 52 20 45 4e 20 46 4c 59 56 45 4d 41 53   ┆T KAN DU SKYDE EFTER EN FLYVEMAS┆
0x540…560 4b 49 4e 45 07 00 01 00 8a 02 86 04 08 00 01 00 94 02 86 2b fc af 01 20 00 00 00 00 00 82 5a 00   ┆KINE               +          Z ┆
0x560…580 07 3b e1 bf 3b 00 52 41 4b 45 54 54 45 4e 20 55 44 4c 5c 53 45 53 20 56 45 44 20 41 54 20 54 52   ┆ ;  ; RAKETTEN UDLØSES VED AT TR┆
0x580…5a0 59 4b 4b 45 20 50 5d 20 27 31 27 2e 45 46 54 45 52 20 48 56 45 52 54 20 53 4b 55 44 20 53 4b 41   ┆YKKE PÅ '1'.EFTER HVERT SKUD SKA┆
0x5a0…5c0 4c 00 07 00 01 00 9e 02 86 29 fc af 01 20 00 00 00 00 00 82 5a 00 07 3b e3 bf 37 00 54 52 59 4b   ┆L        )          Z  ;  7 TRYK┆
0x5c0…5e0 4b 45 53 20 50 5d 20 27 32 27 20 46 4f 52 20 41 54 20 46 4f 52 54 53 5b 54 54 45 2c 45 4c 4c 45   ┆KES PÅ '2' FOR AT FORTSÆTTE,ELLE┆
0x5e0…600 52 20 27 73 27 20 46 4f 52 20 41 54 20 53 54 4f 50 50 45 00 07 00 01 00 a8 02 86 04 08 00 01 00   ┆R 's' FOR AT STOPPE             ┆
0x600…620 b2 02 86 04 08 00 01 00 bc 02 86 0a fc af 01 20 00 00 00 00 00 82 5a 00 07 3b 01 00 c6 02 87 20   ┆                      Z  ;      ┆
0x620…640 e7 bf 2f 00 54 52 59 4b 20 50 5d 20 27 52 45 54 55 52 4e 27 20 4e 5d 52 20 44 55 20 48 41 52 20   ┆  / TRYK PÅ 'RETURN' NÅR DU HAR ┆
0x640…660 4c 5b 53 54 20 49 4e 53 54 52 55 4b 54 49 4f 4e 45 4e 20 00 12 3a ff df 05 00 01 00 d0 02 a3 04   ┆LÆST INSTRUKTIONEN   :          ┆
0x660…680 f6 ff 01 00 da 02 86 29 fc af 01 20 00 00 00 00 00 82 55 00 07 3b fb bf 07 00 44 55 20 46 49 4b   ┆       )          U  ;    DU FIK┆
0x680…6a0 20 00 07 3b eb ff 07 3b f7 bf 0f 00 54 52 5b 46 46 45 52 45 20 55 44 20 41 46 20 00 07 3b f1 ff   ┆   ;   ;    TRÆFFERE UD AF   ;  ┆
0x6a0…6c0 7f 8e 24 00 07 3b fb bf 07 00 20 4d 55 4c 49 47 45 00 07 00 01 00 e4 02 5f 0f 3e 7a 23 7b b3 ff   ┆  $  ;     MULIGE       _ >z#æ  ┆
0x6c0…6e0 7f 8e 1d 00 fc af 01 50 00 00 00 00 00 84 3b 00 11 3d 01 00 ee 02 60 05 19 7b b3 ff 01 00 f8 02   ┆       P      ;  =    `  æ      ┆
0x6e0…700 8a 09 fc bf 05 00 6c 6f 67 6f 6e 00 2d 70 01 00 02 03 63 0c c1 7b 02 00 ae ff 00 00 a9 ff 00 00   ┆      logon -p    c  æ          ┆
0x700…720 02 02 fa ff 2d 00 01 00 0c 03 86 36 7f 89 55 00 07 3b fc af 09 50 00 00 00 00 00 82 ae ff 24 00   ┆    -      6  U  ;   P        $ ┆
0x720…740 ae ff fc af 03 20 00 00 00 00 00 82 2a 00 14 00 fc af 06 40 00 00 00 00 00 82 21 00 23 00 ae ff   ┆            *      @      ! #   ┆
0x740…760 fc af 06 40 00 00 00 00 00 82 2a 00 14 00 fc af 06 40 00 00 00 00 00 82 21 00 23 00 55 00 07 3b   ┆   @      *      @      ! # U  ;┆
0x760…780 fc af 09 50 00 00 00 00 00 82 a9 ff 24 00 55 00 07 3b 01 00 16 03 a3 04 fa ff 01 00 20 03 63 07   ┆   P        $ U  ;            c ┆
0x780…7a0 f3 7b 00 00 99 ff 2d 7d 01 00 21 03 3e 0f 00 90 77 00 7d 8e 28 00 2d 71 8a 00 fc bf 05 00 6c 6f   ┆ æ    -å  ! >   w å ( -q      lo┆
0x7a0…7c0 67 6f 6e 00 2d 70 01 00 2a 03 a7 03 01 00 34 03 a3 04 99 ff 01 00 10 27 d6 00 1e bc 1e bc 02 00   ┆gon -p  *     4        '        ┆
0x7c0…7e0 53 56 41 52 31 bc 31 bc 01 00 58 59 41 bc 41 bc 02 00 49 4e 53 54 00 00 00 00 03 00 46 4f 52 53   ┆SVAR1 1   XYA A   INST      FORS┆
0x7e0…800 5c 47 00 00 00 00 02 00 50 4c 45 54 00 00 00 00 03 00 48 5c 4a 44 45 00 00 00 00 00 04 00 52 45   ┆ØG      PLET      HØJDE       RE┆
0x800…820 54 4e 49 4e 47 00 00 00 00 00 04 00 50 4f 53 49 54 49 4f 4e 00 00 00 00 02 00 52 41 4d 54 00 00   ┆TNING       POSITION      RAMT  ┆
0x820…840 00 00 03 00 46 4f 52 42 49 00 00 00 00 00 02 00 53 4b 55 44 00 00 00 00 03 00 47 52 41 4e 41 54   ┆    FORBI       SKUD      GRANAT┆
0x840…860 00 00 00 00 01 00 58 00 51 bc 51 bc 02 00 53 4b 59 44 00 00 00 00 02 00 56 45 4e 54 00 00 00 00   ┆      X Q Q   SKYD      VENT    ┆
0x860…880 02 00 58 41 44 52 00 00 00 00 02 00 59 41 44 52 4b bc 4b bc 03 00 45 58 49 54 32 00 5b bc 5b bc   ┆  XADR      YADRK K   EXIT2 Æ Æ ┆
0x880…8a0 02 00 45 58 49 54 27 bc 27 bc 02 00 46 45 4a 4c 3b bc 3b bc 02 00 48 41 4c 54 00 00 00 00 00 00   ┆  EXIT' '   FEJL; ;   HALT      ┆
0x8a0…8c0 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 00 00 00 00 00 00 00   ┆                                ┆
0x8c0…8e0 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   ┆                                ┆
       […0x1…]