|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1408 (0x580)
Names: »PRIS«
└─⟦a0c032bb9⟧ Bits:30003931/piccolo-disk1.imd Disketter indleveret af Steffen Jensen (Piccolo/Piccoline)
└─⟦this⟧ »PRIS«
0x000…020 (0,) 02 83 6c c7 23 36 ce 05 9a 05 2f 32 2f 53 41 56 45 2e 24 24 24 20 20 20 20 20 05 00 d3 03 01 00 ┆ l #6 /2/SAVE.$$$ ┆
0x020…040 0a 00 d3 12 01 01 20 20 20 20 20 62 79 20 53 74 65 66 66 65 6e 20 42 65 72 69 6e 67 20 4a 65 6e ┆ by Steffen Bering Jen┆
0x040…060 73 65 6e 00 14 00 d3 03 01 01 1e 00 d3 03 01 01 28 00 d3 1a 01 01 20 20 20 20 20 44 65 74 74 65 ┆sen ( Dette┆
0x060…080 20 70 72 6f 67 72 61 6d 20 75 64 72 65 67 6e 65 72 20 70 72 69 73 65 6e 20 66 6f 72 20 65 6e 20 ┆ program udregner prisen for en ┆
0x080…0a0 76 61 72 65 32 00 d3 15 01 01 20 20 20 20 20 6e 7d 72 20 76 7b 67 74 20 6f 67 20 70 72 69 73 20 ┆vare2 når vægt og pris ┆
0x0a0…0c0 65 72 20 69 6e 64 74 61 73 74 65 74 2e 00 3c 00 d3 03 01 01 46 00 d3 0a 01 01 20 20 20 20 20 20 ┆er indtastet. < F ┆
0x0c0…0e0 20 34 2d 31 32 2d 38 34 50 00 d3 03 01 00 51 00 6d 0d 81 f1 2d 1d 0a c0 08 00 6b 65 79 62 6f 61 ┆ 4-12-84P Q m - keyboa┆
0x0e0…100 72 64 2d 1f 0d 00 01 00 52 00 67 07 81 f1 04 00 2e a0 2d 00 01 00 53 00 83 04 00 00 01 00 5a 00 ┆rd- R g . - S Z ┆
0x100…120 86 0a 08 d0 01 20 00 00 00 00 00 82 55 00 07 00 01 00 64 00 86 23 3c c0 39 00 20 20 2d 2d 2d 2d ┆ U d #< 9 ----┆
0x120…140 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆--------------------------------┆
0x140…160 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 07 00 01 00 6e 00 86 23 3c c0 39 00 ┆------------------- n #< 9 ┆
0x160…180 20 20 21 20 20 20 20 48 65 72 20 69 6e 64 74 61 73 74 65 73 20 64 65 6e 20 70 72 69 73 20 6f 67 ┆ ! Her indtastes den pris og┆
0x180…1a0 20 76 7b 67 74 20 64 75 20 6b 65 6e 64 65 72 2e 20 20 20 20 20 20 20 20 21 00 07 00 01 00 78 00 ┆ vægt du kender. ! x ┆
0x1a0…1c0 86 23 3c c0 39 00 20 20 21 20 20 20 20 50 72 69 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ #< 9 ! Pris: ┆
0x1c0…1e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 21 00 ┆ ! ┆
0x1e0…200 07 00 01 00 82 00 86 23 3c c0 39 00 20 20 21 20 20 20 20 56 7b 67 74 3a 20 20 20 20 20 20 20 20 ┆ #< 9 ! Vægt: ┆
0x200…220 (1,) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x220…240 20 20 20 20 21 00 07 00 01 00 8c 00 86 23 3c c0 39 00 20 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆ ! #< 9 ------------┆
0x240…260 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆--------------------------------┆
0x260…280 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 07 00 01 00 96 00 87 0e 08 d0 01 30 00 00 00 00 00 82 81 f4 ┆----------- 0 ┆
0x280…2a0 3a 02 2d 3a 13 00 02 80 05 00 01 00 a0 00 87 0e 08 d0 01 30 00 00 00 00 00 82 81 f5 3a 02 2d 3a ┆: -: 0 : -:┆
0x2a0…2c0 13 00 09 80 05 00 01 00 aa 00 86 04 08 00 01 00 be 00 86 23 3c c0 39 00 20 20 21 20 20 20 20 48 ┆ #< 9 ! H┆
0x2c0…2e0 65 72 20 69 6e 64 74 61 73 74 65 73 20 64 65 6e 20 76 7b 67 74 20 73 6f 6d 20 70 72 69 73 65 6e ┆er indtastes den vægt som prisen┆
0x2e0…300 20 7c 6e 73 6b 65 73 20 74 69 6c 20 20 20 20 20 21 00 07 00 01 00 c8 00 86 23 3c c0 39 00 20 20 ┆ ønskes til ! #< 9 ┆
0x300…320 21 20 20 20 20 56 7b 67 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆! Vægt: ┆
0x320…340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 21 00 07 00 01 00 d2 00 86 23 ┆ ! #┆
0x340…360 3c c0 39 00 20 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆< 9 --------------------------┆
0x360…380 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 07 00 ┆----------------------------- ┆
0x380…3a0 01 00 dc 00 87 0e 08 d0 01 30 00 00 00 00 00 82 81 f8 3a 02 2d 3a 13 00 10 80 05 00 01 00 e6 00 ┆ 0 : -: ┆
0x3a0…3c0 d3 0f 01 01 20 20 20 20 62 65 72 65 67 6e 69 6e 67 20 61 66 20 6e 79 20 70 72 69 73 f0 00 d1 08 ┆ beregning af ny pris ┆
0x3c0…3e0 19 80 02 80 09 80 22 00 1d 00 01 00 fa 00 86 04 08 00 01 00 04 01 86 1c 2a c0 28 00 20 20 21 20 ┆ " * ( ! ┆
0x3e0…400 20 20 20 50 72 69 73 20 70 72 20 67 72 61 6d 3a 20 20 20 20 20 20 20 20 20 20 20 20 23 23 23 23 ┆ Pris pr gram: ####┆
0x400…420 (2,) 23 2e 23 23 2d 04 19 80 09 00 01 00 0e 01 d1 08 25 80 19 80 10 80 21 00 1d 00 01 00 18 01 86 1e ┆#.##- % ! ┆
0x420…440 2a c0 28 00 20 20 21 20 20 20 20 50 72 69 73 20 66 6f 72 20 23 23 23 23 23 23 23 20 3a 20 20 23 ┆* ( ! Pris for ####### : #┆
0x440…460 23 23 23 23 23 23 23 23 23 2e 23 23 2d 04 10 80 09 2c 25 80 09 00 01 00 22 01 86 23 3c c0 39 00 ┆#########.##- ,% " #< 9 ┆
0x460…480 20 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆ ------------------------------┆
0x480…4a0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 07 00 01 00 23 01 ┆------------------------- # ┆
0x4a0…4c0 86 1f 08 d0 05 70 00 00 00 00 00 82 82 f1 3a 02 07 3b 04 c0 01 00 21 00 07 3b 08 d0 05 70 00 00 ┆ p : ; ! ; p ┆
0x4c0…4e0 00 00 00 82 08 d0 01 10 00 00 00 00 00 82 3a 02 07 3b 04 c0 01 00 21 00 07 00 01 00 2c 01 d1 08 ┆ : ; ! , ┆
0x4e0…500 2e a0 81 f1 81 f1 74 02 1e 00 01 00 36 01 84 06 42 71 00 e0 2d 0a 01 00 10 27 d6 00 5d c7 05 50 ┆. t 6 Bq - ' Å P┆
0x500…520 52 49 53 4e c7 05 56 5b 47 54 3f c7 07 4e 59 56 5b 47 54 30 c7 0a 50 52 49 53 5f 50 52 5f 47 21 ┆RISN VÆGT? NYVÆGT0 PRIS_PR_G!┆
0x520…540 c7 07 4e 59 50 52 49 53 6c c7 02 41 00 00 00 3a 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ NYPRISl A : ┆
0x540…560 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…]