|
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 - download
Length: 2816 (0xb00)
Names: »DEMOEXT.CSB«
└─⟦0d02879d3⟧ Bits:30004605 COMPAS Pascal version 3.03
└─ ⟦this⟧ »DEMOEXT.CSB«
0x000…020 07 00 1b 09 11 c6 00 04 00 0c 00 00 87 aa 06 47 52 41 46 49 4b 00 fe 14 00 01 cf aa 06 57 49 4e ┆ GRAFIK WIN┆ 0x020…040 44 4f 57 00 ff 03 ff 03 ff 03 ff 03 fe 0f 00 02 57 ab 07 53 45 54 4d 41 53 4b 00 ff 03 fe 10 00 ┆DOW W SETMASK ┆ 0x040…060 03 76 ab 08 50 45 4e 43 4f 4c 4f 52 00 ff 03 fe 0d 00 04 11 ac 05 47 50 41 52 4d 03 ff 01 fe 0e ┆ v PENCOLOR GPARM ┆ 0x060…080 00 05 d2 ac 04 44 52 41 57 00 ff 03 ff 03 fe 10 00 06 d8 ac 06 44 52 41 57 54 4f 00 ff 03 ff 03 ┆ DRAW DRAWTO ┆ 0x080…0a0 fe 0e 00 07 20 ad 04 4d 4f 56 45 00 ff 03 ff 03 fe 10 00 08 77 ad 06 4d 4f 56 45 54 4f 00 ff 03 ┆ MOVE w MOVETO ┆ 0x0a0…0c0 ff 03 fe 08 00 09 12 ae 02 50 49 03 fe 0e 00 0a 26 ae 04 50 4c 4f 54 00 ff 03 ff 03 fe 10 00 0b ┆ PI & PLOT ┆ 0x0c0…0e0 2d ae 06 55 4e 50 4c 4f 54 00 ff 03 ff 03 fe 0c 00 0c 79 ae 04 54 45 58 54 00 ff 04 fe 12 00 0d ┆- UNPLOT y TEXT ┆ 0x0e0…100 0c b0 06 43 49 52 43 4c 45 00 ff 03 ff 03 ff 03 fe 12 00 0e c3 b1 06 43 49 52 4b 45 4c 00 ff 03 ┆ CIRCLE CIRKEL ┆ 0x100…120 ff 03 ff 03 fe 01 00 c3 1b 09 f6 0a 00 4c 71 f7 44 00 20 64 65 6d 6f 6e 73 74 61 72 74 69 6f 6e ┆ Lq D demonstartion┆ 0x120…140 20 61 66 20 67 72 61 66 69 6b 20 65 78 74 65 6e 73 69 6f 6e 20 74 69 6c 20 42 55 54 4c 45 52 2c ┆ af grafik extension til BUTLER,┆ 0x140…160 20 20 70 72 6f 67 72 61 6d 6e 61 76 6e 3a 20 44 45 4d 4f 45 58 54 f6 14 00 2b 71 f7 23 00 20 67 ┆ programnavn: DEMOEXT +q # g┆ 0x160…180 72 61 66 69 6b 20 65 78 74 65 6e 73 69 6f 6e 20 76 65 72 73 69 6f 6e 3a 20 67 72 61 66 69 6b 2d ┆rafik extension version: grafik-┆ 0x180…1a0 62 f6 1e 00 1f 71 f7 17 00 20 64 61 74 6f 3a 20 33 2e 20 64 65 63 65 6d 62 65 72 20 31 39 38 34 ┆b q dato: 3. december 1984┆ 0x1a0…1c0 f6 28 00 08 71 f7 00 00 f6 32 00 25 71 f7 1d 00 20 70 72 6f 6a 65 6b 74 20 45 44 42 20 69 20 75 ┆ ( q 2 %q projekt EDB i u┆ 0x1c0…1e0 6e 64 65 72 76 69 73 6e 69 6e 67 65 6e f6 3c 00 18 71 f7 10 00 20 73 6b 6f 6c 65 62 61 6b 6b 65 ┆ndervisningen < q skolebakke┆ 0x1e0…200 6e 20 31 37 33 f6 46 00 17 71 f7 0f 00 20 36 37 30 35 20 65 73 62 6a 65 72 67 20 7c f6 50 00 19 ┆n 173 F q 6705 esbjerg ø P ┆ 0x200…220 71 f7 11 00 20 74 6c 66 3a 20 30 35 20 31 34 20 34 34 20 35 35 f6 5a 00 08 71 f7 00 00 f6 64 00 ┆q tlf: 05 14 44 55 Z q d ┆ 0x220…240 90 71 f7 88 00 20 4c 69 6e 69 65 6e 65 20 20 31 32 30 2c 31 34 30 2c 31 36 30 2c 20 6f 67 20 31 ┆ q Liniene 120,140,160, og 1┆ 0x240…260 38 30 20 6b 61 6e 20 6d 65 64 20 45 44 49 54 20 7b 6e 64 72 65 73 20 66 72 61 20 6b 6f 6d 6d 65 ┆80 kan med EDIT ændres fra komme┆ 0x260…280 6e 74 61 72 65 72 20 74 69 6c 20 73 6b 7b 72 6d 6b 6f 70 69 20 6f 72 64 72 65 72 2c 20 76 65 64 ┆ntarer til skærmkopi ordrer, ved┆ 0x280…2a0 20 61 74 20 66 6a 65 72 6e 65 20 64 65 20 74 6f 20 2f 2f 20 6c 69 67 65 20 65 66 74 65 72 20 6c ┆ at fjerne de to // lige efter l┆ 0x2a0…2c0 69 6e 69 65 6e 75 6d 6d 65 72 65 74 2e f6 6e 00 0a 92 f8 35 00 39 2b f6 78 00 23 71 f7 1b 00 20 ┆inienummeret. n 5 9+ x #q ┆ 0x2c0…2e0 50 52 49 4e 54 20 43 48 52 24 28 32 37 29 2c 22 48 22 2c 43 48 52 24 28 30 29 f6 82 00 0a 92 f8 ┆PRINT CHR$(27),"H",CHR$(0) ┆ 0x2e0…300 35 01 39 2b f6 8c 00 23 71 f7 1b 00 20 50 52 49 4e 54 20 43 48 52 24 28 32 37 29 2c 22 48 22 2c ┆5 9+ #q PRINT CHR$(27),"H",┆ 0x300…320 43 48 52 24 28 30 29 f6 96 00 0a 92 f8 35 02 39 2b f6 a0 00 23 71 f7 1b 00 20 50 52 49 4e 54 20 ┆CHR$(0) 5 9+ #q PRINT ┆ 0x320…340 43 48 52 24 28 32 37 29 2c 22 48 22 2c 43 48 52 24 28 30 29 f6 aa 00 0a 92 f8 35 03 39 2b f6 b4 ┆CHR$(27),"H",CHR$(0) 5 9+ ┆ 0x340…360 00 23 71 f7 1b 00 20 50 52 49 4e 54 20 43 48 52 24 28 32 37 29 2c 22 48 22 2c 43 48 52 24 28 30 ┆ #q PRINT CHR$(27),"H",CHR$(0┆ 0x360…380 29 f6 be 00 08 71 f7 00 00 f6 c8 00 20 8d f7 18 00 20 73 6c 75 74 20 70 7d 20 68 6f 76 65 64 70 ┆) q slut på hovedp┆ 0x380…3a0 72 6f 67 72 61 6d 6d 65 74 f6 d2 00 08 71 f7 00 00 f6 dc 00 0e 74 97 b8 00 00 00 00 ff 04 e0 f6 ┆rogrammet q t ┆ 0x3a0…3c0 e6 00 1d 8b 51 b8 00 ff 05 e7 f8 47 00 00 2b db f8 47 ef 00 2b dd f8 47 02 00 2b d9 f6 f0 00 15 ┆ Q G + G + G + ┆ 0x3c0…3e0 b0 f8 32 05 39 47 02 00 5f 2d 32 05 39 2d 44 0a 2b f6 fa 00 0a 8c 1f b8 00 ff 05 f6 04 01 1d 8b ┆ 2 9G _-2 9-D + ┆ 0x3e0…400 8d b8 00 ff 05 e7 f8 47 01 00 2b db f8 47 ef 00 2b dd f8 47 02 00 2b d9 f6 0e 01 15 b0 f8 32 05 ┆ G + G + G + 2 ┆ 0x400…420 39 47 02 00 5f 2d 32 05 39 2d 44 0a 2b f6 18 01 0a 8c 5b b8 00 ff 05 f6 22 01 07 75 ff 04 f6 2c ┆9G _-2 9-D + Æ " u ,┆ 0x420…440 01 08 71 f7 00 00 f6 36 01 0e 74 2e b9 11 b8 00 00 ff 06 e0 f6 40 01 1e 8b e7 b8 00 ff 05 e7 f8 ┆ q 6 t. @ ┆ 0x440…460 47 ef 00 2b db f8 47 00 00 2b dd f8 47 02 00 60 2b d9 f6 4a 01 15 b0 f8 32 05 39 47 02 00 5f 2d ┆G + G + G `+ J 2 9G _-┆ 0x460…480 32 05 39 2d 44 0b 2b f6 54 01 0a 8c b4 b8 00 ff 05 f6 5e 01 1e 8b 24 b9 00 ff 05 e7 f8 47 ee 00 ┆2 9-D + T ^ $ G ┆ 0x480…4a0 2b db f8 47 00 00 2b dd f8 47 02 00 60 2b d9 f6 68 01 15 b0 f8 32 05 39 47 02 00 5f 2d 32 05 39 ┆+ G + G `+ h 2 9G _-2 9┆ 0x4a0…4c0 2d 44 0b 2b f6 72 01 0a 8c f1 b8 00 ff 05 f6 7c 01 07 75 ff 06 f6 86 01 08 71 f7 00 00 f6 90 01 ┆-D + r ø u q ┆ 0x4c0…4e0 12 74 e7 b9 a6 b8 00 00 ff 07 4a ff 08 4b e0 f6 a4 01 17 8b 90 b9 00 ff 05 e7 f8 47 00 00 2b db ┆ t J K G + ┆ 0x4e0…500 f8 47 64 00 2b d9 f6 a9 01 11 b0 f8 32 08 39 2d 47 64 00 2d 44 08 2b f6 ae 01 19 b0 f8 32 08 39 ┆ Gd + 2 9-Gd -D + 2 9┆ 0x500…520 47 64 00 63 2d 47 64 00 32 05 39 63 2d 44 06 2b f6 b8 01 0a 8c 4f b9 00 ff 05 f6 c2 01 19 8b dd ┆Gd c-Gd 2 9c-D + O ┆ 0x520…540 b9 00 ff 05 e7 f8 47 01 00 60 2b dc f8 47 64 00 60 2b d9 f6 c7 01 11 b0 f8 32 08 39 2d 47 64 00 ┆ G `+ Gd `+ 2 9-Gd ┆ 0x540…560 2d 44 08 2b f6 cc 01 19 b0 f8 32 08 39 47 64 00 63 2d 47 64 00 32 05 39 63 2d 44 06 2b f6 d6 01 ┆-D + 2 9Gd c-Gd 2 9c-D + ┆ 0x560…580 0a 8c 9a b9 00 ff 05 f6 e0 01 07 75 ff 07 f6 ea 01 08 71 f7 00 00 f6 f4 01 12 74 06 bb 3d b9 00 ┆ u q t = ┆ 0x580…5a0 00 ff 09 4a ff 08 4b e0 f6 fe 01 1a a2 f8 31 0a 2b e7 f8 47 32 00 2b e3 f8 31 0b 2b e7 f8 47 32 ┆ J K 1 + G2 + 1 + G2┆ 0x5a0…5c0 00 2b f6 08 02 11 b0 f8 32 08 39 2d 47 00 00 2d 44 08 2b f6 12 02 05 7c f6 1c 02 16 b0 f8 47 00 ┆ + 2 9-G -D + ø G ┆ 0x5c0…5e0 00 2d 32 0b 39 47 03 00 2d 2c 4f 44 07 2b f6 26 02 12 b0 f8 32 0a 39 60 2d 32 0b 39 2d 44 05 2b ┆ -2 9G -,OD + & 2 9`-2 9-D +┆ 0x5e0…600 f6 3a 02 16 b0 f8 47 02 00 32 0a 39 4b 5f 2d 47 00 00 2d 44 05 2b f6 4e 02 13 b0 f8 32 0a 39 60 ┆ : G 2 9K_-G -D + N 2 9`┆ 0x600…620 2d 32 0b 39 60 2d 44 05 2b f6 62 02 1a a2 f8 31 0b 2b e9 f8 47 02 00 2b e3 f8 31 0a 2b e9 f8 47 ┆-2 9`-D + b 1 + G + 1 + G┆ 0x620…640 02 00 2b f6 6c 02 18 7d 33 ba f8 32 0b 39 47 00 00 65 32 0a 39 47 00 00 65 5c 2b f6 76 02 07 75 ┆ + l å3 2 9G e2 9G eØ+ v u┆ 0x640…660 ff 09 f6 80 02 08 71 f7 00 00 f6 8a 02 0e 74 88 bc f6 b9 00 00 ff 01 e0 f6 94 02 0e 73 ff 0c da ┆ q t s ┆ 0x660…680 f8 47 08 00 4b 2b f6 9e 02 05 a6 f6 a8 02 10 a7 f8 47 01 00 2b e1 f8 47 01 00 2b f6 b2 02 1e a4 ┆ G K+ G + G + ┆ 0x680…6a0 f8 45 12 00 6d 6f 76 65 74 6f 2f 64 72 61 77 74 6f 20 74 65 73 74 2b f5 04 f6 bc 02 17 a2 f8 31 ┆ E moveto/drawto test+ 1┆ 0x6a0…6c0 0c 2b e7 f8 45 08 00 30 30 30 30 30 30 30 30 2b f6 c6 02 17 8b 7e bc 00 ff 0d e7 f8 47 01 00 2b ┆ + E 00000000+ ü G +┆ 0x6c0…6e0 db f8 47 05 00 2b d9 f6 d0 02 11 98 ba bb f8 32 0d 39 47 05 00 69 2b d8 f6 da 02 17 a2 f8 31 0c ┆ G + 2 9G i+ 1 ┆ 0x6e0…700 2b e7 f8 45 08 00 31 31 31 31 31 31 31 31 2b f6 e4 02 07 7a e3 bb f6 ee 02 22 a2 f8 32 0c 47 08 ┆+ E 11111111+ z " 2 G ┆ 0x700…720 00 32 0d 39 47 01 00 64 4b 47 02 00 5f 64 36 02 2b e7 f8 45 01 00 31 2b f6 f8 02 05 7b f6 02 03 ┆ 2 9G dKG _d6 + E 1+ æ ┆ 0x720…740 0e b0 f8 32 0c 39 14 2d 44 02 2b f6 0c 03 10 a7 f8 47 01 00 2b e1 f8 47 01 00 2b f6 16 03 60 a4 ┆ 2 9 -D + G + G + ` ┆ 0x740…760 f8 45 24 00 6d 6f 76 65 74 6f 2f 64 72 61 77 74 6f 20 74 65 73 74 20 2d 20 6d 61 73 6b 65 6e 20 ┆ E$ moveto/drawto test - masken ┆ 0x760…780 73 61 74 20 74 69 6c 20 2b f5 04 e2 f8 32 0c 39 2b f5 04 e2 f8 45 17 00 20 73 76 61 72 65 6e 64 ┆sat til + 2 9+ E svarend┆ 0x780…7a0 65 20 74 69 6c 3a 20 53 45 54 4d 41 53 4b 20 2b f5 04 e2 f8 32 0c 39 14 2b f5 02 f6 20 03 18 92 ┆e til: SETMASK + 2 9 + ┆ 0x7a0…7c0 f8 35 07 47 64 00 32 0d 39 47 01 00 64 4b 5f 36 02 39 2b f6 2a 03 0a 8c 7b bb 00 ff 0d f6 34 03 ┆ 5 Gd 2 9G dK_6 9+ * æ 4 ┆ 0x7c0…7e0 07 75 ff 01 f6 3e 03 08 71 f7 00 00 f6 48 03 0e 74 08 bd 15 bb 00 00 ff 02 e0 f6 52 03 05 a6 f6 ┆ u > q H t R ┆ 0x7e0…800 5c 03 10 a7 f8 47 01 00 2b e1 f8 47 01 00 2b f6 66 03 1a a4 f8 45 0e 00 6d 6f 76 65 2f 64 72 61 ┆Ø G + G + f E move/dra┆ 0x800…820 77 20 74 65 73 74 2b f5 04 f6 70 03 17 8b fe bc 00 ff 0d e7 f8 47 01 00 2b db f8 47 05 00 2b d9 ┆w test+ p G + G + ┆ 0x820…840 f6 7a 03 13 92 f8 35 09 32 0d 39 47 64 00 5f 36 02 39 2b f6 84 03 0a 8c d4 bc 00 ff 0d f6 8e 03 ┆ z 5 2 9Gd _6 9+ ┆ 0x840…860 07 75 ff 02 f6 98 03 08 71 f7 00 00 f6 a2 03 0e 74 43 be 97 bc 00 00 ff 03 e0 f6 ac 03 05 a6 f6 ┆ u q tC ┆ 0x860…880 b6 03 10 a7 f8 47 01 00 2b e1 f8 47 01 00 2b f6 c0 03 3e a4 f8 45 32 00 50 75 6e 6b 74 65 72 20 ┆ G + G + > E2 Punkter ┆ 0x880…8a0 70 7d 20 53 49 4e 55 53 20 6b 75 72 76 65 72 20 66 6f 72 62 75 6e 64 65 74 20 6d 65 64 20 72 65 ┆på SINUS kurver forbundet med re┆ 0x8a0…8c0 74 74 65 20 6c 69 6e 69 65 72 2b f5 04 f6 ca 03 0d b0 f8 47 55 00 2d 44 02 2b f6 d4 03 17 8b 39 ┆tte linier+ GU -D + 9┆ 0x8c0…8e0 be 00 ff 0d e7 f8 47 01 00 2b db f8 47 0a 00 2b d9 f6 de 03 13 a2 f8 31 0e 2b e7 f8 47 0a 00 32 ┆ G + G + 1 + G 2┆ 0x8e0…900 0d 39 5f 2b f6 e8 03 11 b0 f8 47 00 00 2d 32 0e 39 2d 44 08 2b f6 f2 03 27 8b 2f be 01 ff 0f e7 ┆ 9_+ G -2 9-D + ' / ┆ 0x900…920 f8 47 00 00 2d 2b db f8 47 02 00 46 49 0f d0 82 2c 4e 2b dd f8 46 4c cc cd 7d 2b d9 f6 fc 03 20 ┆ G -+ G FI ,N+ FL å+ ┆ 0x920…940 a2 f8 31 10 2b e7 f8 32 0e 39 47 04 00 32 0f 39 2c 4e 02 47 01 00 2d 52 4b 2c 4e 2b f6 06 04 14 ┆ 1 + 2 9G 2 9,N G -RK,N+ ┆ 0x940…960 b0 f8 32 0f 39 47 64 00 2d 4e 32 10 39 44 06 2b f6 10 04 14 b0 f8 32 0f 39 47 64 00 2d 4e 32 10 ┆ 2 9Gd -N2 9D + 2 9Gd -N2 ┆ 0x960…980 39 44 08 2b f6 1a 04 0a 8c c0 bd 01 ff 0f f6 24 04 0a 8c 85 bd 00 ff 0d f6 2e 04 07 75 ff 03 f6 ┆9D + $ . u ┆ 0x980…9a0 38 04 08 71 f7 00 00 f6 42 04 0e 74 9f be 17 bd 00 00 ff 00 e0 f6 4c 04 05 a6 f6 56 04 1c a4 f8 ┆8 q B t L V ┆ 0x9a0…9c0 45 10 00 70 6c 6f 74 2f 75 6e 70 6c 6f 74 20 74 65 73 74 2b f5 04 f6 60 04 0a 92 f8 35 04 39 2b ┆E plot/unplot test+ ` 5 9+┆ 0x9c0…9e0 f6 6a 04 0a 92 f8 35 06 39 2b f6 74 04 0a 92 f8 35 04 39 2b f6 7e 04 07 75 ff 00 f6 88 04 08 71 ┆ j 5 9+ t 5 9+ ü u q┆ 0x9e0…a00 f7 00 00 f6 92 04 3d 71 f7 35 00 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 20 20 73 6c 75 ┆ =q 5 --------------- slu┆ 0xa00…a20 74 20 70 7d 20 70 72 6f 76 65 64 75 72 65 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆t på provedure -----------------┆ 0xa20…a40 f6 10 27 00 8d c6 00 03 03 03 03 03 02 03 03 02 03 02 02 04 02 02 03 03 01 59 01 58 03 41 4d 50 ┆ ' Y X AMP┆ 0xa40…a60 01 50 04 42 59 54 45 02 44 59 02 44 58 0e 4d 4f 56 45 5f 44 52 41 57 5f 54 45 53 54 07 53 54 41 ┆ P BYTE DY DX MOVE_DRAW_TEST STA┆ 0xa60…a80 52 54 5f 58 12 4d 4f 56 45 54 4f 5f 44 52 41 57 54 4f 5f 54 45 53 54 0b 55 4e 50 4c 4f 54 5f 54 ┆RT_X MOVETO_DRAWTO_TEST UNPLOT_T┆ 0xa80…aa0 45 53 54 01 49 09 50 4c 4f 54 5f 54 45 53 54 18 56 49 53 5f 4d 4f 56 45 5f 44 52 41 57 5f 54 45 ┆EST I PLOT_TEST VIS_MOVE_DRAW_TE┆ 0xaa0…ac0 53 54 5f 53 49 4e 55 53 18 56 49 53 5f 4d 4f 56 45 5f 44 52 41 57 5f 54 45 53 54 5f 56 49 46 54 ┆ST_SINUS VIS_MOVE_DRAW_TEST_VIFT┆ 0xac0…ae0 45 16 56 49 53 5f 4d 4f 56 45 54 4f 5f 44 52 41 57 54 4f 5f 54 45 53 54 14 56 49 53 5f 50 4c 4f ┆E VIS_MOVETO_DRAWTO_TEST VIS_PLO┆ 0xae0…b00 54 5f 55 4e 50 4c 4f 54 5f 54 45 53 54 52 41 57 54 4f 5f 54 45 53 54 0b 55 4e 50 4c 4f 54 5f 6d ┆T_UNPLOT_TESTRAWTO_TEST UNPLOT_m┆