MODEM MACHINE
FILE INFORMATION
FILENAME(S): MODEM MACHINE
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 18:12:15
APPEARS ON: 1 disk(s)
FILE HASH
6cadd6a3c0dc3d11baab26ceb753b10a4b696300dede8de974b695a7c52af9a0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 30 S 1 | MODEM MACHINE | PRG | Sailor, Ganheden | 30 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 64 00 97 32 35 31 2C 2E 00 33 08 6E |....d..251,..3.n| 00000010: 00 97 35 33 32 38 31 2C 31 36 3A 97 35 33 32 38 |..53281,16:.5328| 00000020: 30 2C 31 36 3A 99 C7 28 31 34 29 3A 4D 4E 24 B2 |0,16:..(14):MN$.| 00000030: 22 31 22 00 5D 08 78 00 99 22 93 9B 20 20 20 20 |"1".].x..".. | 00000040: 20 20 20 CD 4F 44 45 4D 20 C1 4E 53 57 45 52 20 | .ODEM .NSWER | 00000050: CD 41 43 48 49 4E 45 20 31 39 38 35 22 00 86 08 |.ACHINE 1985"...| 00000060: 82 00 99 22 20 20 20 20 20 20 20 96 A3 A3 A3 A3 |..." .....| 00000070: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 00000080: A3 A3 A3 A3 A3 22 00 C4 08 8C 00 99 22 20 20 20 |....."......" | 00000090: 20 20 20 20 9A 20 C2 59 3A 20 C4 4F 4E 20 26 20 | . .Y: .ON & | 000000A0: C4 41 52 52 59 4E 20 C7 52 41 48 41 4D 22 3A 99 |.ARRYN .RAHAM":.| 000000B0: 22 11 11 9B 20 CD 41 49 4C 20 2D 3E 22 3B C2 28 |"... .AIL ->";.(| 000000C0: 32 35 31 29 00 0B 09 96 00 99 22 11 11 1E 20 D0 |251)......"... .| 000000D0: 4C 41 43 45 20 59 4F 55 52 20 27 D4 2D C4 27 20 |LACE YOUR '.-.' | 000000E0: 53 57 49 54 43 48 20 54 4F 20 27 C4 27 20 41 4E |SWITCH TO '.' AN| 000000F0: 44 20 48 49 54 20 20 5B D2 45 54 55 52 4E 5D 20 |D HIT [.ETURN] | 00000100: 54 4F 20 45 4E 54 45 52 20 22 3B 00 3A 09 A0 00 |TO ENTER ";.:...| 00000110: 99 22 C1 4E 53 57 45 52 20 4D 4F 44 45 2D 20 22 |.".NSWER MODE- "| 00000120: 3A 99 22 20 5B C6 31 5D 20 54 4F 20 57 52 49 54 |:." [.1] TO WRIT| 00000130: 45 20 4D 45 53 53 41 47 45 22 00 58 09 A5 00 99 |E MESSAGE".X....| 00000140: 22 20 5B C6 33 5D 20 54 4F 20 D2 45 41 44 20 CD |" [.3] TO .EAD .| 00000150: 45 53 53 41 47 45 53 22 00 77 09 AA 00 99 22 20 |ESSAGES".w...." | 00000160: 5B C6 35 5D 20 54 4F 20 50 52 49 4E 54 20 4D 45 |[.5] TO PRINT ME| 00000170: 53 53 41 47 45 53 22 00 8D 09 AF 00 99 22 11 20 |SSAGES"......". | 00000180: 20 5B D1 5D 20 54 4F 20 51 55 49 54 22 00 A2 09 | [.] TO QUIT"...| 00000190: B4 00 A1 5A 58 24 3A 8B 5A 58 24 B2 22 22 A7 31 |...ZX$:.ZX$."".1| 000001A0: 38 30 00 B5 09 B9 00 8B 5A 58 24 B2 C7 28 31 33 |80......ZX$..(13| 000001B0: 29 A7 32 33 30 00 C6 09 BE 00 8B 5A 58 24 B2 22 |).230......ZX$."| 000001C0: 85 22 A7 37 30 30 00 01 0A C3 00 8B 5A 58 24 B2 |.".700......ZX$.| 000001D0: 22 86 22 AF C2 28 32 35 31 29 B2 2E A7 99 22 93 |"."..(251)....".| 000001E0: CE 4F 20 CD 45 53 53 41 47 45 53 20 4F 4E 20 46 |.O .ESSAGES ON F| 000001F0: 49 4C 45 2E 22 3A 81 41 B2 31 A4 31 35 30 30 3A |ILE.":.A.1.1500:| 00000200: 82 00 1B 0A C4 00 8B 5A 58 24 B2 22 86 22 AF C2 |.......ZX$."."..| 00000210: 28 32 35 31 29 B2 2E A7 31 32 30 00 33 0A C8 00 |(251)...120.3...| 00000220: 8B 5A 58 24 B2 22 86 22 AF C2 28 32 35 31 29 A7 |.ZX$."."..(251).| 00000230: 36 34 30 00 44 0A D2 00 8B 5A 58 24 B2 22 87 22 |640.D....ZX$."."| 00000240: A7 37 35 30 00 5F 0A DC 00 8B 5A 58 24 B3 B1 22 |.750._....ZX$.."| 00000250: 51 22 AF 5A 58 24 B3 B1 22 D1 22 A7 31 38 30 00 |Q".ZX$..".".180.| 00000260: 98 0A DE 00 9F 31 35 2C 38 2C 31 35 2C 22 52 30 |.....15,8,15,"R0| 00000270: 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 3D 48 |:HELLO CONNECT=H| 00000280: 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A 84 31 |ELLO CONNECT":.1| 00000290: 35 2C 45 52 3A A0 31 35 00 AC 0A E0 00 99 22 93 |5,ER:.15......".| 000002A0: 22 3B 3A 8B 45 52 B3 B1 36 33 A7 80 00 C3 0A E2 |";:.ER..63......| 000002B0: 00 93 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 |.."HELLO CONNECT| 000002C0: 22 2C 38 00 D3 0A E6 00 9F 35 2C 32 2C 32 2C C7 |",8......5,2,2,.| 000002D0: 28 36 29 00 FD 0A F0 00 99 22 93 9B 20 20 20 20 |(6)......".. | 000002E0: 20 20 20 CD 4F 44 45 4D 20 C1 4E 53 57 45 52 20 | .ODEM .NSWER | 000002F0: CD 41 43 48 49 4E 45 20 31 39 38 35 22 00 26 0B |.ACHINE 1985".&.| 00000300: FA 00 99 22 20 20 20 20 20 20 20 96 A3 A3 A3 A3 |..." .....| 00000310: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 00000320: A3 A3 A3 A3 A3 22 00 64 0B 04 01 99 22 20 20 20 |.....".d...." | 00000330: 20 20 20 20 9A 20 C2 59 3A 20 C4 4F 4E 20 26 20 | . .Y: .ON & | 00000340: C4 41 52 52 59 4E 20 C7 52 41 48 41 4D 22 3A 99 |.ARRYN .RAHAM":.| 00000350: 22 11 11 9A CD 41 49 4C 20 2D 2D 3E 22 3B C2 28 |"....AIL -->";.(| 00000360: 32 35 31 29 00 91 0B 0E 01 99 22 11 11 96 20 20 |251)......"... | 00000370: 20 20 D3 59 53 54 45 4D 20 D7 41 49 54 49 4E 47 | .YSTEM .AITING| 00000380: 20 46 4F 52 20 41 20 C3 41 4C 4C 45 52 2E 2E 2E | FOR A .ALLER...| 00000390: 22 00 9F 0B 18 01 97 35 36 35 37 39 2C 33 38 00 |"......56579,38.| 000003A0: AF 0B 22 01 92 20 35 36 35 37 37 2C 38 2C 38 00 |..".. 56577,8,8.| 000003B0: C6 0B 2C 01 97 35 36 35 37 37 2C C2 28 35 36 35 |..,..56577,.(565| 000003C0: 37 37 29 B0 33 32 00 F0 0B 36 01 99 22 1E 20 20 |77).32...6..". | 000003D0: 20 20 11 C3 41 4C 4C 45 52 20 C1 54 54 45 4D 50 | ..ALLER .TTEMP| 000003E0: 54 49 4E 47 20 54 4F 20 C3 4F 4E 4E 45 43 54 22 |TING TO .ONNECT"| 000003F0: 00 02 0C 40 01 92 20 35 36 35 37 37 2C 31 36 2C |...@.. 56577,16,| 00000400: 32 34 00 31 0C 4A 01 99 22 93 11 11 11 9B C3 41 |24.1.J.."......A| 00000410: 52 52 49 45 52 20 CF 4E 4C 49 4E 45 2E 2E 2E 20 |RRIER .NLINE... | 00000420: 57 41 49 54 49 4E 47 20 46 4F 52 20 5B C3 D2 5D |WAITING FOR [..]| 00000430: 22 00 6E 0C 54 01 81 49 B2 31 A4 32 30 30 30 3A |".n.T..I.1.2000:| 00000440: 82 3A 4D 24 B2 22 20 C3 48 4F 4F 53 45 20 C8 41 |.:M$." .HOOSE .A| 00000450: 4C 46 20 C4 55 50 4C 45 58 2D 2D 20 C8 49 54 20 |LF .UPLEX-- .IT | 00000460: 5B D2 45 54 55 52 4E 5D 22 3A 8D 37 34 30 00 7A |[.ETURN]":.740.z| 00000470: 0C 5E 01 43 54 B2 43 54 AA 31 00 9D 0C 68 01 A1 |.^.CT.CT.1...h..| 00000480: 23 35 2C 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 |#5,A$:.A$...(13)| 00000490: A7 8B 43 54 B3 32 30 30 30 A7 33 35 30 00 D1 0C |..CT.2000.350...| 000004A0: 72 01 8B 41 24 B2 C7 28 31 33 29 A7 4D 24 B2 22 |r..A$..(13).M$."| 000004B0: 11 CD 4F 44 45 4D 20 C1 4E 53 57 45 52 20 CD 41 |..ODEM .NSWER .A| 000004C0: 43 48 49 4E 45 2E 22 3A 8D 37 34 30 3A 89 34 30 |CHINE.":.740:.40| 000004D0: 30 00 F4 0C 7C 01 99 22 54 49 4D 45 20 49 53 20 |0...|.."TIME IS | 000004E0: 55 50 2C 20 4E 4F 42 4F 44 59 20 57 41 53 20 54 |UP, NOBODY WAS T| 000004F0: 48 45 52 45 00 12 0D 86 01 97 35 36 35 37 37 2C |HERE......56577,| 00000500: 30 3A 81 49 B2 31 A4 35 30 30 30 3A 82 3A 89 32 |0:.I.1.5000:.:.2| 00000510: 34 30 00 54 0D 90 01 4D 24 B2 22 2D 2D 2D 2D 2D |40.T...M$."-----| 00000520: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000530: 2D 2D 2D 2D 2D 2D 2D 22 3A 8D 37 34 30 3A 4E 24 |-------":.740:N$| 00000540: B2 22 D9 4F 55 52 20 CE 41 4D 45 20 2D 3E 22 3A |.".OUR .AME ->":| 00000550: 8D 38 34 30 00 5F 0D 9A 01 84 35 2C 4E 41 24 00 |.840._....5,NA$.| 00000560: 8A 0D A4 01 4D 24 B2 22 D9 4F 55 20 41 52 45 20 |....M$.".OU ARE | 00000570: 22 AA 4E 41 24 AA 22 20 D2 49 47 48 54 3F 20 28 |".NA$." .IGHT? (| 00000580: 59 2F 4E 29 22 3A 8D 37 34 30 00 A5 0D AE 01 A1 |Y/N)":.740......| 00000590: 23 35 2C 5A 58 24 3A 8B 5A 58 24 B2 C7 28 38 39 |#5,ZX$:.ZX$..(89| 000005A0: 29 A7 34 36 30 00 C1 0D B8 01 8B 5A 58 24 B2 C7 |).460......ZX$..| 000005B0: 28 37 38 29 A7 20 4E 41 24 B2 22 22 3A 89 34 30 |(78). NA$."":.40| 000005C0: 30 00 CA 0D C2 01 89 34 33 30 00 F4 0D CC 01 99 |0......430......| 000005D0: 22 CF 4E 4C 49 4E 45 20 2D 3E 22 3B 4E 41 24 3A |".NLINE ->";NA$:| 000005E0: 4D 24 B2 C7 28 31 33 29 AA C7 28 31 33 29 AA C7 |M$..(13)..(13)..| 000005F0: 28 31 33 29 00 24 0E D6 01 4D 24 B2 22 2D 2D 20 |(13).$...M$."-- | 00000600: D3 54 41 4E 44 42 59 20 46 4F 52 20 D3 59 53 4F |.TANDBY FOR .YSO| 00000610: 50 27 53 20 CD 45 53 53 41 47 45 20 2D 2D 22 3A |P'S .ESSAGE --":| 00000620: 8D 37 34 30 00 41 0E E0 01 9F 38 2C 38 2C 38 2C |.740.A....8,8,8,| 00000630: 22 30 3A 53 59 53 4F 50 20 4D 53 47 2C 53 2C 52 |"0:SYSOP MSG,S,R| 00000640: 22 00 65 0E EA 01 A1 23 38 2C 41 24 3A 8B 53 54 |".e....#8,A$:.ST| 00000650: B3 B1 36 34 A7 98 35 2C 41 24 3B 3A 99 41 24 3B |..64..5,A$;:.A$;| 00000660: 3A 89 34 39 30 00 91 0E F4 01 4D 24 B2 C7 28 31 |:.490.....M$..(1| 00000670: 33 29 AA 22 2D 2D 20 C5 4E 44 20 4F 46 20 CD 45 |3)."-- .ND OF .E| 00000680: 53 53 41 47 45 20 2D 2D 22 3A 8D 37 34 30 3A A0 |SSAGE --":.740:.| 00000690: 38 00 AF 0E FE 01 4D 24 B2 C7 28 31 33 29 AA C7 |8.....M$..(13)..| 000006A0: 28 31 33 29 AA C7 28 31 33 29 3A 8D 37 34 30 00 |(13)..(13):.740.| 000006B0: B8 0E 08 02 89 35 35 30 00 E8 0E 12 02 4D 24 B2 |.....550.....M$.| 000006C0: C7 28 31 33 29 AA C7 28 31 33 29 AA 22 D4 48 41 |.(13)..(13).".HA| 000006D0: 4E 4B 53 20 46 4F 52 20 43 41 4C 4C 49 4E 47 2E |NKS FOR CALLING.| 000006E0: 2E 2E 22 3A 8D 37 34 30 00 06 0F 1C 02 97 35 36 |..":.740......56| 000006F0: 35 37 37 2C 30 3A 81 49 B2 31 A4 35 30 30 30 3A |577,0:.I.1.5000:| 00000700: 82 3A 89 32 34 30 00 3C 0F 26 02 4D 24 B2 22 3C |.:.240.<.&.M$."<| 00000710: 2D 2D 20 CD 45 53 53 41 47 45 20 46 4F 52 20 D3 |-- .ESSAGE FOR .| 00000720: 59 53 4F 50 20 2D 2D 3E 22 3A 4D 4E 24 B2 C4 28 |YSOP -->":MN$..(| 00000730: C2 28 32 35 31 29 29 3A 8D 37 34 30 00 5E 0F 30 |.(251)):.740.^.0| 00000740: 02 4D 24 B2 22 20 D4 59 50 45 20 27 5E 27 20 54 |.M$." .YPE '^' T| 00000750: 4F 20 45 4E 44 2E 2E 2E 22 3A 8D 37 34 30 00 7E |O END...":.740.~| 00000760: 0F 3A 02 9F 38 2C 38 2C 38 2C 22 30 3A 4D 41 49 |.:..8,8,8,"0:MAI| 00000770: 4C 20 22 AA 4D 4E 24 AA 22 2C 53 2C 57 22 00 8F |L ".MN$.",S,W"..| 00000780: 0F 44 02 98 38 2C 4E 41 24 AA C7 28 31 33 29 00 |.D..8,NA$..(13).| 00000790: A5 0F 4E 02 A1 23 35 2C 41 24 3A 8B 41 24 B2 22 |..N..#5,A$:.A$."| 000007A0: 22 A7 35 39 30 00 C3 0F 58 02 8B 41 24 B3 B1 22 |".590...X..A$.."| 000007B0: 5E 22 A7 99 41 24 3B 3A 98 38 2C 41 24 3B 3A 89 |^"..A$;:.8,A$;:.| 000007C0: 35 39 30 00 CA 0F 62 02 98 38 00 FC 0F 6C 02 98 |590...b..8...l..| 000007D0: 35 2C 22 D3 41 56 49 4E 47 22 3A A0 38 3A 4D 24 |5,".AVING":.8:M$| 000007E0: B2 22 D4 48 41 4E 4B 53 20 46 4F 52 20 59 4F 55 |.".HANKS FOR YOU| 000007F0: 52 20 43 4F 4D 4D 45 4E 54 53 2E 22 00 0E 10 71 |R COMMENTS."...q| 00000800: 02 97 32 35 31 2C C2 28 32 35 31 29 AA 31 00 1C |..251,.(251).1..| 00000810: 10 76 02 8D 37 34 30 3A 89 35 33 30 00 4B 10 80 |.v..740:.530.K..| 00000820: 02 99 22 93 CD 41 49 4C 20 4E 55 4D 42 45 52 20 |.."..AIL NUMBER | 00000830: 54 4F 20 52 45 41 44 2E 2E 2E 3E 22 3B 3A 85 43 |TO READ...>";:.C| 00000840: 4E 3A 4D 4E 24 B2 C4 28 43 4E 29 00 6B 10 8A 02 |N:MN$..(CN).k...| 00000850: 9F 38 2C 38 2C 38 2C 22 30 3A 4D 41 49 4C 20 22 |.8,8,8,"0:MAIL "| 00000860: AA 4D 4E 24 AA 22 2C 53 2C 52 22 00 88 10 94 02 |.MN$.",S,R".....| 00000870: A1 23 38 2C 41 24 3A 8B 53 54 B3 B1 36 34 A7 99 |.#8,A$:.ST..64..| 00000880: 41 24 3B 3A 89 36 36 30 00 A0 10 9E 02 A0 38 3A |A$;:.660......8:| 00000890: 99 22 11 11 20 C8 49 54 20 D3 50 41 43 45 2E 22 |.".. .IT .PACE."| 000008A0: 00 B7 10 A8 02 A1 5A 58 24 3A 8B 5A 58 24 B3 B1 |......ZX$:.ZX$..| 000008B0: 22 20 22 A7 36 38 30 00 C0 10 B2 02 89 31 32 30 |" ".680......120| 000008C0: 00 EA 10 BC 02 99 22 93 20 C2 45 47 49 4E 20 CE |......". .EGIN .| 000008D0: 4F 57 2E 22 3A 99 22 20 C8 49 54 20 27 5E 27 20 |OW.":." .IT '^' | 000008E0: 54 4F 20 45 4E 44 2E 2E 2E 22 00 07 11 C6 02 9F |TO END..."......| 000008F0: 38 2C 38 2C 38 2C 22 30 3A 53 59 53 4F 50 20 4D |8,8,8,"0:SYSOP M| 00000900: 53 47 2C 53 2C 57 22 00 29 11 D0 02 A1 41 24 3A |SG,S,W".)....A$:| 00000910: 8B 41 24 B3 B1 22 5E 22 A7 99 41 24 3B 3A 98 38 |.A$.."^"..A$;:.8| 00000920: 2C 41 24 3B 3A 89 37 32 30 00 38 11 DA 02 98 38 |,A$;:.720.8....8| 00000930: 3A A0 38 3A 89 31 32 30 00 48 11 E4 02 98 35 2C |:.8:.120.H....5,| 00000940: 4D 24 3A 99 4D 24 3A 8E 00 63 11 EE 02 9F 31 35 |M$:.M$:..c....15| 00000950: 2C 34 2C 31 35 3A A0 31 35 3A 8B 53 54 B2 2E A7 |,4,15:.15:.ST...| 00000960: 37 36 30 00 87 11 F0 02 99 22 93 96 C5 52 52 4F |760......"...RRO| 00000970: 52 3A 20 D0 52 49 4E 54 45 52 20 CE 4F 54 20 CF |R: .RINTER .OT .| 00000980: 4E 4C 49 4E 45 2E 22 00 9C 11 F3 02 81 41 B2 31 |NLINE."......A.1| 00000990: A4 31 35 30 30 3A 82 3A 89 31 32 30 00 BF 11 F8 |.1500:.:.120....| 000009A0: 02 99 22 93 11 11 96 20 D0 52 49 4E 54 20 CD 41 |..".... .RINT .A| 000009B0: 49 4C 20 54 4F 20 D0 52 49 4E 54 45 52 2E 22 00 |IL TO .RINTER.".| 000009C0: EE 11 02 03 99 22 11 9A 20 C5 4E 54 45 52 20 CD |.....".. .NTER .| 000009D0: 41 49 4C 23 20 54 4F 20 50 52 49 4E 54 20 2D 3E |AIL# TO PRINT ->| 000009E0: 22 3B 3A 85 45 3A 45 53 24 B2 C4 28 45 29 00 00 |";:.E:ES$..(E)..| 000009F0: 12 0C 03 8B 45 B1 C2 28 32 35 31 29 A7 37 36 30 |....E..(251).760| 00000A00: 00 30 12 16 03 9F 34 2C 34 2C 37 3A 9F 38 2C 38 |.0....4,4,7:.8,8| 00000A10: 2C 38 2C 22 30 3A 4D 41 49 4C 20 22 AA 45 53 24 |,8,"0:MAIL ".ES$| 00000A20: AA 22 2C 53 2C 52 22 3A 98 34 2C C7 28 31 37 29 |.",S,R":.4,.(17)| 00000A30: 00 4F 12 20 03 A1 23 38 2C 41 24 3A 8B 53 54 B3 |.O. ..#8,A$:.ST.| 00000A40: B1 36 34 A7 98 34 2C 41 24 3B 3A 89 38 30 30 00 |.64..4,A$;:.800.| 00000A50: 6D 12 2A 03 A0 38 3A 98 34 3A A0 34 3A 99 22 11 |m.*..8:.4:.4:.".| 00000A60: 11 20 C8 49 54 20 D3 50 41 43 45 2E 22 00 84 12 |. .IT .PACE."...| 00000A70: 34 03 A1 5A 58 24 3A 8B 5A 58 24 B3 B1 22 20 22 |4..ZX$:.ZX$.." "| 00000A80: A7 38 32 30 00 8D 12 3E 03 89 31 32 30 00 9F 12 |.820...>..120...| 00000A90: 48 03 98 35 2C 4E 24 3B 3A 99 4E 24 3B 3A 8E 00 |H..5,N$;:.N$;:..| 00000AA0: 00 00 |.. |
....D..251,..3.N..53281,16:.53280,16:.G( 14):MN$."1".].X..".. MODEM ANSWER MACHINE 1985"......" ............. .............".D...." . BY: DON & DARRYN GRAHAM":."... MAIL ->";B(251).... .."... PLACE YOUR 'T-D' SWITCH TO 'D' AN D HIT [RETURN] TO ENTER ";.:. .."ANSWER MODE- ":." [F1] TO WRITE MESSAGE".X.... " [F3] TO READ MESSAGES".W...." [F5] TO PRINT MESSAGES"......". [Q] TO QUIT"... ...ZX$:.ZX$."".180......ZX$.G(13).230.F. ...ZX$.".".700...C..ZX$.".".B(251)....". NO MESSAGES ON FILE.":.A.1.1500:....D..Z X$.".".B(251)...120.3.H..ZX$.".".B(251). 640.D.R..ZX$.".".750._....ZX$.."Q".ZX$.. "Q".180......15,8,15,"R0:HELLO CONNECT=H ELLO CONNECT":.15,ER: 15......".";:.ER.. 63...C...."HELLO CONNECT",8.S....5,2,2,G (6)......".. MODEM ANSWER MACHINE 1985".&...." ..................... .....".D...." . BY: DON & DARRYN G RAHAM":."...MAIL -->";B(251)......"... SYSTEM WAITING FOR A CALLER..."......5 6579,38...".. 56577,8,8.F.,..56577,B(565 77).32...6..". .CALLER ATTEMPTING TO CONNECT"...@.. 56577,16,24.1.J..".....CA RRIER ONLINE... WAITING FOR [CR]".N.T..I .1.2000:.:M$." CHOOSE HALF DUPLEX-- HIT [RETURN]":.740.Z.^.CT.CT.1...H..#5,A$:.A $..G(13)..CT.2000.350.Q.R..A$.G(13).M$." .MODEM ANSWER MACHINE.":.740:.400...|.." TIME IS UP, NOBODY WAS THERE......56577, 0:.I.1.5000:.:.240.T...M$."------------- ---------------":.740:N$."YOUR NAME ->": .840._....5,NA$.....M$."YOU ARE ".NA$." RIGHT? (Y/N)":.740......#5,ZX$:.ZX$.G(89 ).460.A....ZX$.G(78). NA$."":.400.J.B..4 30...L.."ONLINE ->";NA$:M$.G(13).G(13).G (13).$.V.M$."-- STANDBY FOR SYSOP'S MESS AGE --":.740.A....8,8,8,"0:SYSOP MSG,S,R ".E....#8,A$:.ST..64..5,A$;:.A$;:.490... ..M$.G(13)."-- END OF MESSAGE --":.740: 8.....M$.G(13).G(13).G(13):.740......550 .....M$.G(13).G(13)."THANKS FOR CALLING. ..":.740......56577,0:.I.1.5000:.:.240.< .&.M$."<-- MESSAGE FOR SYSOP -->":MN$.D( B(251)):.740.^.0.M$." TYPE '^' TO END... ":.740.~.:..8,8,8,"0:MAIL ".MN$.",S,W".. .D..8,NA$.G(13)...N..#5,A$:.A$."".590.C. X..A$.."^"..A$;:.8,A$;:.590.J.B..8...L.. 5,"SAVING": 8:M$."THANKS FOR YOUR COMMEN TS."...Q..251,B(251).1...V..740:.530.K.. ..".MAIL NUMBER TO READ...>";:.CN:MN$.D( CN).K....8,8,8,"0:MAIL ".MN$.",S,R"..... .#8,A$:.ST..64..A$;:.660. ... 8:.".. HIT SPACE."......ZX$:.ZX$.." ".680......120 ......". BEGIN NOW.":." HIT '^' TO END.. ."...F..8,8,8,"0:SYSOP MSG,S,W".).P..A$: .A$.."^"..A$;:.8,A$;:.720.8.Z..8: 8:.120 .H....5,M$:.M$:..C....15,4,15: 15:.ST... 760......"..ERROR: PRINTER NOT ONLINE.". .....A.1.1500:.:.120......".... PRINT MA IL TO PRINTER."......".. ENTER MAIL# TO PRINT ->";:.E:ES$.D(E)......E.B(251).760 .0....4,4,7:.8,8,8,"0:MAIL ".ES$.",S,R": .4,G(17).O. ..#8,A$:.ST..64..4,A$;:.800. M.*. 8:.4: 4:.".. HIT SPACE."...4..ZX$:. ZX$.." ".820...>..120...H..5,N$;:.N$;:.. ..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL