|
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: 2944 (0xb80)
Names: »ener«
└─⟦034458d74⟧ Bits:30003043 Aalborg skolevæsen, blandede programeksempler på Piccolo
└─ ⟦this⟧ »ener«
0x000…020 09 81 c2 dd 73 21 d3 05 8d 05 2f 32 2f 65 6e 65 72 20 20 20 20 20 20 20 20 20 0a 00 96 04 c1 ff ┆ s! /2/ener ┆
0x020…040 01 00 14 00 b1 03 01 00 1e 00 67 0f 7f 8a 04 01 ff df 2d 2c fc af 01 28 00 00 00 00 00 83 04 01 ┆ g -, ( ┆
0x040…060 fb df 2d 00 01 00 46 00 86 21 fc af 01 20 00 00 00 00 00 82 55 00 07 3b 7f 89 55 00 07 3b fc af ┆ - F ! U ; U ; ┆
0x060…080 06 60 00 00 00 00 00 82 55 00 07 3b fc af 01 07 00 00 00 00 00 83 55 00 07 3b fc bf 06 00 45 4e ┆ ` U ; U ; EN┆
0x080…0a0 45 52 45 4e 07 00 01 00 50 00 83 04 00 00 01 00 5a 00 86 17 7f 89 55 00 07 3b fc af 01 20 00 00 ┆EREN P Z U ; ┆
0x0a0…0c0 00 00 00 83 55 00 07 3b fc af 01 09 00 00 00 00 00 83 55 00 07 3b 7e 8c 55 00 07 3b 01 00 64 00 ┆ U ; U ;ü U ; d ┆
0x0c0…0e0 87 15 f2 bf 1a 00 5c 6e 73 6b 65 72 20 64 75 20 61 74 20 73 65 20 72 65 67 6c 65 72 6e 65 3f 20 ┆ Ønsker du at se reglerne? ┆
0x0e0…100 12 3a ff df 05 00 01 00 6e 00 3e 0f ff df fe bf 02 00 4a 41 19 00 2d 71 d1 00 ff df fe bf 02 00 ┆ : n > JA -q ┆
0x100…120 6a 61 1e 00 01 00 78 00 3e 11 ff df fd bf 03 00 4e 45 4a 00 19 00 2d 71 d1 00 ff df fd bf 03 00 ┆ja x > NEJ -q ┆
0x120…140 6e 65 6a 00 1e 00 01 00 82 00 84 11 66 74 ff df fe bf 02 00 6a 61 19 00 ff df fd bf 03 00 6e 65 ┆nej ft ja ne┆
0x140…160 6a 00 19 00 38 00 2d 0a 01 00 8c 00 3f 0b 00 00 7c 77 ff df fe bf 02 00 6a 61 19 00 2d 72 01 00 ┆j 8 - ? øw ja -r ┆
0x160…180 96 00 86 0a fc af 01 20 00 00 00 00 00 82 55 00 07 00 01 00 a0 00 86 04 08 00 01 00 aa 00 86 25 ┆ U %┆
0x180…1a0 e0 bf 3d 00 20 20 20 20 20 20 20 20 20 20 44 65 74 74 65 20 65 72 20 65 74 20 74 65 72 6e 69 6e ┆ = Dette er et ternin┆
0x1a0…1c0 67 65 73 70 69 6c 20 6d 65 6c 6c 65 6d 20 64 69 67 20 6f 67 20 6d 69 67 20 28 52 43 37 30 30 29 ┆gespil mellem dig og mig (RC700)┆
0x1c0…1e0 2e 00 07 00 01 00 b4 00 86 04 08 00 01 00 be 00 86 1c e9 bf 2c 00 20 20 20 20 20 20 20 20 20 20 ┆. , ┆
0x1e0…200 56 69 20 73 70 69 6c 6c 65 72 20 74 69 6c 20 31 30 30 20 6d 65 64 20 65 6e 20 74 65 72 6e 69 6e ┆Vi spiller til 100 med en ternin┆
0x200…220 67 2e 07 00 01 00 c8 00 86 04 08 00 01 00 d2 00 86 23 e2 bf 3a 00 20 20 20 20 20 20 20 20 20 20 ┆g. # : ┆
0x220…240 49 20 68 76 65 72 20 6f 6d 67 61 6e 67 20 6b 61 6e 20 6d 61 6e 20 73 6c 7d 20 73 7d 20 6d 61 6e ┆I hver omgang kan man slå så man┆
0x240…260 67 65 20 73 6c 61 67 20 6d 61 6e 20 76 69 6c 2c 07 00 01 00 dc 00 86 04 08 00 01 00 e6 00 86 25 ┆ge slag man vil, %┆
0x260…280 e0 bf 3d 00 20 20 20 20 20 20 20 20 20 20 6d 65 6e 20 73 6c 7d 72 20 6d 61 6e 20 65 6e 20 65 6e ┆ = men slår man en en┆
0x280…2a0 65 72 2c 20 66 7d 72 20 6d 61 6e 20 30 20 70 6f 69 6e 74 73 20 66 6f 72 20 6f 6d 67 61 6e 67 65 ┆er, får man 0 points for omgange┆
0x2a0…2c0 6e 00 07 00 01 00 f0 00 86 04 08 00 01 00 fa 00 86 16 ef bf 20 00 20 20 20 20 20 20 20 20 20 20 ┆n ┆
0x2c0…2e0 6f 67 20 6d 61 6e 20 6d 69 73 74 65 72 20 73 69 6e 20 74 75 72 2e 07 00 01 00 04 01 86 04 08 00 ┆og man mister sin tur. ┆
0x2e0…300 01 00 0e 01 86 22 e3 bf 38 00 20 20 20 20 20 20 20 20 20 20 53 6b 72 69 76 20 31 20 6e 7d 72 20 ┆ " 8 Skriv 1 når ┆
0x300…320 64 75 20 76 69 6c 20 73 6c 7d 20 6f 67 20 30 20 6e 7d 72 20 64 75 20 76 69 6c 20 73 74 6f 70 70 ┆du vil slå og 0 når du vil stopp┆
0x320…340 65 2e 07 00 01 00 18 01 86 04 08 00 01 00 22 01 86 22 e3 bf 37 00 20 20 20 20 20 20 20 20 20 20 ┆e. " " 7 ┆
0x340…360 54 72 79 6b 20 70 7d 20 27 6d 65 6c 6c 65 6d 72 75 6e 27 20 6e 7d 72 20 64 75 20 68 61 72 20 6c ┆Tryk på 'mellemrun' når du har l┆
0x360…380 7b 73 74 20 72 65 67 6c 65 72 6e 65 21 00 07 00 01 00 2c 01 83 04 22 75 01 00 36 01 d1 07 f6 ff ┆æst reglerne! , "u 6 ┆
0x380…3a0 79 00 56 00 1d 00 01 00 40 01 84 0c 50 77 f6 ff fc af 03 20 00 00 00 00 00 82 28 00 2d 0a 01 00 ┆y V @ Pw ( - ┆
0x3a0…3c0 4a 01 80 03 01 00 54 01 83 04 00 00 01 00 5e 01 86 0a fc af 01 20 00 00 00 00 00 82 55 00 07 00 ┆J T ^ U ┆
0x3c0…3e0 01 00 68 01 86 04 08 00 01 00 90 01 86 04 08 00 01 00 9a 01 86 0c f9 bf 0c 00 6a 65 67 20 62 65 ┆ h jeg be┆
0x3e0…400 67 79 6e 64 65 72 07 00 01 00 a4 01 86 04 08 00 01 00 ae 01 d1 1e f2 ff 00 90 1d 1b ee ff 00 90 ┆gynder ┆
0x400…420 1d 1b ea ff 00 90 1d 1b e6 ff 00 90 1d 1b e2 ff 00 90 1d 1b de ff 7f 8b 1d 1b da ff 7d 8e 1d 1b ┆ å ┆
0x420…440 ce ff 00 90 1d 1b ca ff 00 90 1d 00 01 00 b8 01 83 04 7e 77 01 00 c2 01 83 04 06 78 01 00 cc 01 ┆ üw x ┆
0x440…460 d1 0b d6 ff 4a 00 7f 89 21 00 7f 8e 24 00 4c 00 1d 00 01 00 d6 01 3f 09 0e 78 8a 78 d6 ff 7f 8e ┆ J ! $ L ? x x ┆
0x460…480 28 00 2d 72 01 00 e0 01 86 1d e8 bf 2d 00 49 6e 67 65 6e 20 70 6f 69 6e 74 20 69 20 64 65 6e 6e ┆( -r - Ingen point i denn┆
0x480…4a0 65 20 6f 6d 67 61 6e 67 2c 20 6a 65 67 20 73 6c 6f 67 20 65 6e 20 65 6e 65 72 2e 00 07 00 01 00 ┆e omgang, jeg slog en ener. ┆
0x4a0…4c0 ea 01 d1 06 f2 ff 00 90 1d 00 01 00 f4 01 5d 04 d6 78 01 00 fe 01 d1 08 f2 ff f2 ff d6 ff 24 00 ┆ Å x $ ┆
0x4c0…4e0 1d 00 01 00 08 02 86 13 fc bf 05 00 73 6c 61 67 3d 00 07 3b d6 ff 07 3b fc bf 05 00 20 73 75 6d ┆ slag= ; ; sum┆
0x4e0…500 3d 00 07 3b f2 ff 07 00 01 00 12 02 d1 08 e2 ff e2 ff 7f 8e 24 00 1d 00 01 00 1c 02 80 03 01 00 ┆= ; $ ┆
0x500…520 26 02 84 18 14 78 de ff e2 ff 28 00 f2 ff da ff 29 00 38 00 d6 ff 7f 8e 28 00 38 00 f2 ff fc af ┆& x ( ) 8 ( 8 ┆
0x520…540 01 20 00 00 00 00 00 82 29 00 38 00 2d 0a 01 00 30 02 d1 0b ee ff ee ff f2 ff 24 00 1d 1b f2 ff ┆ ) 8 - 0 $ ┆
0x540…560 00 90 1d 00 01 00 3a 02 86 04 08 00 01 00 44 02 86 22 ee bf 22 00 20 20 20 20 20 20 20 20 20 20 ┆ : D " " ┆
0x560…580 20 20 20 20 20 20 73 74 69 6c 6c 69 6e 67 65 6e 20 65 72 20 6d 69 67 3a 07 3b ee ff 07 3b fb bf ┆ stillingen er mig: ; ; ┆
0x580…5a0 07 00 20 20 20 64 69 67 3a 00 07 3b e6 ff 07 00 01 00 4e 02 86 04 08 00 01 00 58 02 3f 09 06 78 ┆ dig: ; N X ? x┆
0x5a0…5c0 f4 79 ee ff 7d 8e 29 00 2d 72 01 00 62 02 86 19 ec bf 26 00 53 69 64 73 74 65 20 6f 6d 67 61 6e ┆ y å ) -r b & Sidste omgan┆
0x5c0…5e0 67 20 74 69 6c 20 64 69 67 20 64 61 20 6a 65 67 20 62 65 67 79 6e 64 74 65 2e 07 00 01 00 6c 02 ┆g til dig da jeg begyndte. l ┆
0x5e0…600 86 1d f4 bf 16 00 48 76 69 73 20 64 75 20 6b 61 6e 20 6b 6f 6d 6d 65 20 6f 76 65 72 07 3b ee ff ┆ Hvis du kan komme over ; ┆
0x600…620 07 3b f8 bf 0e 00 68 61 72 20 64 75 20 76 75 6e 64 65 74 2e 07 00 01 00 76 02 80 03 01 00 80 02 ┆ ; har du vundet. v ┆
0x620…640 86 0b fa bf 0a 00 44 69 6e 20 74 75 72 20 6e 75 07 00 01 00 8a 02 87 06 13 00 ff df 05 00 01 00 ┆ Din tur nu ┆
0x640…660 94 02 82 10 06 78 06 7b ff df ff bf 00 00 19 00 ff df fe bf 01 00 31 00 19 00 38 00 2d 3d 01 00 ┆ x æ 1 8 -= ┆
0x660…680 9e 02 d1 0b d2 ff 4a 00 7f 89 21 00 7f 8e 24 00 4c 00 1d 00 01 00 a8 02 3f 09 18 7a b4 7a d2 ff ┆ J ! $ L ? z z ┆
0x680…6a0 7f 8e 28 00 2d 72 01 00 b2 02 86 1c e9 bf 2c 00 49 6e 67 65 6e 20 70 6f 69 6e 74 20 69 20 64 65 ┆ ( -r , Ingen point i de┆
0x6a0…6c0 6e 6e 65 20 6f 6d 67 61 6e 67 2c 20 64 75 20 73 6c 6f 67 20 65 6e 20 65 6e 65 72 2e 07 00 01 00 ┆nne omgang, du slog en ener. ┆
0x6c0…6e0 bc 02 d1 0b ff df fe bf 01 00 61 00 1e 1b ea ff 00 90 1d 00 01 00 c6 02 5d 04 fe 7a 01 00 d0 02 ┆ a Å z ┆
0x6e0…700 d1 08 ea ff ea ff d2 ff 24 00 1d 00 01 00 da 02 86 14 fc bf 05 00 73 6c 61 67 3d 00 07 3b d2 ff ┆ $ slag= ; ┆
0x700…720 07 3b fb bf 07 00 20 20 20 73 75 6d 3d 00 07 3b ea ff 07 00 01 00 e4 02 87 06 13 00 ff df 05 00 ┆ ; sum= ; ┆
0x720…740 01 00 ee 02 80 03 01 00 f8 02 a1 04 16 7a 01 00 02 03 d1 08 e6 ff e6 ff ea ff 24 00 1d 00 01 00 ┆ z $ ┆
0x740…760 0c 03 d1 06 ea ff 00 90 1d 00 01 00 16 03 86 04 08 00 01 00 20 03 86 25 ea bf 29 00 20 20 20 20 ┆ % ) ┆
0x760…780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 69 6c 6c 69 6e 67 65 6e 20 65 72 20 ┆ stillingen er ┆
0x780…7a0 20 6d 69 67 3a 00 07 3b ee ff 07 3b fc bf 06 00 20 20 64 69 67 3a 07 3b e6 ff 07 00 01 00 2a 03 ┆ mig: ; ; dig: ; * ┆
0x7a0…7c0 86 04 08 00 01 00 34 03 3f 11 06 78 be 7b e6 ff fc af 08 50 00 00 00 00 00 82 27 00 ee ff 7e 86 ┆ 4 ? x æ P ' ü ┆
0x7c0…7e0 27 00 49 00 2d 72 01 00 3e 03 d1 0c de ff 7f 8a 1d 1b e2 ff 00 90 1d 1b da ff 7d 8e 1d 00 01 00 ┆' I -r > å ┆
0x7e0…800 48 03 5d 04 e8 7b 01 00 52 03 d1 12 de ff 7e 8d 1d 1b e2 ff 00 90 1d 1b da ff fc af 01 05 00 00 ┆H Å æ R ü ┆
0x800…820 00 00 00 83 ee ff 23 00 1d 00 01 00 5c 03 80 03 01 00 66 03 84 0c 0c 78 ee ff 7d 8e 29 00 e6 ff ┆ # Ø f x å ) ┆
0x820…840 7d 8e 29 00 38 00 2d 0a 01 00 70 03 3f 09 7e 77 54 7c ee ff e6 ff 2a 00 2d 72 01 00 7a 03 86 10 ┆å ) 8 - p ? üwTø * -r z ┆
0x840…860 f5 bf 13 00 6a 65 67 20 76 61 6e 64 74 20 21 20 21 20 21 20 21 20 21 00 07 00 01 00 84 03 d1 0d ┆ jeg vandt ! ! ! ! ! ┆
0x860…880 ce ff ce ff 7f 8e 24 00 1d 1b ca ff ca ff 7f 8e 24 00 1d 00 01 00 8e 03 5d 04 c6 7c 01 00 98 03 ┆ $ $ Å ø ┆
0x880…8a0 3f 09 02 7c 8c 7c ee ff e6 ff 28 00 2d 72 01 00 a2 03 86 0f f6 bf 12 00 69 6e 67 65 6e 20 76 61 ┆? ø ø ( -r ingen va┆
0x8a0…8c0 6e 64 74 20 2d 20 6c 69 67 65 07 00 01 00 ac 03 5d 04 b0 7c 01 00 b6 03 86 0f f6 bf 12 00 44 75 ┆ndt - lige Å ø Du┆
0x8c0…8e0 20 76 61 6e 64 74 20 21 20 21 20 21 20 21 20 21 07 00 01 00 c0 03 80 03 01 00 ca 03 d1 08 ce ff ┆ vandt ! ! ! ! ! ┆
0x8e0…900 ce ff 7f 8e 24 00 1d 00 01 00 d4 03 80 03 01 00 de 03 83 04 7e 77 01 00 e8 03 87 12 f5 bf 13 00 ┆ $ üw ┆
0x900…920 56 69 6c 20 64 75 20 70 72 7c 76 65 20 69 67 65 6e 3f 20 00 12 3a ff df 05 00 01 00 f2 03 3e 0f ┆Vil du prøve igen? : > ┆
0x920…940 ff df fe bf 02 00 4a 41 19 00 2d 71 d1 00 ff df fe bf 02 00 6a 61 1e 00 01 00 fc 03 3e 11 ff df ┆ JA -q ja > ┆
0x940…960 fd bf 03 00 4e 45 4a 00 19 00 2d 71 d1 00 ff df fd bf 03 00 6e 65 6a 00 1e 00 01 00 06 04 84 11 ┆ NEJ -q nej ┆
0x960…980 ce 7c ff df fe bf 02 00 6a 61 19 00 ff df fd bf 03 00 6e 65 6a 00 19 00 38 00 2d 0a 01 00 10 04 ┆ ø ja nej 8 - ┆
0x980…9a0 84 0a 84 77 ff df fe bf 02 00 6a 61 16 00 2d 0a 01 00 1a 04 65 05 c6 ff 2d 0d 01 00 24 04 63 07 ┆ w ja - e - $ c ┆
0x9a0…9c0 b8 7d 00 00 c6 ff 2d 00 01 00 2e 04 d3 0f 01 01 20 66 65 6a 6c 3e 20 6f 6e 20 65 73 63 20 65 78 ┆ å - . fejl> on esc ex┆
0x9c0…9e0 65 63 20 53 4c 55 54 20 56 04 8a 09 fc bf 05 00 6c 6f 67 6f 6e 00 2d 70 01 00 60 04 a3 04 c6 ff ┆ec SLUT V logon -p ` ┆
0x9e0…a00 01 00 ac 26 63 07 00 00 00 00 c1 ff 2d 7d 01 00 b6 26 61 08 00 00 00 00 00 90 77 00 2d 40 01 00 ┆ &c -å &a w -@ ┆
0xa00…a20 c0 26 62 06 00 00 7d 8e 2d 0b 01 00 c1 26 86 26 fc af 01 20 00 00 00 00 00 82 55 00 07 3b fc af ┆ &b å - & & U ; ┆
0xa20…a40 02 20 00 00 00 00 00 82 fc af 01 20 00 00 00 00 00 82 3a 02 07 3b f2 bf 1a 00 44 55 20 48 41 52 ┆ : ; DU HAR┆
0xa40…a60 20 53 54 41 4e 44 53 45 54 20 50 52 4f 47 52 41 4d 4d 45 54 07 3b 01 00 ca 26 8a 09 fc bf 05 00 ┆ STANDSET PROGRAMMET ; & ┆
0xa60…a80 6c 6f 67 6f 6e 00 2d 70 01 00 d4 26 a2 03 01 00 de 26 a3 04 c1 ff 01 00 10 27 d6 00 cc bb cc bb ┆logon -p & & ' ┆
0xa80…aa0 01 00 41 00 44 bb 44 bb 02 00 42 55 46 00 00 00 00 00 01 00 58 00 38 bb 38 bb 01 00 53 00 2c bb ┆ A D D BUF X 8 8 S , ┆
0xaa0…ac0 2c bb 01 00 50 00 20 bb 20 bb 01 00 4c 00 14 bb 14 bb 01 00 5a 00 08 bb 08 bb 01 00 4a 00 fc ba ┆, P L Z J ┆
0xac0…ae0 fc ba 01 00 4b 00 f0 ba f0 ba 01 00 4d 00 cc ba cc ba 01 00 42 00 c0 ba c0 ba 01 00 52 00 e4 ba ┆ K M B R ┆
0xae0…b00 e4 ba 01 00 57 00 d8 ba d8 ba 01 00 56 00 d9 bb d9 bb 02 00 53 4c 55 54 00 00 00 00 02 00 46 45 ┆ W V SLUT FE┆
0xb00…b20 4a 4c 00 00 00 00 00 00 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆JL ┆
0xb20…b40 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…]