COLOR64.SS
FILE INFORMATION
FILENAME(S): COLOR64.SS
FILE TYPE(S): SEQ
FILE SIZE: 728b
FIRST SEEN: 2025-10-19 22:35:32
APPEARS ON: 2 disk(s)
FILE HASH
ad601cc5db70eaf6daede532d59ede782b7707edd5c8903ad421af4b3e1bb1cb
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HOSEHEAD | COLOR64.SS | SEQ | Radd Maxx | 28 | 5 | DOWNLOAD FILE |
| NOVATERM 9 5 DOX | COLOR64.SS | SEQ | High Voltage Complete C64 Collection | 28 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 3B 20 C1 20 53 43 52 49 50 54 20 50 52 4F 47 52 |; . SCRIPT PROGR| 00000010: 41 4D 20 46 4F 52 20 4C 4F 47 47 49 4E 47 20 49 |AM FOR LOGGING I| 00000020: 4E 54 4F 20 41 20 C3 4F 4C 4F 52 20 36 34 20 C2 |NTO A .OLOR 64 .| 00000030: C2 D3 2E 0D 0D 52 45 44 49 41 4C 20 35 20 20 20 |.....REDIAL 5 | 00000040: 20 20 20 20 20 20 20 20 20 3B 20 41 42 4F 52 54 | ; ABORT| 00000050: 20 53 43 52 49 50 54 20 41 46 54 45 52 20 35 20 | SCRIPT AFTER 5 | 00000060: 55 4E 53 55 43 43 45 53 53 46 55 4C 20 54 52 49 |UNSUCCESSFUL TRI| 00000070: 45 53 0D 44 49 41 4C 22 CE 41 4D 45 20 4F 46 20 |ES.DIAL".AME OF | 00000080: C2 C2 D3 22 20 20 20 3B 20 41 55 54 4F 44 49 41 |..." ; AUTODIA| 00000090: 4C 20 54 48 45 20 C2 C2 D3 0D 43 48 45 43 4B 20 |L THE ....CHECK | 000000A0: 31 20 22 52 45 54 55 52 4E 22 20 20 20 20 3B 20 |1 "RETURN" ; | 000000B0: 53 50 45 43 49 46 59 20 54 4F 20 43 48 45 43 4B |SPECIFY TO CHECK| 000000C0: 20 46 4F 52 20 54 48 45 20 53 54 52 49 4E 47 20 | FOR THE STRING | 000000D0: 22 52 45 54 55 52 4E 22 0D 43 48 45 43 4B 20 32 |"RETURN".CHECK 2| 000000E0: 20 22 28 59 2F 4E 29 22 20 20 20 20 20 3B 20 43 | "(Y/N)" ; C| 000000F0: 48 45 43 4B 20 46 4F 52 20 C1 D3 C3 C9 C9 2F 47 |HECK FOR ...../G| 00000100: 52 41 50 48 49 43 53 20 50 52 4F 4D 50 54 0D 43 |RAPHICS PROMPT.C| 00000110: 48 45 43 4B 20 33 20 22 3E 22 20 20 20 20 20 20 |HECK 3 ">" | 00000120: 20 20 20 3B 20 57 41 49 54 20 46 4F 52 20 55 53 | ; WAIT FOR US| 00000130: 45 52 20 4E 55 4D 42 45 52 20 50 52 4F 4D 50 54 |ER NUMBER PROMPT| 00000140: 0D 4C 4F 4F 50 20 57 41 49 54 20 20 20 20 20 20 |.LOOP WAIT | 00000150: 20 20 20 20 20 3B 20 57 41 49 54 20 46 4F 52 20 | ; WAIT FOR | 00000160: 53 54 52 49 4E 47 20 49 4E 20 54 45 52 4D 49 4E |STRING IN TERMIN| 00000170: 41 4C 20 4D 4F 44 45 0D 49 46 20 43 48 45 43 4B |AL MODE.IF CHECK| 00000180: 20 31 20 54 48 45 4E 20 4F 55 54 50 55 54 22 5E | 1 THEN OUTPUT"^| 00000190: CD 22 20 20 20 20 20 20 20 20 20 20 3B 20 53 45 |." ; SE| 000001A0: 4E 44 20 41 20 43 41 52 52 49 41 47 45 20 52 45 |ND A CARRIAGE RE| 000001B0: 54 55 52 4E 0D 49 46 20 43 48 45 43 4B 20 32 20 |TURN.IF CHECK 2 | 000001C0: 54 48 45 4E 20 4F 55 54 50 55 54 22 59 22 20 20 |THEN OUTPUT"Y" | 000001D0: 20 20 20 20 20 20 20 20 20 3B 20 53 45 4E 44 20 | ; SEND | 000001E0: 41 20 59 45 53 0D 49 46 20 43 48 45 43 4B 20 33 |A YES.IF CHECK 3| 000001F0: 20 54 48 45 4E 20 4F 55 54 50 55 54 22 55 53 45 | THEN OUTPUT"USE| 00000200: 52 20 4E 55 4D 5E CD 22 20 20 3B 20 53 45 4E 44 |R NUM^." ; SEND| 00000210: 20 55 53 45 52 20 4E 55 4D 42 45 52 0D 49 46 20 | USER NUMBER.IF | 00000220: 4E 4F 20 43 48 45 43 4B 20 33 20 54 48 45 4E 20 |NO CHECK 3 THEN | 00000230: 4A 55 4D 50 20 4C 4F 4F 50 0D 55 4E 43 48 45 43 |JUMP LOOP.UNCHEC| 00000240: 4B 20 31 0D 55 4E 43 48 45 43 4B 20 32 20 20 20 |K 1.UNCHECK 2 | 00000250: 20 20 20 20 20 20 20 20 3B 20 4C 45 41 56 45 20 | ; LEAVE | 00000260: 53 54 52 49 4E 47 20 23 33 0D 57 41 49 54 20 20 |STRING #3.WAIT | 00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 | ; | 00000280: 57 41 49 54 20 46 4F 52 20 50 52 4F 4D 50 54 20 |WAIT FOR PROMPT | 00000290: 41 47 41 49 4E 20 2D 20 53 41 4D 45 20 53 54 52 |AGAIN - SAME STR| 000002A0: 49 4E 47 20 41 53 20 23 33 0D 4D 41 43 52 4F 20 |ING AS #3.MACRO | 000002B0: 31 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 |1 ; | 000002C0: 53 45 4E 44 20 50 41 53 53 57 4F 52 44 20 4D 41 |SEND PASSWORD MA| 000002D0: 43 52 4F 0D 45 4E 44 0D |CRO.END. |
; A SCRIPT PROGRAM FOR LOGGING INTO A CO LOR 64 BBS...REDIAL 5 ; ABORT SCRIPT AFTER 5 UNSUCCESSFUL TRIES.DIAL" NAME OF BBS" ; AUTODIAL THE BBS.CHECK 1 "RETURN" ; SPECIFY TO CHECK FOR THE STRING "RETURN".CHECK 2 "(Y/N)" ; C HECK FOR ASCII/GRAPHICS PROMPT.CHECK 3 " >" ; WAIT FOR USER NUMBER PROMPT .LOOP WAIT ; WAIT FOR STRING I N TERMINAL MODE.IF CHECK 1 THEN OUTPUT"^ M" ; SEND A CARRIAGE RETURN.IF CHECK 2 THEN OUTPUT"Y" ; SEND A YES.IF CHECK 3 THEN OUTPUT"USER NUM^M" ; SEND USER NUMBER.IF NO CHECK 3 THEN JUMP LOOP.UNCHECK 1.UNCHECK 2 ; LEAVE STRING #3.WAIT ; WAIT FOR PROMPT AGAIN - SAME STRING AS # 3.MACRO 1 ; SEND PASSWORD MA CRO.END.
> CLICK IMAGE PREVIEW FOR FULL MODAL