SLAG 10
FILE INFORMATION
FILENAME(S): SLAG 10
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 19:36:55
APPEARS ON: 1 disk(s)
FILE HASH
0af6b039dbacd2ab8cbfcc6b75b175b7b3f8648aeb8badc856cdd53117594f9c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| AFTEN | SLAG 10 | PRG | Curtcool, Bo | 8 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 E8 03 8F 20 53 41 56 45 20 22 53 4C |....... SAVE "SL| 00000010: 41 47 20 31 30 22 2C 38 00 1E 08 1A 04 3A 00 2A |AG 10",8.....:.*| 00000020: 08 4C 04 4D 4F 24 B2 22 4D 22 00 4C 08 7E 04 44 |.L.MO$."M".L.~.D| 00000030: 41 B2 35 36 35 37 37 3A 46 4C 41 47 B2 35 36 35 |A.56577:FLAG.565| 00000040: 38 39 3A 44 49 52 B2 35 36 35 37 39 00 5E 08 B0 |89:DIR.56579.^..| 00000050: 04 53 45 4E B2 32 35 35 3A 4D 4F 44 B2 30 00 7E |.SEN.255:MOD.0.~| 00000060: 08 E2 04 8F 20 47 4F 54 4F 20 37 31 30 30 3A 52 |.... GOTO 7100:R| 00000070: 45 4D 20 53 45 4E 44 2F 4D 4F 44 54 41 47 00 84 |EM SEND/MODTAG..| 00000080: 08 14 05 3A 00 8F 08 46 05 99 20 22 93 22 3B 00 |...:...F.. ".";.| 00000090: A8 08 78 05 99 22 1D 1D 1D 1D 1D 1D 41 42 43 44 |..x.."......ABCD| 000000A0: 45 46 47 48 49 4A 22 3B 00 BF 08 AA 05 99 22 1D |EFGHIJ";......".| 000000B0: 1D 1D 1D 1D 41 42 43 44 45 46 47 48 49 4A 22 00 |....ABCDEFGHIJ".| 000000C0: CD 08 DC 05 81 20 58 B2 30 20 A4 20 39 00 DC 08 |..... X.0 . 9...| 000000D0: 0E 06 99 22 1D 1D 1D 1D 22 3B 58 3B 00 F2 08 40 |..."....";X;...@| 000000E0: 06 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 |.."............"| 000000F0: 3B 58 00 F8 08 72 06 82 00 FE 08 A4 06 3A 00 0F |;X...r.......:..| 00000100: 09 D6 06 86 20 53 55 25 28 31 2C 39 2C 39 29 00 |.... SU%(1,9,9).| 00000110: 19 09 08 07 42 49 25 B2 30 00 24 09 3A 07 89 20 |....BI%.0.$.:.. | 00000120: 32 32 30 30 00 2A 09 6C 07 3A 00 3C 09 9E 07 8F |2200.*.l.:.<....| 00000130: 20 54 41 53 54 20 2A 2A 2A 2A 2A 2A 00 42 09 D0 | TAST ******.B..| 00000140: 07 3A 00 5C 09 02 08 A1 20 54 24 20 3A 20 8B 20 |.:.\.... T$ : . | 00000150: 54 24 B2 22 22 20 89 20 32 30 35 30 00 62 09 34 |T$."" . 2050.b.4| 00000160: 08 8E 00 68 09 66 08 3A 00 7A 09 98 08 8F 20 53 |...h.f.:.z.... S| 00000170: 54 59 52 20 2A 2A 2A 2A 2A 2A 00 80 09 CA 08 3A |TYR ******.....:| 00000180: 00 9C 09 FC 08 8B 20 42 49 25 B2 30 20 A7 20 4C |...... BI%.0 . L| 00000190: 53 25 B2 30 20 3A 20 43 53 25 B2 35 00 B9 09 2E |S%.0 : CS%.5....| 000001A0: 09 8B 20 42 49 25 B2 31 20 A7 20 4C 53 25 B2 30 |.. BI%.1 . LS%.0| 000001B0: 20 3A 20 43 53 25 B2 32 30 00 D1 09 60 09 8D 20 | : CS%.20...`.. | 000001C0: 37 31 30 30 3A 8F 20 47 4F 53 55 42 20 31 39 35 |7100:. GOSUB 195| 000001D0: 30 00 DA 09 6A 09 A1 20 54 24 00 F2 09 74 09 8B |0...j.. T$...t..| 000001E0: 20 C3 28 49 4E 24 29 B1 30 20 A7 20 8D 20 38 30 | .(IN$).0 . . 80| 000001F0: 30 30 00 1C 0A 92 09 8B 20 54 24 B2 22 11 22 20 |00...... T$."." | 00000200: AF 20 4C 49 25 B3 39 20 A7 20 4C 49 25 B2 4C 49 |. LI%.9 . LI%.LI| 00000210: 25 AA 31 20 3A 20 89 20 32 36 35 30 00 46 0A C4 |%.1 : . 2650.F..| 00000220: 09 8B 20 54 24 B2 22 91 22 20 AF 20 4C 49 25 B1 |.. T$."." . LI%.| 00000230: 30 20 A7 20 4C 49 25 B2 4C 49 25 AB 31 20 3A 20 |0 . LI%.LI%.1 : | 00000240: 89 20 32 36 35 30 00 70 0A F6 09 8B 20 54 24 B2 |. 2650.p.... T$.| 00000250: 22 1D 22 20 AF 20 43 4F 25 B3 39 20 A7 20 43 4F |"." . CO%.9 . CO| 00000260: 25 B2 43 4F 25 AA 31 20 3A 20 89 20 32 36 35 30 |%.CO%.1 : . 2650| 00000270: 00 9A 0A 28 0A 8B 20 54 24 B2 22 9D 22 20 AF 20 |...(.. T$."." . | 00000280: 43 4F 25 B1 30 20 A7 20 43 4F 25 B2 43 4F 25 AB |CO%.0 . CO%.CO%.| 00000290: 31 20 3A 20 89 20 32 36 35 30 00 B8 0A 5A 0A 4C |1 : . 2650...Z.L| 000002A0: 41 25 B2 4C 53 25 AA 4C 49 25 20 3A 20 43 41 25 |A%.LS%.LI% : CA%| 000002B0: B2 43 53 25 AA 43 4F 25 00 D8 0A 8C 0A 8B 20 54 |.CS%.CO%...... T| 000002C0: 24 B2 22 46 22 20 A7 20 8D 20 33 37 30 30 20 3A |$."F" . . 3700 :| 000002D0: 20 8F 20 4D 41 45 52 4B 00 E3 0A BE 0A 8D 20 32 | . MAERK...... 2| 000002E0: 39 35 30 00 0E 0B F0 0A 8B 20 54 24 B2 22 53 22 |950...... T$."S"| 000002F0: 20 A7 20 42 49 25 B2 42 49 25 AA 31 20 3A 20 8B | . BI%.BI%.1 : .| 00000300: 20 42 49 25 B1 31 20 A7 20 42 49 25 B2 30 00 19 | BI%.1 . BI%.0..| 00000310: 0B 22 0B 89 20 32 33 30 30 00 1F 0B 54 0B 3A 00 |.".. 2300...T.:.| 00000320: 33 0B 86 0B 8F 20 43 55 52 53 4F 52 20 2A 2A 2A |3.... CURSOR ***| 00000330: 2A 2A 2A 00 39 0B B8 0B 3A 00 43 0B EA 0B 99 22 |***.9...:.C...."| 00000340: 13 22 3B 00 5E 0B 1C 0C 81 20 58 B2 30 20 A4 20 |.";.^.... X.0 . | 00000350: 4C 41 25 20 3A 20 99 22 11 22 3B 20 3A 82 00 79 |LA% : ."."; :..y| 00000360: 0B 4E 0C 81 20 58 B2 30 20 A4 20 53 4C 25 20 3A |.N.. X.0 . SL% :| 00000370: 20 99 22 1D 22 3B 20 3A 82 00 A5 0B 80 0C 8B 20 | ."."; :....... | 00000380: 53 55 25 28 42 49 25 2C 4C 49 25 2C 43 4F 25 29 |SU%(BI%,LI%,CO%)| 00000390: B2 31 20 A7 20 99 20 22 12 58 92 22 20 3A 20 89 |.1 . . ".X." : .| 000003A0: 20 33 33 30 30 00 C8 0B B2 0C 8B 20 53 55 25 28 | 3300...... SU%(| 000003B0: 42 49 25 2C 4C 49 25 2C 43 4F 25 29 B2 30 20 A7 |BI%,LI%,CO%).0 .| 000003C0: 20 99 20 22 12 20 92 22 00 D2 0B E4 0C 99 22 13 | . ". ."......".| 000003D0: 22 3B 00 ED 0B 16 0D 81 20 58 B2 30 20 A4 20 47 |";...... X.0 . G| 000003E0: 4C 25 20 3A 20 99 22 11 22 3B 20 3A 82 00 08 0C |L% : ."."; :....| 000003F0: 48 0D 81 20 58 B2 30 20 A4 20 47 41 25 20 3A 20 |H.. X.0 . GA% : | 00000400: 99 22 1D 22 3B 20 3A 82 00 32 0C 7A 0D 8B 20 53 |."."; :..2.z.. S| 00000410: 55 25 28 47 42 25 2C 47 49 25 2C 47 43 25 29 B2 |U%(GB%,GI%,GC%).| 00000420: 31 20 A7 20 99 20 22 58 22 20 3A 20 89 20 33 35 |1 . . "X" : . 35| 00000430: 35 30 00 53 0C AC 0D 8B 20 53 55 25 28 47 42 25 |50.S.... SU%(GB%| 00000440: 2C 47 49 25 2C 47 43 25 29 B2 30 20 A7 20 99 20 |,GI%,GC%).0 . . | 00000450: 22 20 22 00 7F 0C DE 0D 47 4C 25 B2 4C 41 25 3A |" ".....GL%.LA%:| 00000460: 47 41 25 B2 43 41 25 3A 47 42 25 B2 42 49 25 3A |GA%.CA%:GB%.BI%:| 00000470: 47 49 25 B2 4C 49 25 3A 47 43 25 B2 43 4F 25 00 |GI%.LI%:GC%.CO%.| 00000480: 85 0C 10 0E 8E 00 8B 0C 42 0E 3A 00 9D 0C 74 0E |........B.:...t.| 00000490: 8F 20 4D 41 45 52 4B 20 2A 2A 2A 2A 2A 00 A3 0C |. MAERK *****...| 000004A0: A6 0E 3A 00 CB 0C D8 0E 53 55 25 28 42 49 25 2C |..:.....SU%(BI%,| 000004B0: 4C 49 25 2C 43 4F 25 29 B2 53 55 25 28 42 49 25 |LI%,CO%).SU%(BI%| 000004C0: 2C 4C 49 25 2C 43 4F 25 29 AA 31 00 F9 0C 0A 0F |,LI%,CO%).1.....| 000004D0: 8B 20 53 55 25 28 42 49 25 2C 4C 49 25 2C 43 4F |. SU%(BI%,LI%,CO| 000004E0: 25 29 B1 31 20 A7 20 53 55 25 28 42 49 25 2C 4C |%).1 . SU%(BI%,L| 000004F0: 49 25 2C 43 4F 25 29 B2 30 00 FF 0C 3C 0F 8E 00 |I%,CO%).0...<...| 00000500: 05 0D 6E 0F 3A 00 23 0D A0 0F 8F 20 4B 4F 4D 55 |..n.:.#.... KOMU| 00000510: 4E 49 4B 41 54 49 4F 4E 53 44 45 4C 20 2A 2A 2A |NIKATIONSDEL ***| 00000520: 2A 2A 2A 00 29 0D D2 0F 3A 00 3E 0D 04 10 8F 20 |***.)...:.>.... | 00000530: 2A 2A 2A 46 4C 41 47 20 4D 4F 20 2A 2A 2A 00 44 |***FLAG MO ***.D| 00000540: 0D 36 10 3A 00 53 0D 68 10 46 41 B2 C2 28 46 4C |.6.:.S.h.FA..(FL| 00000550: 41 47 29 00 6D 0D 9A 10 8B 20 46 41 B2 31 36 A7 |AG).m.... FA.16.| 00000560: 20 4D 4F B2 AB 31 3A 89 20 34 33 35 30 00 76 0D | MO..1:. 4350.v.| 00000570: CC 10 4D 4F B2 30 00 7C 0D FE 10 8E 00 82 0D 30 |..MO.0.|.......0| 00000580: 11 3A 00 97 0D 62 11 8F 20 2A 2A 2A 50 4F 52 54 |.:...b.. ***PORT| 00000590: 20 55 44 20 2A 2A 2A 00 9D 0D 94 11 3A 00 AB 0D | UD ***.....:...| 000005A0: C6 11 97 20 44 49 52 2C 32 35 35 00 B1 0D F8 11 |... DIR,255.....| 000005B0: 8E 00 B7 0D 2A 12 3A 00 CD 0D 5C 12 8F 20 2A 2A |....*.:...\.. **| 000005C0: 2A 50 4F 52 54 20 49 4E 44 20 2A 2A 2A 00 D3 0D |*PORT IND ***...| 000005D0: 8E 12 3A 00 DF 0D C0 12 97 20 44 49 52 2C 30 00 |..:...... DIR,0.| 000005E0: E5 0D F2 12 8E 00 EB 0D 24 13 3A 00 FF 0D 56 13 |........$.:...V.| 000005F0: 8F 20 2A 2A 2A 4D 4F 44 54 41 47 20 2A 2A 2A 00 |. ***MODTAG ***.| 00000600: 05 0E 88 13 3A 00 2A 0E BA 13 54 45 24 B2 C7 28 |....:.*...TE$..(| 00000610: C2 28 44 41 29 29 20 3A 20 8B 20 54 45 24 B3 B1 |.(DA)) : . TE$..| 00000620: 22 5F 22 20 89 20 35 30 35 30 00 35 0E EC 13 49 |"_" . 5050.5...I| 00000630: 4E 24 B2 22 22 00 4E 0E 1E 14 8D 20 34 31 30 30 |N$."".N.... 4100| 00000640: 3A 8B 20 A8 20 4D 4F 20 89 20 35 31 35 30 00 5F |:. . MO . 5150._| 00000650: 0E 50 14 54 45 24 B2 C7 28 C2 28 44 41 29 29 00 |.P.TE$..(.(DA)).| 00000660: 77 0E 82 14 8B 20 54 45 24 B2 C7 28 32 35 34 29 |w.... TE$..(254)| 00000670: A7 20 89 35 34 30 30 00 87 0E B4 14 49 4E 24 B2 |. .5400.....IN$.| 00000680: 49 4E 24 AA 54 45 24 00 92 0E E6 14 89 20 35 31 |IN$.TE$...... 51| 00000690: 35 30 00 B9 0E 18 15 8B 20 C8 28 49 4E 24 2C 31 |50...... .(IN$,1| 000006A0: 29 B2 22 5F 22 A7 49 4E 24 B2 C9 28 49 4E 24 2C |)."_".IN$..(IN$,| 000006B0: C3 28 49 4E 24 29 AB 31 29 00 BF 0E 4A 15 8E 00 |.(IN$).1)...J...| 000006C0: C5 0E 7C 15 3A 00 D7 0E AE 15 8F 20 2A 2A 2A 53 |..|.:...... ***S| 000006D0: 45 4E 44 20 2A 2A 2A 00 DD 0E E0 15 3A 00 00 0F |END ***.....:...| 000006E0: 12 16 55 44 24 B2 22 5F 22 AA 55 44 24 AA C7 28 |..UD$."_".UD$..(| 000006F0: 32 35 34 29 3A 8D 20 34 34 35 30 3A 41 4E B2 31 |254):. 4450:AN.1| 00000700: 00 20 0F 44 16 97 20 44 41 2C C6 28 CA 28 55 44 |. .D.. DA,.(.(UD| 00000710: 24 2C 41 4E 2C 31 29 29 3A 41 4E B2 41 4E AA 31 |$,AN,1)):AN.AN.1| 00000720: 00 39 0F 76 16 8D 20 34 31 30 30 3A 8B 20 A8 20 |.9.v.. 4100:. . | 00000730: 4D 4F 20 89 20 35 37 35 30 00 53 0F A8 16 8B 20 |MO . 5750.S.... | 00000740: 41 4E B1 C3 28 55 44 24 29 A7 20 55 44 24 B2 22 |AN..(UD$). UD$."| 00000750: 22 3A 8E 00 5D 0F DA 16 89 35 37 30 30 00 63 0F |":..]....5700.c.| 00000760: 0C 17 3A 00 7E 0F 3E 17 8F 20 2A 2A 2A 20 48 4F |..:.~.>.. *** HO| 00000770: 56 45 44 50 52 4F 47 52 41 4D 20 2A 2A 2A 00 84 |VEDPROGRAM ***..| 00000780: 0F 70 17 3A 00 A4 0F A2 17 8F 20 47 4F 53 55 42 |.p.:...... GOSUB| 00000790: 20 31 34 30 30 3A 52 45 4D 20 53 45 4E 44 45 52 | 1400:REM SENDER| 000007A0: 4B 41 4C 44 00 AE 0F D4 17 99 22 93 22 3B 00 C0 |KALD......".";..| 000007B0: 0F 06 18 8D 20 34 31 30 30 3A 8F 20 46 4C 41 47 |.... 4100:. FLAG| 000007C0: 00 EF 0F 38 18 8B 20 4D 4F 20 A7 20 8D 20 34 39 |...8.. MO . . 49| 000007D0: 35 30 3A 99 22 11 11 11 11 11 11 11 11 11 11 11 |50:."...........| 000007E0: 11 22 3B 49 4E 24 3B 22 13 22 3B 55 41 24 3B 00 |.";IN$;".";UA$;.| 000007F0: 0E 10 6A 18 8B 20 54 45 24 B2 C7 28 32 35 34 29 |..j.. TE$..(254)| 00000800: A7 20 8D 20 35 35 35 30 3A 8D 34 37 30 30 00 17 |. . 5550:.4700..| 00000810: 10 9C 18 A1 20 54 24 00 36 10 CE 18 8B 20 54 24 |.... T$.6.... T$| 00000820: B2 C7 28 31 33 33 29 A7 20 55 44 24 B2 55 41 24 |..(133). UD$.UA$| 00000830: 3A 54 24 B2 22 22 00 54 10 00 19 8B 20 54 24 B3 |:T$."".T.... T$.| 00000840: B1 22 22 A7 20 55 41 24 B2 55 41 24 AA 54 24 3A |."". UA$.UA$.T$:| 00000850: 99 54 24 3B 00 5E 10 32 19 89 36 31 35 30 00 64 |.T$;.^.2..6150.d| 00000860: 10 64 19 3A 00 78 10 96 19 8F 20 41 55 54 4F 20 |.d.:.x.... AUTO | 00000870: 53 45 4E 44 2F 4D 4F 44 00 7E 10 C8 19 3A 00 88 |SEND/MOD.~...:..| 00000880: 10 FA 19 89 36 38 30 30 00 A8 10 2C 1A 55 44 24 |....6800...,.UD$| 00000890: B2 22 48 30 4A 52 45 20 53 45 4E 44 45 52 22 3A |."H0JRE SENDER":| 000008A0: 8F 20 53 45 4E 44 45 52 00 BF 10 5E 1A 8D 35 35 |. SENDER...^..55| 000008B0: 35 30 3A 8F 20 47 4F 53 55 42 20 53 45 4E 44 00 |50:. GOSUB SEND.| 000008C0: DE 10 90 1A 8D 34 37 30 30 3A 8D 34 39 35 30 3A |.....4700:.4950:| 000008D0: 8F 20 47 4F 53 55 42 20 4D 4F 44 54 41 47 00 E7 |. GOSUB MODTAG..| 000008E0: 10 C2 1A 99 49 4E 24 00 F1 10 F4 1A 89 36 37 30 |....IN$......670| 000008F0: 30 00 08 11 26 1B 55 44 24 B2 22 48 30 4A 52 45 |0...&.UD$."H0JRE| 00000900: 20 53 45 4E 44 45 52 22 00 0E 11 58 1B 8E 00 14 | SENDER"...X....| 00000910: 11 8A 1B 3A 00 2B 11 BC 1B 8F 20 2A 2A 2A 53 45 |...:.+.... ***SE| 00000920: 4E 44 2F 4D 4F 44 20 32 2A 2A 2A 00 31 11 EE 1B |ND/MOD 2***.1...| 00000930: 3A 00 53 11 B6 1C 8B 20 4D 4F 24 B2 22 53 22 A7 |:.S.... MO$."S".| 00000940: 8D 35 35 35 30 3A 4D 4F 24 B2 22 4D 22 3A 89 37 |.5550:MO$."M":.7| 00000950: 35 30 30 00 76 11 E8 1C 8B 20 4D 4F 24 B2 22 4D |500.v.... MO$."M| 00000960: 22 A7 20 8D 34 37 30 30 3A 8D 34 39 35 30 3A 4D |". .4700:.4950:M| 00000970: 4F 24 B2 22 53 22 00 7C 11 4C 1D 8E 00 82 11 40 |O$."S".|.L.....@| 00000980: 1F 3B 00 96 11 4A 1F 53 4C 25 B2 C5 28 C8 28 49 |.;...J.SL%..(.(I| 00000990: 4E 24 2C 31 29 29 00 AA 11 54 1F 53 43 25 B2 C5 |N$,1))...T.SC%..| 000009A0: 28 C9 28 49 4E 24 2C 31 29 29 00 EA 11 5E 1F 8B |(.(IN$,1))...^..| 000009B0: 20 53 55 25 28 30 2C 53 4C 25 2C 53 43 25 29 B3 | SU%(0,SL%,SC%).| 000009C0: 32 20 A7 20 53 55 25 28 30 2C 53 4C 25 2C 53 43 |2 . SU%(0,SL%,SC| 000009D0: 25 29 B2 53 55 25 28 30 2C 53 4C 25 2C 53 43 25 |%).SU%(0,SL%,SC%| 000009E0: 29 AA 32 3A 89 20 38 30 35 30 00 F0 11 68 1F 8E |).2:. 8050...h..| 000009F0: 00 07 12 72 1F 56 41 25 B2 53 55 25 28 30 2C 53 |...r.VA%.SU%(0,S| 00000A00: 4C 25 2C 53 43 25 29 00 1A 12 7C 1F 8B 20 56 41 |L%,SC%)...|.. VA| 00000A10: 25 B2 32 20 89 20 38 30 38 30 00 3C 12 86 1F 99 |%.2 . 8080.<....| 00000A20: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............| 00000A30: 1D 1D 1D 1D 1D 1D 12 52 41 4D 54 22 00 46 12 90 |.......RAMT".F..| 00000A40: 1F 99 22 13 22 3B 00 61 12 9A 1F 81 20 58 B2 30 |..".";.a.... X.0| 00000A50: 20 A4 20 53 4C 25 20 3A 20 99 22 11 22 3B 20 3A | . SL% : ."."; :| 00000A60: 82 00 80 12 A4 1F 81 20 58 B2 30 20 A4 20 53 43 |....... X.0 . SC| 00000A70: 25 AA 43 53 25 20 3A 20 99 22 1D 22 3B 20 3A 82 |%.CS% : ."."; :.| 00000A80: 00 99 12 AE 1F 8B 20 56 41 25 B2 32 20 A7 20 99 |...... VA%.2 . .| 00000A90: 22 30 22 3A 89 38 31 35 30 00 B2 12 B8 1F 8B 20 |"0":.8150...... | 00000AA0: 56 41 25 B2 31 20 A7 20 99 22 58 22 3A 89 38 31 |VA%.1 . ."X":.81| 00000AB0: 35 30 00 CB 12 C2 1F 8B 20 56 41 25 B2 30 20 A7 |50...... VA%.0 .| 00000AC0: 20 99 22 20 22 3A 89 38 31 35 30 00 DE 12 CC 1F | ." ":.8150.....| 00000AD0: 8B 20 56 41 25 B2 33 20 A7 20 99 22 23 22 00 E4 |. VA%.3 . ."#"..| 00000AE0: 12 D6 1F 8E 00 00 00 |....... |
....... SAVE "SLAG 10",8.....:.*.L.MO$." M".L.~.DA.56577:FLAG.56589:DIR.56579.^.. .SEN.255:MOD.0.~.... GOTO 7100:REM SEND/ MODTAG.....:...F.. ".";...X.."......ABCD EFGHIJ";......".....ABCDEFGHIJ".M.... X. 0 . 9......"....";X;...@.."............" ;X...R.......:...V.. SU%(1,9,9).....BI%. 0.$.:.. 2200.*.L.:.<.... TAST ******.B.P .:.\.... T$ : . T$."" . 2050.B.4...H.F.: .Z.... STYR ******...J.:...... BI%.0 . L S%.0 : CS%.5...... BI%.1 . LS%.0 : CS%.2 0.Q.`.. 7100:. GOSUB 1950.Z.J.. T$...T.. C(IN$).0 . . 8000...... T$."." . LI%.9 . LI%.LI%.1 : . 2650.F.D.. T$."." . LI%. 0 . LI%.LI%.1 : . 2650.P.... T$."." . CO %.9 . CO%.CO%.1 : . 2650...(.. T$."." . CO%.0 . CO%.CO%.1 : . 2650...Z.LA%.LS%.L I% : CA%.CS%.CO%.X.... T$."F" . . 3700 : . MAERK...... 2950...... T$."S" . BI%.B I%.1 : . BI%.1 . BI%.0...".. 2300...T.:. 3.... CURSOR ******.9...:.C....".";.^... . X.0 . LA% : ."."; :..Y.N.. X.0 . SL% : ."."; :....... SU%(BI%,LI%,CO%).1 . . " .X." : . 3300.H.... SU%(BI%,LI%,CO%).0 . . ". .".R....".";...... X.0 . GL% : .". "; :....H.. X.0 . GA% : ."."; :..2.Z.. S U%(GB%,GI%,GC%).1 . . "X" : . 3550.S.... SU%(GB%,GI%,GC%).0 . . " "....GL%.LA%: GA%.CA%:GB%.BI%:GI%.LI%:GC%.CO%......... B.:...T.. MAERK *****.....:.K.X.SU%(BI%, LI%,CO%).SU%(BI%,LI%,CO%).1...... SU%(BI %,LI%,CO%).1 . SU%(BI%,LI%,CO%).0...<... ..N.:.#. .. KOMUNIKATIONSDEL ******.).R. :.>.... ***FLAG MO ***.D.6.:.S.H.FA.B(FL AG).M.... FA.16. MO..1:. 4350.V.L.MO.0.| .......0.:...B.. ***PORT UD ***.....:... F.. DIR,255.........*.:.M.\.. ***PORT IN D ***.S...:...... DIR,0.........$.:...V. . ***MODTAG ***.....:.*...TE$.G(B(DA)) : . TE$.."_" . 5050.5...IN$."".N.... 4100 :. . MO . 5150._.P.TE$.G(B(DA)).W.... TE $.G(254). .5400.....IN$.IN$.TE$...... 51 50...... H(IN$,1)."_".IN$.I(IN$,C(IN$).1 )...J...E.|.:.W.... ***SEND ***.....:... ..UD$."_".UD$.G(254):. 4450:AN.1. .D.. D A,F(J(UD$,AN,1)):AN.AN.1.9.V.. 4100:. . MO . 5750.S.... AN.C(UD$). UD$."":..].Z. .5700.C...:.~.>.. *** HOVEDPROGRAM ***.. .P.:...... GOSUB 1400:REM SENDERKALD...T ..".";...... 4100:. FLAG...8.. MO . . 49 50:."............";IN$;".";UA$;...J.. TE $.G(254). . 5550:.4700...... T$.6.N.. T$ .G(133). UD$.UA$:T$."".T.... T$.."". UA$ .UA$.T$:.T$;.^.2..6150.D.D.:.X.... AUTO SEND/MOD.~.H.:......6800...,.UD$."H0JRE SENDER":. SENDER...^..5550:. GOSUB SEND. .....4700:.4950:. GOSUB MODTAG...B..IN$. .....6700...&.UD$."H0JRE SENDER"...X.... ...:.+.... ***SEND/MOD 2***.1...:.S.... MO$."S"..5550:MO$."M":.7500.V.... MO$."M ". .4700:.4950:MO$."S".|.L.....@.;...J.S L%.E(H(IN$,1))...T.SC%.E(I(IN$,1))...^.. SU%(0,SL%,SC%).2 . SU%(0,SL%,SC%).SU%(0 ,SL%,SC%).2:. 8050...H.....R.VA%.SU%(0,S L%,SC%)...|.. VA%.2 . 8080.<...."....... ...............RAMT".F....".";.A.... X.0 . SL% : ."."; :....... X.0 . SC%.CS% : ."."; :....... VA%.2 . ."0":.8150...... VA%.1 . ."X":.8150.K.B.. VA%.0 . ." ":.8 150...L.. VA%.3 . ."#"...V.....
> CLICK IMAGE PREVIEW FOR FULL MODAL