TIPS
FILE INFORMATION
FILENAME(S): TIPS
FILE TYPE(S): PRG
FILE SIZE: 5.9K
FIRST SEEN: 2025-10-19 22:49:33
APPEARS ON: 1 disk(s)
FILE HASH
e70cbf6b390248ee276bf78f2bce3fb609092a76e9596d474f365e8f33ac083b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GOLD DISK 9 | TIPS | PRG | Radd Maxx | 23 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 0A 00 8F 00 22 08 14 00 8F 20 28 43 |........".... (C|
00000010: 29 20 47 4F 4C 44 20 44 49 53 4B 20 2D 20 54 49 |) GOLD DISK - TI|
00000020: 50 53 00 28 08 1E 00 8F 00 55 08 28 00 97 20 35 |PS.(.....U.(.. 5|
00000030: 33 32 38 31 2C 30 3A 20 97 20 35 33 32 38 30 2C |3281,0: . 53280,|
00000040: 30 3A 20 51 24 B2 C7 28 33 34 29 3A 20 97 20 36 |0: Q$..(34): . 6|
00000050: 35 30 2C 36 34 00 93 08 32 00 99 20 C7 28 31 34 |50,64...2.. .(14|
00000060: 29 3B C7 28 38 29 3B 22 93 05 12 20 D0 20 52 20 |);.(8);"... . R |
00000070: 4F 20 47 20 52 20 41 20 4D 20 4D 20 45 20 52 20 |O G R A M M E R |
00000080: 27 20 53 20 20 20 C3 20 4F 20 52 20 4E 20 45 20 |' S . O R N E |
00000090: 52 20 22 00 C3 08 3C 00 99 22 11 D4 48 45 52 45 |R "...<.."..HERE|
000000A0: 20 41 52 45 20 4D 41 4E 59 20 43 4C 4F 43 4B 53 | ARE MANY CLOCKS|
000000B0: 20 41 4E 44 20 54 49 4D 45 52 53 20 57 49 54 48 | AND TIMERS WITH|
000000C0: 49 4E 22 00 F0 08 46 00 99 22 54 48 45 20 C3 2D |IN"...F.."THE .-|
000000D0: 36 34 2E 20 20 C1 20 46 45 57 20 4F 46 20 54 48 |64. . FEW OF TH|
000000E0: 45 4D 2C 20 43 41 4E 20 42 45 20 55 53 45 44 22 |EM, CAN BE USED"|
000000F0: 00 21 09 50 00 99 22 46 52 4F 4D 20 C2 C1 D3 C9 |.!.P.."FROM ....|
00000100: C3 20 41 4E 44 20 48 45 4E 43 45 20 59 4F 55 20 |. AND HENCE YOU |
00000110: 48 41 56 45 20 41 20 50 4F 57 45 52 46 55 4C 22 |HAVE A POWERFUL"|
00000120: 3B 00 50 09 5A 00 99 22 54 49 4D 49 4E 47 20 54 |;.P.Z.."TIMING T|
00000130: 4F 4F 4C 20 41 54 20 59 4F 55 52 20 46 49 4E 47 |OOL AT YOUR FING|
00000140: 45 52 54 49 50 53 2E 20 20 D4 49 4D 45 52 53 22 |ERTIPS. .IMERS"|
00000150: 00 7F 09 64 00 99 20 22 43 41 4E 20 42 45 20 55 |...d.. "CAN BE U|
00000160: 53 45 44 20 46 4F 52 20 43 4C 4F 43 4B 2C 20 41 |SED FOR CLOCK, A|
00000170: 4C 41 52 4D 20 41 4E 44 20 53 54 4F 50 2D 22 00 |LARM AND STOP-".|
00000180: AF 09 6E 00 99 20 22 57 41 54 43 48 20 53 49 4D |..n.. "WATCH SIM|
00000190: 55 4C 41 54 49 4F 4E 53 20 41 53 20 57 45 4C 4C |ULATIONS AS WELL|
000001A0: 20 41 53 20 46 4F 52 20 54 49 4D 49 4E 47 22 00 | AS FOR TIMING".|
000001B0: DE 09 78 00 99 20 22 56 41 52 49 4F 55 53 20 47 |..x.. "VARIOUS G|
000001C0: 41 4D 45 20 52 4F 55 54 49 4E 45 53 20 41 4E 44 |AME ROUTINES AND|
000001D0: 20 43 48 45 43 4B 49 4E 47 20 54 48 45 22 00 05 | CHECKING THE"..|
000001E0: 0A 82 00 99 20 22 45 46 46 49 43 45 4E 43 59 20 |.... "EFFICENCY |
000001F0: 4F 46 20 50 52 4F 47 52 41 4D 4D 49 4E 47 20 43 |OF PROGRAMMING C|
00000200: 4F 44 45 2E 22 00 22 0A 8C 00 99 22 11 CD 4F 52 |ODE."."...."..OR|
00000210: 45 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 4F 4E |E INFORMATION ON|
00000220: 3A 22 00 4B 0A 96 00 99 22 11 20 20 12 20 31 20 |:".K....". . 1 |
00000230: 92 20 20 C8 41 52 44 57 41 52 45 20 C9 4E 54 45 |. .ARDWARE .NTE|
00000240: 52 56 41 4C 20 D4 49 4D 45 52 22 00 72 0A A0 00 |RVAL .IMER".r...|
00000250: 99 22 11 20 20 12 20 32 20 92 20 20 D5 53 49 4E |.". . 2 . .SIN|
00000260: 47 20 54 48 45 20 CA 49 46 46 59 20 C3 4C 4F 43 |G THE .IFFY .LOC|
00000270: 4B 22 00 9D 0A AA 00 99 22 11 20 20 12 20 33 20 |K"......". . 3 |
00000280: 92 20 20 C3 4F 4D 50 4C 45 58 20 C9 4E 54 45 52 |. .OMPLEX .NTER|
00000290: 46 41 43 45 20 C1 44 41 50 54 45 52 22 00 C6 0A |FACE .DAPTER"...|
000002A0: B4 00 99 22 11 20 20 12 20 34 20 92 20 20 D5 53 |...". . 4 . .S|
000002B0: 49 4E 47 20 54 48 45 20 C3 C9 C1 20 D4 CF C4 20 |ING THE ... ... |
000002C0: C3 4C 4F 43 4B 22 00 E6 0A BE 00 99 22 11 20 20 |.LOCK"......". |
000002D0: 12 20 35 20 92 20 20 D4 49 4D 49 4E 47 20 C5 58 |. 5 . .IMING .X|
000002E0: 41 4D 50 4C 45 22 00 17 0B C8 00 99 22 11 11 D0 |AMPLE"......"...|
000002F0: 52 45 53 53 20 31 2C 20 32 2C 20 33 2C 20 34 2C |RESS 1, 2, 3, 4,|
00000300: 20 35 20 4F 52 20 3C 5F 3E 20 46 4F 52 20 C7 C4 | 5 OR <_> FOR ..|
00000310: 20 CD 45 4E 55 22 3B 00 32 0B D2 00 A1 20 49 4E | .ENU";.2.... IN|
00000320: 24 3A 20 8B 20 49 4E 24 B2 22 5F 22 A7 20 31 37 |$: . IN$."_". 17|
00000330: 37 30 00 50 0B DC 00 8B 20 49 4E 24 B3 22 31 22 |70.P.... IN$."1"|
00000340: 20 B0 20 49 4E 24 B1 22 35 22 20 A7 20 32 31 30 | . IN$."5" . 210|
00000350: 00 74 0B E6 00 91 20 C5 28 49 4E 24 29 20 89 20 |.t.... .(IN$) . |
00000360: 32 34 30 2C 33 36 30 2C 37 30 30 2C 38 36 30 2C |240,360,700,860,|
00000370: 31 35 33 30 00 9B 0B F0 00 99 20 22 93 12 20 31 |1530...... ".. 1|
00000380: 2E 20 C8 41 52 44 57 41 52 45 20 C9 4E 54 45 52 |. .ARDWARE .NTER|
00000390: 56 41 4C 20 D4 49 4D 45 52 20 22 00 C8 0B FA 00 |VAL .IMER ".....|
000003A0: 99 22 11 D4 48 45 20 48 41 52 44 57 41 52 45 20 |."..HE HARDWARE |
000003B0: 49 4E 54 45 52 56 41 4C 20 54 49 4D 45 52 20 49 |INTERVAL TIMER I|
000003C0: 53 20 4F 46 54 45 4E 22 00 F5 0B 04 01 99 22 52 |S OFTEN"......"R|
000003D0: 45 46 45 52 20 54 4F 20 41 53 20 54 48 45 20 27 |EFER TO AS THE '|
000003E0: CA 49 46 46 59 20 C3 4C 4F 43 4B 27 2E 20 20 C9 |.IFFY .LOCK'. .|
000003F0: 54 20 49 53 22 00 24 0C 0E 01 99 22 41 20 43 4F |T IS".$...."A CO|
00000400: 55 4E 54 45 52 20 54 48 41 54 20 49 53 20 5A 45 |UNTER THAT IS ZE|
00000410: 52 4F 45 44 20 41 54 20 50 4F 57 45 52 55 50 20 |ROED AT POWERUP |
00000420: 41 4E 44 22 00 4E 0C 18 01 99 22 43 4F 55 4E 54 |AND".N...."COUNT|
00000430: 53 20 49 4E 20 31 2F 36 30 54 48 20 4F 46 20 41 |S IN 1/60TH OF A|
00000440: 20 53 45 43 4F 4E 44 2E 20 20 D4 48 45 22 00 7B | SECOND. .HE".{|
00000450: 0C 22 01 99 22 55 50 44 41 54 49 4E 47 20 49 53 |.".."UPDATING IS|
00000460: 20 44 4F 4E 45 20 44 55 52 49 4E 47 20 54 48 45 | DONE DURING THE|
00000470: 20 49 4E 54 45 52 52 55 50 54 22 00 A9 0C 2C 01 | INTERRUPT"...,.|
00000480: 99 22 57 48 49 43 48 20 4F 43 43 55 52 53 20 52 |."WHICH OCCURS R|
00000490: 4F 55 47 48 4C 59 20 45 56 45 52 59 20 31 2F 36 |OUGHLY EVERY 1/6|
000004A0: 30 54 48 20 4F 46 20 41 22 00 D7 0C 36 01 99 22 |0TH OF A"...6.."|
000004B0: 53 45 43 4F 4E 44 2E 20 20 CE 4F 54 45 20 54 48 |SECOND. .OTE TH|
000004C0: 41 54 20 D4 41 50 45 20 4C 4F 41 44 53 20 4F 52 |AT .APE LOADS OR|
000004D0: 20 4F 54 48 45 52 22 00 08 0D 40 01 99 22 52 4F | OTHER"...@.."RO|
000004E0: 55 54 49 4E 45 53 20 54 48 41 54 20 44 49 53 41 |UTINES THAT DISA|
000004F0: 42 4C 45 20 54 48 45 20 49 4E 54 45 52 52 55 50 |BLE THE INTERRUP|
00000500: 54 20 57 49 4C 4C 22 3B 00 2F 0D 4A 01 99 22 41 |T WILL";./.J.."A|
00000510: 46 46 45 43 54 20 54 48 45 20 54 49 4D 49 4E 47 |FFECT THE TIMING|
00000520: 20 4F 46 20 54 48 45 20 4A 49 46 46 59 2E 22 00 | OF THE JIFFY.".|
00000530: 3A 0D 54 01 8D 20 31 37 32 30 00 43 0D 5E 01 89 |:.T.. 1720.C.^..|
00000540: 20 35 30 00 68 0D 68 01 99 20 22 93 12 20 32 2E | 50.h.h.. ".. 2.|
00000550: 20 D5 53 49 4E 47 20 54 48 45 20 CA 49 46 46 59 | .SING THE .IFFY|
00000560: 20 C3 4C 4F 43 4B 20 22 00 97 0D 72 01 99 22 11 | .LOCK "...r..".|
00000570: D4 48 45 20 4A 49 46 46 59 20 49 53 20 41 43 43 |.HE JIFFY IS ACC|
00000580: 45 53 53 45 44 20 54 48 52 4F 55 47 48 20 32 20 |ESSED THROUGH 2 |
00000590: 53 59 53 54 45 4D 22 00 C1 0D 7C 01 99 22 56 41 |SYSTEM"...|.."VA|
000005A0: 52 49 41 42 4C 45 53 3A 20 D4 C9 20 41 4E 44 20 |RIABLES: .. AND |
000005B0: D4 C9 24 20 28 4F 52 20 D4 C9 CD C5 20 41 4E 44 |..$ (OR .... AND|
000005C0: 22 00 D0 0D 86 01 99 22 D4 C9 CD C5 24 29 2E 22 |"......"....$)."|
000005D0: 00 EB 0D 90 01 99 22 11 D4 4F 20 52 45 41 44 20 |......"..O READ |
000005E0: 54 48 45 20 4A 49 46 46 59 3A 22 00 1B 0E 9A 01 |THE JIFFY:".....|
000005F0: 99 22 11 20 20 20 31 29 A0 49 3D D4 C9 20 57 49 |.". 1).I=.. WI|
00000600: 4C 4C 20 52 45 41 44 20 54 48 45 20 4A 49 46 46 |LL READ THE JIFF|
00000610: 59 20 26 20 52 45 54 55 52 4E 22 00 49 0E A4 01 |Y & RETURN".I...|
00000620: 99 22 20 20 20 20 20 20 20 20 20 20 20 41 20 4E |." A N|
00000630: 55 4D 42 45 52 20 49 4E 20 31 2F 36 30 54 48 20 |UMBER IN 1/60TH |
00000640: 4F 46 20 41 20 53 45 43 22 00 78 0E AE 01 99 22 |OF A SEC".x...."|
00000650: 11 20 20 20 32 29 20 49 24 3D D4 C9 24 20 57 49 |. 2) I$=..$ WI|
00000660: 4C 4C 20 52 45 54 55 52 4E 20 54 49 4D 45 20 42 |LL RETURN TIME B|
00000670: 41 53 45 44 20 4F 4E 22 00 A5 0E B8 01 99 22 20 |ASED ON"......" |
00000680: 20 20 20 20 20 20 20 20 20 20 54 48 45 20 4A 49 | THE JI|
00000690: 46 46 59 20 49 4E 20 46 4F 52 4D 20 27 C8 C8 CD |FFY IN FORM '...|
000006A0: CD D3 D3 27 22 00 BF 0E C2 01 99 22 11 D4 4F 20 |...'"......"..O |
000006B0: 53 45 54 20 54 48 45 20 4A 49 46 46 59 3A 22 00 |SET THE JIFFY:".|
000006C0: E4 0E CC 01 99 22 11 20 20 20 31 29 20 D4 C9 24 |.....". 1) ..$|
000006D0: 3D 22 C7 28 33 34 29 22 C8 C8 CD CD D3 D3 22 C7 |=".(34)"......".|
000006E0: 28 33 34 29 00 F5 0E D6 01 99 20 22 11 57 48 45 |(34)...... ".WHE|
000006F0: 52 45 2E 2E 22 00 0C 0F E0 01 99 20 22 11 20 20 |RE.."...... ". |
00000700: 20 C8 C8 20 3D 20 48 4F 55 52 53 22 00 24 0F EA | .. = HOURS".$..|
00000710: 01 99 20 22 20 20 20 CD CD 20 3D 20 4D 49 4E 55 |.. " .. = MINU|
00000720: 54 45 53 22 00 3C 0F F4 01 99 20 22 20 20 20 D3 |TES".<.... " .|
00000730: D3 20 3D 20 53 45 43 4F 4E 44 53 22 00 47 0F FE |. = SECONDS".G..|
00000740: 01 8D 20 31 37 32 30 00 5A 0F 08 02 8B 20 49 4E |.. 1720.Z.... IN|
00000750: 24 B2 22 5E 22 20 A7 20 35 30 00 7F 0F 12 02 99 |$."^" . 50......|
00000760: 20 22 93 12 20 32 2E 20 D5 53 49 4E 47 20 54 48 | ".. 2. .SING TH|
00000770: 45 20 CA 49 46 46 59 20 C3 4C 4F 43 4B 20 22 00 |E .IFFY .LOCK ".|
00000780: 91 0F 1C 02 99 22 11 C5 58 41 4D 50 4C 45 53 3A |....."..XAMPLES:|
00000790: 22 00 BE 0F 26 02 99 22 11 20 31 29 20 D4 4F 20 |"...&..". 1) .O |
000007A0: 53 45 54 20 4A 49 46 46 59 20 54 4F 20 52 45 46 |SET JIFFY TO REF|
000007B0: 4C 45 43 54 20 31 31 3A 32 33 20 C1 CD 22 00 E1 |LECT 11:23 .."..|
000007C0: 0F 30 02 99 22 11 20 20 20 20 D4 C9 24 3D 22 C7 |.0..". ..$=".|
000007D0: 28 33 34 29 22 31 31 32 33 30 30 22 C7 28 33 34 |(34)"112300".(34|
000007E0: 29 00 0A 10 3A 02 99 22 11 20 32 29 20 D4 4F 20 |)...:..". 2) .O |
000007F0: 43 48 45 43 4B 20 54 49 4D 45 20 41 46 54 45 52 |CHECK TIME AFTER|
00000800: 20 53 45 54 54 49 4E 47 3A 22 00 3B 10 44 02 99 | SETTING:".;.D..|
00000810: 22 11 20 20 20 20 D0 D2 C9 CE D4 A0 22 C7 28 33 |". ......".(3|
00000820: 34 29 22 D4 49 4D 45 20 49 53 20 4E 4F 57 3A 22 |4)".IME IS NOW:"|
00000830: C7 28 33 34 29 22 3B D4 C9 24 22 00 6A 10 4E 02 |.(34)";..$".j.N.|
00000840: 99 22 11 20 33 29 20 D4 4F 20 43 48 45 43 4B 20 |.". 3) .O CHECK |
00000850: 54 48 45 20 54 49 4D 45 20 54 41 4B 45 4E 20 54 |THE TIME TAKEN T|
00000860: 4F 20 45 58 45 43 55 54 45 22 00 8E 10 58 02 99 |O EXECUTE"...X..|
00000870: 22 20 20 20 20 41 20 53 45 43 54 49 4F 4E 20 4F |" A SECTION O|
00000880: 46 20 C2 C1 D3 C9 C3 20 43 4F 44 45 3A 22 00 B6 |F ..... CODE:"..|
00000890: 10 62 02 99 22 11 20 20 20 20 31 30 30 30 20 D4 |.b..". 1000 .|
000008A0: C9 24 3D 22 C7 28 33 34 29 22 30 30 30 30 30 30 |.$=".(34)"000000|
000008B0: 22 C7 28 33 34 29 00 C8 10 6C 02 99 22 20 20 20 |".(34)...l.." |
000008C0: 20 20 20 20 20 20 2E 22 00 EF 10 76 02 99 22 20 | ."...v.." |
000008D0: 20 20 20 20 20 20 20 20 2E 20 D5 53 45 52 20 53 | . .SER S|
000008E0: 45 43 54 49 4F 4E 20 4F 46 20 43 4F 44 45 22 00 |ECTION OF CODE".|
000008F0: 01 11 80 02 99 22 20 20 20 20 20 20 20 20 20 2E |....." .|
00000900: 22 00 43 11 8A 02 99 22 20 20 20 20 32 30 30 30 |".C...." 2000|
00000910: 20 D0 D2 C9 CE D4 22 C7 28 33 34 29 22 D4 49 4D | .....".(34)".IM|
00000920: 45 20 54 41 4B 45 4E 3A 22 C7 28 33 34 29 22 3B |E TAKEN:".(34)";|
00000930: D4 C9 2F 36 30 3B 22 C7 28 33 34 29 22 D3 45 43 |../60;".(34)".EC|
00000940: 53 22 3B 00 4F 11 94 02 99 20 C7 28 33 34 29 00 |S";.O.... .(34).|
00000950: 5A 11 9E 02 8D 20 31 37 32 30 00 6E 11 A8 02 8B |Z.... 1720.n....|
00000960: 20 49 4E 24 B2 22 5E 22 20 A7 20 33 36 30 00 77 | IN$."^" . 360.w|
00000970: 11 B2 02 89 20 35 30 00 A0 11 BC 02 99 20 22 93 |.... 50...... ".|
00000980: 12 20 33 2E 20 C3 4F 4D 50 4C 45 58 20 C9 4E 54 |. 3. .OMPLEX .NT|
00000990: 45 52 46 41 43 45 20 C1 44 41 50 54 45 52 20 22 |ERFACE .DAPTER "|
000009A0: 00 D0 11 C6 02 99 20 22 11 D4 48 45 20 43 4F 4D |...... "..HE COM|
000009B0: 50 4C 45 58 20 49 4E 54 45 52 46 41 43 45 20 41 |PLEX INTERFACE A|
000009C0: 44 41 50 54 45 52 20 28 C3 C9 C1 29 20 49 53 22 |DAPTER (...) IS"|
000009D0: 00 FD 11 D0 02 99 20 22 54 48 45 20 36 35 32 36 |...... "THE 6526|
000009E0: 20 48 41 52 44 57 41 52 45 20 43 48 49 50 20 54 | HARDWARE CHIP T|
000009F0: 48 41 54 20 50 45 52 46 4F 52 4D 53 22 00 2B 12 |HAT PERFORMS".+.|
00000A00: DA 02 99 22 4D 41 4E 59 20 49 4E 50 55 54 2F 4F |..."MANY INPUT/O|
00000A10: 55 54 50 55 54 20 28 C9 2F CF 29 20 46 55 4E 43 |UTPUT (./.) FUNC|
00000A20: 54 49 4F 4E 53 2E 20 20 CF 4E 22 00 59 12 E4 02 |TIONS. .N".Y...|
00000A30: 99 22 54 48 45 20 C3 2D 36 34 2C 20 54 48 45 20 |."THE .-64, THE |
00000A40: C3 C9 C1 53 20 28 54 48 45 52 45 20 41 52 45 20 |...S (THERE ARE |
00000A50: 32 20 4F 4E 20 54 48 45 22 00 87 12 EE 02 99 22 |2 ON THE"......"|
00000A60: C3 2D 36 34 29 20 48 41 4E 44 4C 45 53 20 53 55 |.-64) HANDLES SU|
00000A70: 43 48 20 54 48 49 4E 47 20 41 53 20 4A 4F 59 53 |CH THING AS JOYS|
00000A80: 54 49 43 4B 53 2C 22 00 B6 12 F8 02 99 22 50 41 |TICKS,"......"PA|
00000A90: 44 44 4C 45 53 2C 20 4C 49 47 48 54 50 45 4E 53 |DDLES, LIGHTPENS|
00000AA0: 2C 20 53 45 52 49 41 4C 20 C9 2F CF 20 41 4E 44 |, SERIAL ./. AND|
00000AB0: 20 4D 55 43 48 22 00 E3 12 02 03 99 22 4D 4F 52 | MUCH"......"MOR|
00000AC0: 45 2E 20 20 C1 53 20 50 41 52 54 20 4F 46 20 54 |E. .S PART OF T|
00000AD0: 48 45 20 C3 C9 C1 2C 20 54 48 45 52 45 20 49 53 |HE ..., THERE IS|
00000AE0: 20 41 22 00 12 13 0C 03 99 22 48 41 52 44 57 41 | A"......"HARDWA|
00000AF0: 52 45 20 D4 49 4D 45 20 4F 46 20 C4 41 59 20 28 |RE .IME OF .AY (|
00000B00: D4 CF C4 29 20 43 4C 4F 43 4B 2E 20 20 D4 48 49 |...) CLOCK. .HI|
00000B10: 53 22 00 41 13 16 03 99 22 43 4C 4F 43 4B 20 49 |S".A...."CLOCK I|
00000B20: 53 20 48 41 52 44 57 41 52 45 20 44 52 49 56 45 |S HARDWARE DRIVE|
00000B30: 4E 20 41 4E 44 20 42 45 43 41 55 53 45 20 49 54 |N AND BECAUSE IT|
00000B40: 22 00 6F 13 20 03 99 20 22 49 54 20 49 53 20 4E |".o. .. "IT IS N|
00000B50: 4F 54 20 44 52 49 56 45 4E 20 42 59 20 54 48 45 |OT DRIVEN BY THE|
00000B60: 20 49 4E 54 45 52 52 55 50 54 2C 20 49 54 22 00 | INTERRUPT, IT".|
00000B70: 9D 13 2A 03 99 20 22 49 53 20 55 4E 41 46 46 45 |..*.. "IS UNAFFE|
00000B80: 43 54 45 44 20 42 59 20 53 55 43 48 20 54 48 49 |CTED BY SUCH THI|
00000B90: 4E 47 53 20 41 53 20 54 41 50 45 2D 22 00 C9 13 |NGS AS TAPE-"...|
00000BA0: 34 03 99 20 22 4C 4F 41 44 53 20 41 4E 44 20 52 |4.. "LOADS AND R|
00000BB0: 4F 55 54 49 4E 45 53 20 54 48 41 54 20 44 49 53 |OUTINES THAT DIS|
00000BC0: 41 42 4C 45 20 54 48 45 22 00 DC 13 3E 03 99 20 |ABLE THE"...>.. |
00000BD0: 22 49 4E 54 45 52 52 55 50 54 2E 22 00 E7 13 48 |"INTERRUPT."...H|
00000BE0: 03 8D 20 31 37 32 30 00 F0 13 52 03 89 20 35 30 |.. 1720...R.. 50|
00000BF0: 00 17 14 5C 03 99 20 22 93 12 20 34 2E 20 D5 53 |...\.. ".. 4. .S|
00000C00: 49 4E 47 20 54 48 45 20 C3 C9 C1 A0 D4 CF C4 20 |ING THE ....... |
00000C10: 43 4C 4F 43 4B 20 22 00 47 14 66 03 99 22 11 D4 |CLOCK ".G.f.."..|
00000C20: 48 45 20 C3 C9 C1 20 41 52 45 20 41 43 43 45 53 |HE ... ARE ACCES|
00000C30: 53 45 44 20 56 49 41 20 4D 45 4D 4F 52 59 2D 4D |SED VIA MEMORY-M|
00000C40: 41 50 50 49 4E 47 22 00 6F 14 70 03 99 22 53 49 |APPING".o.p.."SI|
00000C50: 4D 49 4C 41 52 20 54 4F 20 54 48 41 54 20 4F 46 |MILAR TO THAT OF|
00000C60: 20 54 48 45 20 53 4F 55 4E 44 20 41 4E 44 22 00 | THE SOUND AND".|
00000C70: 86 14 7A 03 99 22 47 52 41 50 48 49 43 53 20 43 |..z.."GRAPHICS C|
00000C80: 48 49 50 53 2E 22 00 A7 14 84 03 99 22 11 CD 41 |HIPS."......"..A|
00000C90: 50 50 49 4E 47 20 49 53 20 44 4F 4E 45 20 54 48 |PPING IS DONE TH|
00000CA0: 52 4F 55 47 48 3A 22 00 D1 14 8E 03 99 22 11 20 |ROUGH:"......". |
00000CB0: 20 20 C3 C9 C1 20 3D 20 24 C4 C3 30 30 20 28 35 | ... = $..00 (5|
00000CC0: 36 33 32 30 29 20 46 4F 52 20 C3 C9 C1 20 23 31 |6320) FOR ... #1|
00000CD0: 22 00 FA 14 98 03 99 22 20 20 20 C3 C9 C1 20 3D |"......" ... =|
00000CE0: 20 24 C4 C4 30 30 20 28 35 36 35 37 36 29 20 46 | $..00 (56576) F|
00000CF0: 4F 52 20 C3 C9 C1 20 23 32 22 00 19 15 A2 03 99 |OR ... #2"......|
00000D00: 22 11 D2 45 47 49 53 54 45 52 53 20 4F 46 20 49 |"..EGISTERS OF I|
00000D10: 4E 54 45 52 45 53 54 3A 22 00 46 15 AC 03 99 22 |NTEREST:".F...."|
00000D20: 11 20 20 20 C3 C9 C1 2B 31 31 3A 20 52 45 47 49 |. ...+11: REGI|
00000D30: 53 54 45 52 20 43 4F 4E 54 41 49 4E 49 4E 47 20 |STER CONTAINING |
00000D40: 48 4F 55 52 53 22 00 74 15 B6 03 99 22 20 20 20 |HOURS".t...." |
00000D50: C3 C9 C1 2B 31 30 3A 20 52 45 47 49 53 54 45 52 |...+10: REGISTER|
00000D60: 20 43 4F 4E 54 41 49 4E 49 4E 47 20 4D 49 4E 55 | CONTAINING MINU|
00000D70: 54 45 53 22 00 A2 15 C0 03 99 22 20 20 20 C3 C9 |TES"......" ..|
00000D80: C1 2B 39 3A 20 20 52 45 47 49 53 54 45 52 20 43 |.+9: REGISTER C|
00000D90: 4F 4E 54 41 49 4E 49 4E 47 20 53 45 43 4F 4E 44 |ONTAINING SECOND|
00000DA0: 53 22 00 D1 15 CA 03 99 22 20 20 20 C3 C9 C1 2B |S"......" ...+|
00000DB0: 38 3A 20 20 52 45 47 49 53 54 45 52 20 43 4F 4E |8: REGISTER CON|
00000DC0: 54 41 49 4E 49 4E 47 20 31 2F 31 30 20 53 45 43 |TAINING 1/10 SEC|
00000DD0: 22 00 02 16 D4 03 99 20 22 11 CE 4F 54 45 3A 20 |"...... "..OTE: |
00000DE0: D2 45 47 49 53 54 45 52 53 20 41 52 45 20 49 4E |.EGISTERS ARE IN|
00000DF0: 20 C2 C3 C4 20 46 4F 52 4D 41 54 2E 20 C5 41 43 | ... FORMAT. .AC|
00000E00: 48 22 00 32 16 DE 03 99 20 22 20 20 20 52 45 47 |H".2.... " REG|
00000E10: 49 53 54 45 52 20 43 4F 4E 54 41 49 4E 53 20 32 |ISTER CONTAINS 2|
00000E20: 20 44 49 47 49 54 53 20 4F 46 20 34 20 42 49 54 | DIGITS OF 4 BIT|
00000E30: 53 22 00 5F 16 E8 03 99 20 22 20 20 20 45 41 43 |S"._.... " EAC|
00000E40: 48 2E 20 20 C5 41 43 48 20 44 49 47 49 54 20 52 |H. .ACH DIGIT R|
00000E50: 41 4E 47 45 20 46 52 4F 4D 20 30 2D 39 2E 22 00 |ANGE FROM 0-9.".|
00000E60: 8F 16 F2 03 99 20 22 20 20 20 D4 48 45 20 CD D3 |..... " .HE ..|
00000E70: C2 20 4F 46 20 54 48 45 20 48 4F 55 52 53 20 52 |. OF THE HOURS R|
00000E80: 45 47 49 53 54 45 52 20 49 53 20 54 48 45 22 00 |EGISTER IS THE".|
00000E90: AA 16 FC 03 99 20 22 20 20 20 C1 CD 2F D0 CD 20 |..... " ../.. |
00000EA0: 42 49 54 20 46 4C 41 47 2E 22 00 B5 16 06 04 8D |BIT FLAG."......|
00000EB0: 20 31 37 32 30 00 C8 16 10 04 8B 20 49 4E 24 B2 | 1720...... IN$.|
00000EC0: 22 5E 22 20 A7 20 35 30 00 EF 16 1A 04 99 20 22 |"^" . 50...... "|
00000ED0: 93 12 20 34 2E 20 D5 53 49 4E 47 20 54 48 45 20 |.. 4. .SING THE |
00000EE0: C3 C9 C1 A0 D4 CF C4 20 43 4C 4F 43 4B 20 22 00 |....... CLOCK ".|
00000EF0: 14 17 24 04 99 22 11 D4 4F 20 53 45 54 20 54 48 |..$.."..O SET TH|
00000F00: 45 20 43 4C 4F 43 4B 20 4F 4E 20 54 48 45 20 C3 |E CLOCK ON THE .|
00000F10: C9 C1 3A 22 00 43 17 2E 04 99 22 11 20 31 29 20 |..:".C....". 1) |
00000F20: D3 45 54 20 48 4F 55 52 20 52 45 47 49 53 54 45 |.ET HOUR REGISTE|
00000F30: 52 20 2D 20 54 48 49 53 20 57 49 4C 4C 20 D3 D4 |R - THIS WILL ..|
00000F40: CF D0 22 00 71 17 38 04 99 22 20 20 20 20 54 48 |..".q.8.." TH|
00000F50: 45 20 43 4C 4F 43 4B 49 4E 47 20 4F 4E 20 54 48 |E CLOCKING ON TH|
00000F60: 41 54 20 C3 C9 C1 A0 D4 CF C4 20 43 4C 4F 43 4B |AT ....... CLOCK|
00000F70: 22 00 9D 17 42 04 99 22 20 32 29 20 D3 45 54 20 |"...B.." 2) .ET |
00000F80: 54 48 45 20 4D 49 4E 55 54 45 53 20 41 4E 44 20 |THE MINUTES AND |
00000F90: 53 45 43 4F 4E 44 53 20 52 45 47 53 22 00 CA 17 |SECONDS REGS"...|
00000FA0: 4C 04 99 22 20 33 29 20 D3 45 54 20 54 48 45 20 |L.." 3) .ET THE |
00000FB0: 31 2F 31 30 20 53 45 43 53 20 52 45 47 49 53 54 |1/10 SECS REGIST|
00000FC0: 45 52 20 2D 20 54 48 49 53 22 00 ED 17 56 04 99 |ER - THIS"...V..|
00000FD0: 22 20 20 20 20 57 49 4C 4C 20 D3 54 41 52 54 20 |" WILL .TART |
00000FE0: 54 48 45 20 43 4C 4F 43 4B 49 4E 47 22 00 14 18 |THE CLOCKING"...|
00000FF0: 60 04 99 22 11 11 D4 4F 20 52 45 41 44 20 54 48 |`.."...O READ TH|
00001000: 45 20 43 4C 4F 43 4B 20 49 4E 20 54 48 45 20 C3 |E CLOCK IN THE .|
00001010: C9 C1 3A 22 00 44 18 6A 04 99 22 11 20 31 29 20 |..:".D.j..". 1) |
00001020: D2 45 41 44 20 54 48 45 20 48 4F 55 52 53 20 52 |.EAD THE HOURS R|
00001030: 45 47 49 53 54 45 52 20 2D 20 54 48 49 53 20 57 |EGISTER - THIS W|
00001040: 49 4C 4C 22 00 75 18 74 04 99 22 20 20 20 20 CC |ILL".u.t.." .|
00001050: C1 D4 C3 C8 20 54 48 45 20 52 45 53 55 4C 54 53 |.... THE RESULTS|
00001060: 20 46 52 4F 4D 20 54 48 45 20 D4 CF C4 20 43 4C | FROM THE ... CL|
00001070: 4F 43 4B 22 3B 00 A2 18 7E 04 99 22 20 32 29 20 |OCK";...~.." 2) |
00001080: D2 45 41 44 20 54 48 45 20 4D 49 4E 55 54 45 53 |.EAD THE MINUTES|
00001090: 20 41 4E 44 20 53 45 43 4F 4E 44 53 20 52 45 47 | AND SECONDS REG|
000010A0: 53 22 00 D0 18 88 04 99 22 20 33 29 20 D2 45 41 |S"......" 3) .EA|
000010B0: 44 20 54 48 45 20 31 2F 31 30 20 53 45 43 53 20 |D THE 1/10 SECS |
000010C0: 52 45 47 49 53 54 45 52 20 2D 20 54 48 49 53 22 |REGISTER - THIS"|
000010D0: 00 F3 18 92 04 99 22 20 20 20 20 57 49 4C 4C 20 |......" WILL |
000010E0: 55 4E 2D 4C 41 54 43 48 20 54 48 45 20 43 4C 4F |UN-LATCH THE CLO|
000010F0: 43 4B 22 00 23 19 9C 04 99 22 11 20 CE 4F 54 45 |CK".#....". .OTE|
00001100: 3A 20 41 20 4C 41 54 43 48 45 44 20 43 4C 4F 43 |: A LATCHED CLOC|
00001110: 4B 20 57 49 4C 4C 20 43 4F 4E 54 49 4E 55 45 20 |K WILL CONTINUE |
00001120: 54 4F 22 00 3B 19 A6 04 99 22 20 20 20 20 20 20 |TO".;...." |
00001130: 20 4B 45 45 50 20 54 49 4D 45 22 00 46 19 B0 04 | KEEP TIME".F...|
00001140: 8D 20 31 37 32 30 00 5A 19 BA 04 8B 20 49 4E 24 |. 1720.Z.... IN$|
00001150: B2 22 5E 22 20 A7 20 38 36 30 00 81 19 C4 04 99 |."^" . 860......|
00001160: 20 22 93 12 20 34 2E 20 D5 53 49 4E 47 20 54 48 | ".. 4. .SING TH|
00001170: 45 20 C3 C9 C1 A0 D4 CF C4 20 43 4C 4F 43 4B 20 |E ....... CLOCK |
00001180: 22 00 A3 19 CE 04 99 20 22 11 11 11 C5 58 41 4D |"...... "....XAM|
00001190: 50 4C 45 3A 20 C3 C9 C1 20 D3 54 4F 50 57 41 54 |PLE: ... .TOPWAT|
000011A0: 43 48 22 00 B1 19 D8 04 99 22 11 31 30 20 52 45 |CH"......".10 RE|
000011B0: 4D 00 CB 19 E2 04 99 22 32 30 20 52 45 4D 20 53 |M......"20 REM S|
000011C0: 45 54 20 43 49 41 20 41 44 44 52 00 D8 19 EC 04 |ET CIA ADDR.....|
000011D0: 99 22 33 30 20 52 45 4D 00 EB 19 F6 04 99 22 34 |."30 REM......"4|
000011E0: 30 20 43 49 41 3D 35 36 33 32 30 00 F8 19 00 05 |0 CIA=56320.....|
000011F0: 99 22 35 30 20 52 45 4D 00 15 1A 0A 05 99 22 36 |."50 REM......"6|
00001200: 30 20 52 45 4D 20 43 4C 45 41 52 20 54 4F 44 20 |0 REM CLEAR TOD |
00001210: 43 4C 4F 43 4B 00 22 1A 14 05 99 22 37 30 20 52 |CLOCK."...."70 R|
00001220: 45 4D 00 50 1A 1E 05 99 22 38 30 20 46 4F 52 20 |EM.P...."80 FOR |
00001230: 49 3D 31 31 54 4F 38 20 53 54 45 50 2D 31 3A 50 |I=11TO8 STEP-1:P|
00001240: 4F 4B 45 20 43 49 41 2B 49 2C 30 3A 4E 45 58 54 |OKE CIA+I,0:NEXT|
00001250: 00 5D 1A 28 05 99 22 39 30 20 52 45 4D 00 78 1A |.].(.."90 REM.x.|
00001260: 32 05 99 22 31 30 30 20 52 45 4D 20 44 49 53 50 |2.."100 REM DISP|
00001270: 4C 41 59 20 54 49 4D 45 00 86 1A 3C 05 99 22 31 |LAY TIME...<.."1|
00001280: 31 30 20 52 45 4D 00 AA 1A 46 05 99 22 31 32 30 |10 REM...F.."120|
00001290: 20 50 52 49 4E 54 20 22 C7 28 33 34 29 22 3C C8 | PRINT ".(34)"<.|
000012A0: 4F 4D 45 3E 22 C7 28 33 34 29 00 D8 1A 50 05 99 |OME>".(34)...P..|
000012B0: 22 31 33 30 20 46 4F 52 20 49 3D 31 31 54 4F 38 |"130 FOR I=11TO8|
000012C0: 20 53 54 45 50 20 2D 31 3A 44 49 47 3D 50 45 45 | STEP -1:DIG=PEE|
000012D0: 4B 28 43 49 41 2B 49 29 00 F9 1A 5A 05 99 22 31 |K(CIA+I)...Z.."1|
000012E0: 34 30 20 50 52 49 4E 54 20 43 48 52 24 28 44 49 |40 PRINT CHR$(DI|
000012F0: 47 2F 31 36 2B 34 38 29 3B 00 23 1B 64 05 99 22 |G/16+48);.#.d.."|
00001300: 31 35 30 20 50 52 49 4E 54 20 43 48 52 24 28 28 |150 PRINT CHR$((|
00001310: 44 49 47 20 41 4E 44 31 35 29 2B 34 38 29 3B 22 |DIG AND15)+48);"|
00001320: 20 22 3B 00 32 1B 6E 05 99 22 31 36 30 20 4E 45 | ";.2.n.."160 NE|
00001330: 58 54 00 45 1B 78 05 99 22 31 37 30 20 47 4F 54 |XT.E.x.."170 GOT|
00001340: 4F 20 31 32 30 00 6A 1B 82 05 99 20 22 11 12 20 |O 120.j.... ".. |
00001350: 48 49 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 |HIT ANY KEY TO C|
00001360: 4F 4E 54 49 4E 55 45 20 22 3B 00 78 1B 8C 05 43 |ONTINUE ";.x...C|
00001370: 49 41 B2 35 36 33 32 30 00 95 1B 96 05 81 20 49 |IA.56320...... I|
00001380: B2 31 31 A4 38 20 A9 AB 31 3A 97 20 43 49 41 AA |.11.8 ..1:. CIA.|
00001390: 49 2C 30 3A 82 00 A0 1B A0 05 99 20 22 13 11 22 |I,0:....... ".."|
000013A0: 00 BF 1B AA 05 81 20 49 B2 31 31 A4 38 20 A9 20 |...... I.11.8 . |
000013B0: AB 31 3A 44 49 47 B2 C2 28 43 49 41 AA 49 29 00 |.1:DIG..(CIA.I).|
000013C0: D3 1B B4 05 99 20 C7 28 44 49 47 AD 31 36 AA 34 |..... .(DIG.16.4|
000013D0: 38 29 3B 00 EE 1B BE 05 99 20 C7 28 28 44 49 47 |8);...... .((DIG|
000013E0: 20 AF 31 35 29 AA 34 38 29 3B 22 20 22 3B 00 F4 | .15).48);" ";..|
000013F0: 1B C8 05 82 00 0F 1C D2 05 A1 20 49 4E 24 3A 20 |.......... IN$: |
00001400: 8B 20 49 4E 24 B2 22 22 20 A7 20 31 34 34 30 00 |. IN$."" . 1440.|
00001410: 1A 1C DC 05 8D 20 31 37 32 30 00 2F 1C E6 05 8B |..... 1720./....|
00001420: 20 49 4E 24 B2 22 5E 22 20 A7 20 31 30 35 30 00 | IN$."^" . 1050.|
00001430: 38 1C F0 05 89 20 35 30 00 56 1C FA 05 99 20 22 |8.... 50.V.... "|
00001440: 93 12 20 35 2E 20 D4 49 4D 49 4E 47 20 C5 58 41 |.. 5. .IMING .XA|
00001450: 4D 50 4C 45 20 22 00 85 1C 04 06 99 22 11 CD 41 |MPLE "......"..A|
00001460: 4E 59 20 45 4C 45 43 54 52 4F 4E 49 43 20 55 4E |NY ELECTRONIC UN|
00001470: 49 54 53 2C 20 4C 49 4B 45 20 D4 D6 53 2C 20 D6 |ITS, LIKE ..S, .|
00001480: C3 D2 53 2C 22 00 AE 1C 0E 06 99 22 4D 49 43 52 |..S,"......"MICR|
00001490: 4F 57 41 56 45 20 4F 56 45 4E 53 20 41 4E 44 20 |OWAVE OVENS AND |
000014A0: 53 54 4F 56 45 53 20 48 41 56 45 20 41 22 00 D8 |STOVES HAVE A"..|
000014B0: 1C 18 06 99 22 42 55 49 4C 54 49 4E 20 43 4C 4F |...."BUILTIN CLO|
000014C0: 43 4B 2E 20 20 D4 48 45 20 46 4F 4C 4C 4F 57 49 |CK. .HE FOLLOWI|
000014D0: 4E 47 20 57 49 4C 4C 22 00 05 1D 22 06 99 22 50 |NG WILL"...".."P|
000014E0: 52 4F 44 55 43 45 20 41 20 53 49 4D 55 4C 41 54 |RODUCE A SIMULAT|
000014F0: 49 4F 4E 20 4F 46 20 54 48 41 54 20 46 4F 52 20 |ION OF THAT FOR |
00001500: 59 4F 55 52 22 00 1B 1D 2C 06 99 22 C3 2D 36 34 |YOUR"...,..".-64|
00001510: 20 43 4F 4D 50 55 54 45 52 3A 22 00 42 1D 36 06 | COMPUTER:".B.6.|
00001520: 99 22 11 20 31 29 20 CC CF C1 C4 20 22 C7 28 33 |.". 1) .... ".(3|
00001530: 34 29 22 C3 CC CF C3 CB 22 C7 28 33 34 29 22 2C |4)".....".(34)",|
00001540: 38 22 00 51 1D 40 06 99 22 20 32 29 20 D2 D5 CE |8".Q.@.." 2) ...|
00001550: 22 00 84 1D 4A 06 99 20 22 11 C1 20 43 4C 4F 43 |"...J.. ".. CLOC|
00001560: 4B 20 57 49 4C 4C 20 42 45 20 44 49 53 50 4C 41 |K WILL BE DISPLA|
00001570: 59 45 44 20 41 4E 44 20 43 4F 4E 53 54 41 4E 54 |YED AND CONSTANT|
00001580: 4C 59 22 3B 00 B4 1D 54 06 99 20 22 55 50 44 41 |LY";...T.. "UPDA|
00001590: 54 45 44 20 4F 4E 20 54 48 45 20 54 4F 50 2D 52 |TED ON THE TOP-R|
000015A0: 49 47 48 54 20 43 4F 52 4E 45 52 20 4F 46 20 59 |IGHT CORNER OF Y|
000015B0: 4F 55 52 22 00 E0 1D 5E 06 99 20 22 53 43 52 45 |OUR"...^.. "SCRE|
000015C0: 45 4E 20 28 41 4C 4C 4F 57 49 4E 47 20 59 4F 55 |EN (ALLOWING YOU|
000015D0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 54 4F 22 | TO CONTINUE TO"|
000015E0: 00 EF 1D 68 06 99 20 22 57 4F 52 4B 29 2E 22 00 |...h.. "WORK).".|
000015F0: 1F 1E 72 06 99 22 11 12 20 CE 4F 54 45 20 92 3A |..r..".. .OTE .:|
00001600: 20 41 20 4D 41 43 48 49 4E 45 20 4C 41 4E 47 55 | A MACHINE LANGU|
00001610: 41 47 45 20 52 4F 55 54 49 4E 45 20 49 53 22 00 |AGE ROUTINE IS".|
00001620: 4D 1E 7C 06 99 22 50 4C 41 43 45 44 20 49 4E 20 |M.|.."PLACED IN |
00001630: 54 48 45 20 54 41 50 45 20 42 55 46 46 45 52 20 |THE TAPE BUFFER |
00001640: 41 54 20 38 35 30 20 2D 20 41 4E 59 22 00 7C 1E |AT 850 - ANY".|.|
00001650: 86 06 99 22 4F 54 48 45 52 20 52 4F 55 54 49 4E |..."OTHER ROUTIN|
00001660: 45 20 54 48 41 54 20 55 53 45 53 20 54 48 45 53 |E THAT USES THES|
00001670: 45 20 4C 4F 43 41 54 49 4F 4E 53 22 00 A5 1E 90 |E LOCATIONS"....|
00001680: 06 99 22 57 49 4C 4C 20 49 4E 54 45 52 46 45 52 |.."WILL INTERFER|
00001690: 45 20 57 49 54 48 20 54 48 49 53 20 50 52 4F 47 |E WITH THIS PROG|
000016A0: 52 41 4D 2E 22 00 B0 1E A4 06 8D 20 31 37 32 30 |RAM."...... 1720|
000016B0: 00 B9 1E AE 06 89 20 35 30 00 DD 1E B8 06 99 20 |...... 50...... |
000016C0: 22 05 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
000016D0: 11 11 11 11 11 11 11 11 11 11 11 22 3B 00 13 1F |...........";...|
000016E0: C2 06 99 22 12 5E 92 20 50 52 45 56 20 50 41 47 |...".^. PREV PAG|
000016F0: 45 20 20 12 53 50 41 43 45 92 20 4E 45 58 54 20 |E .SPACE. NEXT |
00001700: 50 41 47 45 20 20 12 5F 92 20 47 44 20 4D 45 4E |PAGE ._. GD MEN|
00001710: 55 22 3B 00 48 1F CC 06 A1 20 49 4E 24 3A 20 8B |U";.H.... IN$: .|
00001720: 20 49 4E 24 B3 B1 20 22 20 22 20 AF 20 49 4E 24 | IN$.. " " . IN$|
00001730: B3 B1 20 22 5E 22 20 AF 20 49 4E 24 B3 B1 22 5F |.. "^" . IN$.."_|
00001740: 22 20 A7 20 31 37 34 30 00 5D 1F D6 06 8B 20 49 |" . 1740.].... I|
00001750: 4E 24 B2 22 5F 22 20 A7 20 31 37 37 30 00 63 1F |N$."_" . 1770.c.|
00001760: E0 06 8E 00 7F 1F EA 06 97 20 36 35 30 2C 30 3A |......... 650,0:|
00001770: 20 99 20 22 93 22 3A 20 9E 20 34 39 31 35 32 00 | . ".": . 49152.|
00001780: 00 00 |.. |
........".... (C) GOLD DISK - TIPS.(....
.U.(.. 53281,0: . 53280,0: Q$.G(34): . 6
50,64...2.. G(14);G(8);"... P R O G R A
M M E R ' S C O R N E R ".C.<..".THERE
ARE MANY CLOCKS AND TIMERS WITHIN"...F.
."THE C-64. A FEW OF THEM, CAN BE USED"
.!.P.."FROM BASIC AND HENCE YOU HAVE A P
OWERFUL";.P.Z.."TIMING TOOL AT YOUR FING
ERTIPS. TIMERS"..D.. "CAN BE USED FOR
CLOCK, ALARM AND STOP-"...N.. "WATCH SIM
ULATIONS AS WELL AS FOR TIMING"...X.. "V
ARIOUS GAME ROUTINES AND CHECKING THE"..
.... "EFFICENCY OF PROGRAMMING CODE.".".
...".MORE INFORMATION ON:".K....". . 1
. HARDWARE INTERVAL TIMER".R. ..". . 2
. USING THE JIFFY CLOCK"......". . 3
. COMPLEX INTERFACE ADAPTER".F....". .
4 . USING THE CIA TOD CLOCK"......".
. 5 . TIMING EXAMPLE"...H.."..PRESS 1,
2, 3, 4, 5 OR <_> FOR GD MENU";.2.R.. IN
$: . IN$."_". 1770.P.... IN$."1" . IN$."
5" . 210.T.... E(IN$) . 240,360,700,860,
1530...... ".. 1. HARDWARE INTERVAL TIME
R ".H....".THE HARDWARE INTERVAL TIMER I
S OFTEN"......"REFER TO AS THE 'JIFFY CL
OCK'. IT IS".$...."A COUNTER THAT IS ZE
ROED AT POWERUP AND".N...."COUNTS IN 1/6
0TH OF A SECOND. THE".{.".."UPDATING IS
DONE DURING THE INTERRUPT"...,.."WHICH
OCCURS ROUGHLY EVERY 1/60TH OF A".W.6.."
SECOND. NOTE THAT TAPE LOADS OR OTHER".
..@.."ROUTINES THAT DISABLE THE INTERRUP
T WILL";./.J.."AFFECT THE TIMING OF THE
JIFFY.".:.T.. 1720.C.^.. 50.H.H.. ".. 2.
USING THE JIFFY CLOCK "...R..".THE JIFF
Y IS ACCESSED THROUGH 2 SYSTEM".A.|.."VA
RIABLES: TI AND TI$ (OR TIME AND".P...."
TIME$)."......".TO READ THE JIFFY:".....
.". 1) I=TI WILL READ THE JIFFY & RETU
RN".I...." A NUMBER IN 1/60TH
OF A SEC".X....". 2) I$=TI$ WILL RETUR
N TIME BASED ON"......" THE JI
FFY IN FORM 'HHMMSS'"...B..".TO SET THE
JIFFY:"...L..". 1) TI$="G(34)"HHMMSS"G
(34)...V.. ".WHERE.."...... ". HH = HO
URS".$.... " MM = MINUTES".<.... " S
S = SECONDS".G.... 1720.Z.... IN$."^" .
50..... ".. 2. USING THE JIFFY CLOCK ".
.....".EXAMPLES:"...&..". 1) TO SET JIFF
Y TO REFLECT 11:23 AM"...0..". TI$="G
(34)"112300"G(34)...:..". 2) TO CHECK TI
ME AFTER SETTING:".;.D..". PRINT "G(3
4)"TIME IS NOW:"G(34)";TI$".J.N..". 3) T
O CHECK THE TIME TAKEN TO EXECUTE"...X..
" A SECTION OF BASIC CODE:"...B..".
1000 TI$="G(34)"000000"G(34).H.L.."
."...V.." . USER SECTION O
F CODE"......" .".C...." 2000
PRINT"G(34)"TIME TAKEN:"G(34)";TI/60;"G
(34)"SECS";.O.... G(34).Z.... 1720.N....
IN$."^" . 360.W.... 50. .... ".. 3. COM
PLEX INTERFACE ADAPTER ".P.F.. ".THE COM
PLEX INTERFACE ADAPTER (CIA) IS"...P.. "
THE 6526 HARDWARE CHIP THAT PERFORMS".+.
Z.."MANY INPUT/OUTPUT (I/O) FUNCTIONS.
ON".Y...."THE C-64, THE CIAS (THERE ARE
2 ON THE"......"C-64) HANDLES SUCH THING
AS JOYSTICKS,"......"PADDLES, LIGHTPENS
, SERIAL I/O AND MUCH"......"MORE. AS P
ART OF THE CIA, THERE IS A"......"HARDWA
RE TIME OF DAY (TOD) CLOCK. THIS".A....
"CLOCK IS HARDWARE DRIVEN AND BECAUSE IT
".O. .. "IT IS NOT DRIVEN BY THE INTERRU
PT, IT"...*.. "IS UNAFFECTED BY SUCH THI
NGS AS TAPE-".I.4.. "LOADS AND ROUTINES
THAT DISABLE THE"...>.. "INTERRUPT."...H
.. 1720...R.. 50...\.. ".. 4. USING THE
CIA TOD CLOCK ".G.F..".THE CIA ARE ACCES
SED VIA MEMORY-MAPPING".O.P.."SIMILAR TO
THAT OF THE SOUND AND"...Z.."GRAPHICS C
HIPS."......".MAPPING IS DONE THROUGH:".
Q....". CIA = $DC00 (56320) FOR CIA #1
"......" CIA = $DD00 (56576) FOR CIA #
2"......".REGISTERS OF INTEREST:".F...."
. CIA+11: REGISTER CONTAINING HOURS".T
...." CIA+10: REGISTER CONTAINING MINU
TES"......" CIA+9: REGISTER CONTAININ
G SECONDS".Q.J.." CIA+8: REGISTER CON
TAINING 1/10 SEC"...T.. ".NOTE: REGISTER
S ARE IN BCD FORMAT. EACH".2.... " REG
ISTER CONTAINS 2 DIGITS OF 4 BITS"._....
" EACH. EACH DIGIT RANGE FROM 0-9.".
..... " THE MSB OF THE HOURS REGISTER
IS THE"...... " AM/PM BIT FLAG."......
1720.H.... IN$."^" . 50...... ".. 4. US
ING THE CIA TOD CLOCK "...$..".TO SET TH
E CLOCK ON THE CIA:".C....". 1) SET HOUR
REGISTER - THIS WILL STOP".Q.8.." TH
E CLOCKING ON THAT CIA TOD CLOCK"...B.."
2) SET THE MINUTES AND SECONDS REGS".J.
L.." 3) SET THE 1/10 SECS REGISTER - THI
S"...V.." WILL START THE CLOCKING"...
`.."..TO READ THE CLOCK IN THE CIA:".D.J
..". 1) READ THE HOURS REGISTER - THIS W
ILL".U.T.." LATCH THE RESULTS FROM TH
E TOD CLOCK";...~.." 2) READ THE MINUTES
AND SECONDS REGS".P...." 3) READ THE 1/
10 SECS REGISTER - THIS"......" WILL
UN-LATCH THE CLOCK".#....". NOTE: A LATC
HED CLOCK WILL CONTINUE TO".;...."
KEEP TIME".F.... 1720.Z.... IN$."^" . 8
60...D.. ".. 4. USING THE CIA TOD CLOCK
"...N.. "...EXAMPLE: CIA STOPWATCH"...X.
.".10 REM.K...."20 REM SET CIA ADDR.X...
."30 REM......"40 CIA=56320......"50 REM
......"60 REM CLEAR TOD CLOCK."...."70 R
EM.P...."80 FOR I=11TO8 STEP-1:POKE CIA+
I,0:NEXT.].(.."90 REM.X.2.."100 REM DISP
LAY TIME...<.."110 REM...F.."120 PRINT "
G(34)"<HOME>"G(34).X.P.."130 FOR I=11TO8
STEP -1:DIG=PEEK(CIA+I)...Z.."140 PRINT
CHR$(DIG/16+48);.#.D.."150 PRINT CHR$((
DIG AND15)+48);" ";.2.N.."160 NEXT.E.X..
"170 GOTO 120.J.... ".. HIT ANY KEY TO C
ONTINUE ";.X...CIA.56320...... I.11.8 ..
1:. CIA.I,0:.. . .. ".."...... I.11.8 .
.1:DIG.B(CIA.I).S.... G(DIG.16.48);.....
. G((DIG .15).48);" ";...H.....R.. IN$:
. IN$."" . 1440...... 1720./.... IN$."^"
. 1050.8.... 50.V.... ".. 5. TIMING EXA
MPLE "......".MANY ELECTRONIC UNITS, LIK
E TVS, VCRS,"......"MICROWAVE OVENS AND
STOVES HAVE A".X...."BUILTIN CLOCK. THE
FOLLOWING WILL"...".."PRODUCE A SIMULAT
ION OF THAT FOR YOUR"...,.."C-64 COMPUTE
R:".B.6..". 1) LOAD "G(34)"CLOCK"G(34)",
8".Q.@.." 2) RUN"...J.. ".A CLOCK WILL B
E DISPLAYED AND CONSTANTLY";...T.. "UPDA
TED ON THE TOP-RIGHT CORNER OF YOUR"...^
.. "SCREEN (ALLOWING YOU TO CONTINUE TO"
...H.. "WORK)."...R..".. NOTE .: A MACHI
NE LANGUAGE ROUTINE IS".M.|.."PLACED IN
THE TAPE BUFFER AT 850 - ANY".|...."OTHE
R ROUTINE THAT USES THESE LOCATIONS"....
.."WILL INTERFERE WITH THIS PROGRAM."...
... 1720...... 50...... "...............
...........";...B..".^. PREV PAGE .SPAC
E. NEXT PAGE ._. GD MENU";.H.L.. IN$: .
IN$.. " " . IN$.. "^" . IN$.."_" . 1740
.].V.. IN$."_" . 1770.C......... 650,0:
. ".": . 49152...
> CLICK IMAGE PREVIEW FOR FULL MODAL