home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Software / COUNTDOWN-TIMER / c64.bas
Unknown  |  2019-04-13  |  2.0 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert GW-BASIC (document/gwBasic) ext Supported
66% dexvert GFA-BASIC Atari (other/gfaBASICAtari) ext Supported
1% dexvert Amiga BASIC Protected File (other/amigaBASICProtectedFile) ext Unsupported
1% dexvert BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source) ext Unsupported
1% dexvert Visual Basic Tokenized Source (other/visualBasicTokenizedSource) ext Unsupported
1% dexvert ZBASIC (other/zbasic) ext Unsupported
100% file data default
100% gt2 Kopftext: '90 POKE54296,0 default (weak)
100% detectItEasy Format: plain text[LF] default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 39 30 20 50 4f 4b 45 35 | 34 32 39 36 2c 30 0a 31 |90 POKE5|4296,0.1|
|00000010| 30 30 20 50 52 49 4e 54 | 22 93 22 3a 50 4f 4b 45 |00 PRINT|".":POKE|
|00000020| 35 33 32 38 30 2c 30 3a | 50 4f 4b 45 35 33 32 38 |53280,0:|POKE5328|
|00000030| 31 2c 30 3a 50 4f 4b 45 | 36 34 36 2c 31 34 0a 31 |1,0:POKE|646,14.1|
|00000040| 31 30 20 44 24 3d 22 13 | 11 11 11 11 11 11 11 11 |10 D$=".|........|
|00000050| 11 22 0a 31 32 30 20 50 | 52 49 4e 54 3a 50 52 49 |.".120 P|RINT:PRI|
|00000060| 4e 54 22 45 4e 54 45 52 | 20 54 49 4d 45 20 4c 49 |NT"ENTER| TIME LI|
|00000070| 4d 49 54 20 28 4d 4d 53 | 53 29 22 0a 31 33 30 20 |MIT (MMS|S)".130 |
|00000080| 46 4f 52 54 3d 34 54 4f | 31 53 54 45 50 2d 31 0a |FORT=4TO|1STEP-1.|
|00000090| 31 34 30 20 47 45 54 4c | 24 28 54 29 3a 49 46 4c |140 GETL|$(T):IFL|
|000000a0| 24 28 54 29 3d 22 22 54 | 48 45 4e 31 34 30 0a 31 |$(T)=""T|HEN140.1|
|000000b0| 35 30 20 4c 28 54 29 3d | 56 41 4c 28 4c 24 28 54 |50 L(T)=|VAL(L$(T|
|000000c0| 29 29 0a 31 36 30 20 4e | 45 58 54 0a 31 37 30 20 |)).160 N|EXT.170 |
|000000d0| 49 46 4c 28 32 29 3c 3d | 36 54 48 45 4e 31 39 30 |IFL(2)<=|6THEN190|
|000000e0| 0a 31 38 30 20 50 52 49 | 4e 54 3a 50 52 49 4e 54 |.180 PRI|NT:PRINT|
|000000f0| 22 49 4e 56 41 4c 49 44 | 20 45 4e 54 52 59 2e 2e |"INVALID| ENTRY..|
|00000100| 2e 54 52 59 20 41 47 41 | 49 4e 22 3a 50 52 49 4e |.TRY AGA|IN":PRIN|
|00000110| 54 3a 47 4f 54 4f 31 32 | 30 0a 31 39 30 20 50 52 |T:GOTO12|0.190 PR|
|00000120| 49 4e 54 3a 50 52 49 4e | 54 4c 28 34 29 22 9d 22 |INT:PRIN|TL(4)"."|
|00000130| 4c 28 33 29 22 3a 22 4c | 28 32 29 22 9d 22 4c 28 |L(3)":"L|(2)"."L(|
|00000140| 31 29 0a 32 30 30 20 50 | 52 49 4e 54 3a 50 52 49 |1).200 P|RINT:PRI|
|00000150| 4e 54 22 43 4f 52 52 45 | 43 54 20 28 59 2f 4e 29 |NT"CORRE|CT (Y/N)|
|00000160| 22 0a 32 31 30 20 47 45 | 54 5a 24 3a 49 46 5a 24 |".210 GE|TZ$:IFZ$|
|00000170| 3d 22 22 54 48 45 4e 32 | 31 30 0a 32 32 30 20 49 |=""THEN2|10.220 I|
|00000180| 46 5a 24 3d 22 4e 22 54 | 48 45 4e 31 32 30 0a 32 |FZ$="N"T|HEN120.2|
|00000190| 33 30 20 49 46 5a 24 3c | 3e 22 59 22 41 4e 44 5a |30 IFZ$<|>"Y"ANDZ|
|000001a0| 24 3c 3e 22 4e 22 54 48 | 45 4e 32 31 30 0a 32 34 |$<>"N"TH|EN210.24|
|000001b0| 30 20 4c 28 31 29 3d 4c | 28 31 29 2b 31 3a 4c 28 |0 L(1)=L|(1)+1:L(|
|000001c0| 32 29 3d 4c 28 32 29 2b | 31 3a 4c 28 33 29 3d 4c |2)=L(2)+|1:L(3)=L|
|000001d0| 28 33 29 2b 31 3a 4c 28 | 34 29 3d 4c 28 34 29 2b |(3)+1:L(|4)=L(4)+|
|000001e0| 31 0a 32 35 30 20 50 52 | 49 4e 54 22 93 22 54 41 |1.250 PR|INT"."TA|
|000001f0| 42 28 32 30 29 22 11 11 | 11 11 11 11 11 11 11 11 |B(20)"..|........|
|00000200| 11 12 20 9d 11 11 20 92 | 22 0a 32 36 30 20 50 52 |.. ... .|".260 PR|
|00000210| 49 4e 54 54 41 42 28 31 | 31 29 22 11 11 11 11 11 |INTTAB(1|1)".....|
|00000220| 12 46 31 20 54 4f 20 50 | 41 55 53 45 2f 52 45 53 |.F1 TO P|AUSE/RES|
|00000230| 54 41 52 54 92 22 0a 32 | 37 30 20 47 45 54 58 24 |TART.".2|70 GETX$|
|00000240| 3a 49 46 58 24 3c 3e 22 | 85 22 54 48 45 4e 33 33 |:IFX$<>"|."THEN33|
|00000250| 30 0a 32 39 30 20 47 45 | 54 53 24 3a 49 46 53 24 |0.290 GE|TS$:IFS$|
|00000260| 3c 3e 22 85 22 54 48 45 | 4e 32 39 30 0a 33 30 30 |<>"."THE|N290.300|
|00000270| 20 47 4f 54 4f 33 33 30 | 0a 33 33 30 20 46 4f 52 | GOTO330|.330 FOR|
|00000280| 54 3d 31 54 4f 34 0a 33 | 34 30 20 4f 4e 54 47 4f |T=1TO4.3|40 ONTGO|
|00000290| 53 55 42 32 30 30 30 2c | 32 30 32 30 2c 32 30 34 |SUB2000,|2020,204|
|000002a0| 30 2c 32 30 36 30 0a 33 | 35 30 20 4f 4e 4c 28 54 |0,2060.3|50 ONL(T|
|000002b0| 29 47 4f 53 55 42 31 30 | 30 30 2c 31 31 30 30 2c |)GOSUB10|00,1100,|
|000002c0| 31 32 30 30 2c 31 33 30 | 30 2c 31 34 30 30 2c 31 |1200,130|0,1400,1|
|000002d0| 35 30 30 2c 31 36 30 30 | 2c 31 37 30 30 2c 31 38 |500,1600|,1700,18|
|000002e0| 30 30 2c 31 39 30 30 0a | 33 36 30 20 4e 45 58 54 |00,1900.|360 NEXT|
|000002f0| 0a 33 37 30 20 49 46 4c | 28 31 29 3d 31 41 4e 44 |.370 IFL|(1)=1AND|
|00000300| 4c 28 32 29 3d 31 41 4e | 44 4c 28 33 29 3d 31 41 |L(2)=1AN|DL(3)=1A|
|00000310| 4e 44 4c 28 34 29 3d 31 | 54 48 45 4e 47 4f 54 4f |NDL(4)=1|THENGOTO|
|00000320| 34 30 30 30 0a 33 38 30 | 20 4c 28 31 29 3d 4c 28 |4000.380| L(1)=L(|
|00000330| 31 29 2d 31 3a 49 46 4c | 28 31 29 3e 30 54 48 45 |1)-1:IFL|(1)>0THE|
|00000340| 4e 34 30 30 0a 33 39 30 | 20 4c 28 31 29 3d 31 30 |N400.390| L(1)=10|
|00000350| 3a 4c 28 32 29 3d 4c 28 | 32 29 2d 31 0a 34 30 30 |:L(2)=L(|2)-1.400|
|00000360| 20 49 46 4c 28 32 29 3e | 30 54 48 45 4e 34 32 30 | IFL(2)>|0THEN420|
|00000370| 0a 34 31 30 20 4c 28 32 | 29 3d 36 3a 4c 28 33 29 |.410 L(2|)=6:L(3)|
|00000380| 3d 4c 28 33 29 2d 31 0a | 34 32 30 20 49 46 4c 28 |=L(3)-1.|420 IFL(|
|00000390| 33 29 3e 30 54 48 45 4e | 34 34 30 0a 34 33 30 20 |3)>0THEN|440.430 |
|000003a0| 4c 28 33 29 3d 31 30 3a | 4c 28 34 29 3d 4c 28 34 |L(3)=10:|L(4)=L(4|
|000003b0| 29 2d 31 0a 34 34 30 20 | 46 4f 52 44 4c 3d 31 54 |)-1.440 |FORDL=1T|
|000003c0| 4f 33 37 30 3a 4e 45 58 | 54 44 4c 0a 34 35 30 20 |O370:NEX|TDL.450 |
|000003d0| 47 4f 54 4f 32 37 30 0a | 31 30 30 30 20 50 52 49 |GOTO270.|1000 PRI|
|000003e0| 4e 54 44 24 52 24 22 12 | 20 20 20 20 92 22 0a 31 |NTD$R$".| .".1|
|000003f0| 30 31 30 20 50 52 49 4e | 54 52 24 22 12 20 92 20 |010 PRIN|TR$". . |
|00000400| 20 12 20 92 22 0a 31 30 | 32 30 20 50 52 49 4e 54 | . .".10|20 PRINT|
|00000410| 52 24 22 12 20 92 20 20 | 12 20 92 22 0a 31 30 33 |R$". . |. .".103|
|00000420| 30 20 50 52 49 4e 54 52 | 24 22 12 20 92 20 20 12 |0 PRINTR|$". . .|
|00000430| 20 92 22 0a 31 30 34 30 | 20 50 52 49 4e 54 52 24 | .".1040| PRINTR$|
|00000440| 22 12 20 92 20 20 12 20 | 92 22 0a 31 30 35 30 20 |". . . |.".1050 |
|00000450| 50 52 49 4e 54 52 24 22 | 12 20 92 20 20 12 20 92 |PRINTR$"|. . . .|
|00000460| 22 0a 31 30 36 30 20 50 | 52 49 4e 54 52 24 22 12 |".1060 P|RINTR$".|
|00000470| 20 20 20 20 92 22 0a 31 | 30 37 30 20 52 45 54 55 | .".1|070 RETU|
|00000480| 52 4e 0a 31 31 30 30 20 | 50 52 49 4e 54 44 24 52 |RN.1100 |PRINTD$R|
|00000490| 24 22 20 20 20 12 20 92 | 22 0a 31 31 31 30 20 50 |$" . .|".1110 P|
|000004a0| 52 49 4e 54 52 24 22 20 | 20 20 12 20 92 22 0a 31 |RINTR$" | . .".1|
|000004b0| 31 32 30 20 50 52 49 4e | 54 52 24 22 20 20 20 12 |120 PRIN|TR$" .|
|000004c0| 20 92 22 0a 31 31 33 30 | 20 50 52 49 4e 54 52 24 | .".1130| PRINTR$|
|000004d0| 22 20 20 20 12 20 92 22 | 0a 31 31 34 30 20 50 52 |" . ."|.1140 PR|
|000004e0| 49 4e 54 52 24 22 20 20 | 20 12 20 92 22 0a 31 31 |INTR$" | . .".11|
|000004f0| 35 30 20 50 52 49 4e 54 | 52 24 22 20 20 20 12 20 |50 PRINT|R$" . |
|00000500| 92 22 0a 31 31 36 30 20 | 50 52 49 4e 54 52 24 22 |.".1160 |PRINTR$"|
|00000510| 20 20 20 12 20 92 22 0a | 31 31 37 30 20 52 45 54 | . .".|1170 RET|
|00000520| 55 52 4e 0a 31 32 30 30 | 20 50 52 49 4e 54 44 24 |URN.1200| PRINTD$|
|00000530| 52 24 22 12 20 20 20 20 | 92 22 0a 31 32 31 30 20 |R$". |.".1210 |
|00000540| 50 52 49 4e 54 52 24 22 | 20 20 20 12 20 92 22 0a |PRINTR$"| . .".|
|00000550| 31 32 32 30 20 50 52 49 | 4e 54 52 24 22 20 20 20 |1220 PRI|NTR$" |
|00000560| 12 20 92 22 0a 31 32 33 | 30 20 50 52 49 4e 54 52 |. .".123|0 PRINTR|
|00000570| 24 22 12 20 20 20 20 92 | 22 0a 31 32 34 30 20 50 |$". .|".1240 P|
|00000580| 52 49 4e 54 52 24 22 12 | 20 09 00 20 20 22 0a 31 |RINTR$".| .. ".1|
|00000590| 32 35 30 20 50 52 49 4e | 54 52 24 22 12 20 92 20 |250 PRIN|TR$". . |
|000005a0| 20 20 22 0a 31 32 36 30 | 20 50 52 49 4e 54 52 24 | ".1260| PRINTR$|
|000005b0| 22 12 20 20 20 20 92 22 | 0a 31 32 37 30 20 52 45 |". ."|.1270 RE|
|000005c0| 54 55 52 4e 0a 31 33 30 | 30 20 50 52 49 4e 54 44 |TURN.130|0 PRINTD|
|000005d0| 24 52 24 22 12 20 20 20 | 20 92 22 0a 31 33 31 30 |$R$". | .".1310|
|000005e0| 20 50 52 49 4e 54 52 24 | 22 20 20 20 12 20 92 22 | PRINTR$|" . ."|
|000005f0| 0a 31 33 32 30 20 50 52 | 49 4e 54 52 24 22 20 20 |.1320 PR|INTR$" |
|00000600| 20 12 20 92 22 0a 31 33 | 33 30 20 50 52 49 4e 54 | . .".13|30 PRINT|
|00000610| 52 24 22 12 20 20 20 20 | 92 22 0a 31 33 34 30 20 |R$". |.".1340 |
|00000620| 50 52 49 4e 54 52 24 22 | 20 20 20 12 20 92 22 0a |PRINTR$"| . .".|
|00000630| 31 33 35 30 20 50 52 49 | 4e 54 52 24 22 20 20 20 |1350 PRI|NTR$" |
|00000640| 12 20 92 22 0a 31 33 36 | 30 20 50 52 49 4e 54 52 |. .".136|0 PRINTR|
|00000650| 24 22 12 20 20 20 20 92 | 22 0a 31 33 37 30 20 52 |$". .|".1370 R|
|00000660| 45 54 55 52 4e 0a 31 34 | 30 30 20 50 52 49 4e 54 |ETURN.14|00 PRINT|
|00000670| 44 24 52 24 22 12 20 92 | 20 20 12 20 92 22 0a 31 |D$R$". .| . .".1|
|00000680| 34 31 30 20 50 52 49 4e | 54 52 24 22 12 20 92 20 |410 PRIN|TR$". . |
|00000690| 20 12 20 92 22 0a 31 34 | 32 30 20 50 52 49 4e 54 | . .".14|20 PRINT|
|000006a0| 52 24 22 12 20 92 20 20 | 12 20 92 22 0a 31 34 33 |R$". . |. .".143|
|000006b0| 30 20 50 52 49 4e 54 52 | 24 22 12 20 20 20 20 92 |0 PRINTR|$". .|
|000006c0| 22 0a 31 34 34 30 20 50 | 52 49 4e 54 52 24 22 20 |".1440 P|RINTR$" |
|000006d0| 20 20 12 20 92 22 0a 31 | 34 35 30 20 50 52 49 4e | . .".1|450 PRIN|
|000006e0| 54 52 24 22 20 20 20 12 | 20 92 22 0a 31 34 36 30 |TR$" .| .".1460|
|000006f0| 20 50 52 49 4e 54 52 24 | 22 20 20 20 12 20 92 22 | PRINTR$|" . ."|
|00000700| 0a 31 34 37 30 20 52 45 | 54 55 52 4e 0a 31 35 30 |.1470 RE|TURN.150|
|00000710| 30 20 50 52 49 4e 54 44 | 24 52 24 22 12 20 20 20 |0 PRINTD|$R$". |
|00000720| 20 92 22 0a 31 35 31 30 | 20 50 52 49 4e 54 52 24 | .".1510| PRINTR$|
|00000730| 22 12 20 92 20 20 20 22 | 0a 31 35 32 30 20 50 52 |". . "|.1520 PR|
|00000740| 49 4e 54 52 24 22 12 20 | 92 20 20 20 22 0a 31 35 |INTR$". |. ".15|
|00000750| 33 30 20 50 52 49 4e 54 | 52 24 22 12 20 20 20 20 |30 PRINT|R$". |
|00000760| 92 22 0a 31 35 34 30 20 | 50 52 49 4e 54 52 24 22 |.".1540 |PRINTR$"|
|00000770| 20 20 20 12 20 92 22 0a | 31 35 35 30 20 50 52 49 | . .".|1550 PRI|
|00000780| 4e 54 52 24 22 20 20 20 | 12 20 92 22 0a 31 35 36 |NTR$" |. .".156|
|00000790| 30 20 50 52 49 4e 54 52 | 24 22 12 20 20 20 20 92 |0 PRINTR|$". .|
|000007a0| 22 0a 31 35 37 30 20 52 | 45 54 55 52 4e 0a 31 36 |".1570 R|ETURN.16|
|000007b0| 30 30 20 50 52 49 4e 54 | 44 24 52 24 22 12 20 20 |00 PRINT|D$R$". |
|000007c0| 20 20 92 22 0a 31 36 31 | 30 20 50 52 49 4e 54 52 | .".161|0 PRINTR|
|000007d0| 24 22 12 20 92 20 20 20 | 22 0a 31 36 32 30 20 50 |$". . |".1620 P|
|000007e0| 52 49 4e 54 52 24 22 12 | 20 92 20 20 20 22 0a 31 |RINTR$".| . ".1|
|000007f0| 36 33 30 20 50 52 49 4e | 54 52 24 22 12 20 20 20 |630 PRIN|TR$". |
|00000800| 20 92 22 0a 31 36 34 30 | 20 50 52 49 4e 54 52 24 | .".1640| PRINTR$|
|00000810| 22 12 20 92 20 20 12 20 | 92 22 0a 31 36 35 30 20 |". . . |.".1650 |
|00000820| 50 52 49 4e 54 52 24 22 | 12 20 92 20 20 12 20 92 |PRINTR$"|. . . .|
|00000830| 22 0a | |". | |
+--------+-------------------------+-------------------------+--------+--------+