BENCH.SRC
FILE INFORMATION
FILENAME(S): BENCH.SRC
FILE TYPE(S): PRG
FILE SIZE: 442b
FIRST SEEN: 2025-11-30 21:11:34
APPEARS ON: 1 disk(s)
FILE HASH
512c20550ff3cbcb9143ccb3defa3afab9cef9956d26603816c3122b486888b6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NOG UITZOEKEN | BENCH.SRC | PRG | DuncanTwain | 3 | 17 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 42 41 53 45 3D 53 59 50 4E 54 0D 4A 49 46 46 59 |BASE=SYPNT.JIFFY| 00000010: 3D 31 36 32 0D 43 49 4E 54 3D 24 46 46 38 31 0D |=162.CINT=$FF81.| 00000020: 56 49 43 43 4F 4E 31 3D 35 33 32 36 35 0D 56 49 |VICCON1=53265.VI| 00000030: 43 43 4F 4E 32 3D 35 33 32 37 32 0D 20 4C 45 54 |CCON2=53272. LET| 00000040: 20 30 20 2D 3E 20 4A 49 46 46 59 20 2D 3E 20 4A | 0 -> JIFFY -> J| 00000050: 49 46 46 59 2D 31 0D 20 4C 45 54 20 56 49 43 43 |IFFY-1. LET VICC| 00000060: 4F 4E 32 20 3D 20 56 49 43 43 4F 4E 32 20 4F 52 |ON2 = VICCON2 OR| 00000070: 20 38 0D 20 4C 45 54 20 56 49 43 43 4F 4E 31 20 | 8. LET VICCON1 | 00000080: 3D 20 56 49 43 43 4F 4E 31 20 4F 52 20 33 32 0D |= VICCON1 OR 32.| 00000090: 20 4C 45 54 20 42 41 53 45 20 3D 20 30 20 3A 20 | LET BASE = 0 : | 000000A0: 4C 44 59 20 23 30 0D 20 46 4F 52 20 42 41 53 45 |LDY #0. FOR BASE| 000000B0: 2B 31 20 3D 20 33 32 20 54 4F 20 36 33 0D 4C 4F |+1 = 32 TO 63.LO| 000000C0: 4F 50 31 20 4C 45 54 20 30 20 2D 3E 20 28 42 41 |OP1 LET 0 -> (BA| 000000D0: 53 45 29 2C 59 0D 20 20 49 4E 59 20 3A 20 42 4E |SE),Y. INY : BN| 000000E0: 45 20 4C 4F 4F 50 31 0D 20 4E 45 58 54 20 42 41 |E LOOP1. NEXT BA| 000000F0: 53 45 2B 31 0D 20 46 4F 52 20 42 41 53 45 2B 31 |SE+1. FOR BASE+1| 00000100: 20 3D 20 34 20 54 4F 20 37 0D 4C 4F 4F 50 32 20 | = 4 TO 7.LOOP2 | 00000110: 4C 45 54 20 33 20 2D 3E 20 28 42 41 53 45 29 2C |LET 3 -> (BASE),| 00000120: 59 0D 20 20 49 4E 59 20 3A 20 42 4E 45 20 4C 4F |Y. INY : BNE LO| 00000130: 4F 50 32 0D 20 4E 45 58 54 20 42 41 53 45 2B 31 |OP2. NEXT BASE+1| 00000140: 0D 20 4C 45 54 20 54 4D 50 20 3D 20 4A 49 46 46 |. LET TMP = JIFF| 00000150: 59 0D 20 4C 45 54 20 54 4D 50 2B 31 20 3D 20 4A |Y. LET TMP+1 = J| 00000160: 49 46 46 59 2D 31 0D 20 43 49 4E 54 0D 20 50 55 |IFFY-1. CINT. PU| 00000170: 54 20 23 45 4F 4C 20 3A 20 50 55 54 20 23 45 4F |T #EOL : PUT #EO| 00000180: 4C 0D 20 57 50 52 49 4E 54 20 54 4D 50 25 20 3A |L. WPRINT TMP% :| 00000190: 20 50 52 49 4E 54 20 22 20 3D 20 4A 49 46 46 49 | PRINT " = JIFFI| 000001A0: 45 53 22 0D 20 52 45 54 55 52 4E 0D 20 44 49 4D |ES". RETURN. DIM| 000001B0: 20 54 4D 50 25 0D 00 00 00 00 | TMP%..... |
BASE=SYPNT.JIFFY=162.CINT=$FF81.VICCON1= 53265.VICCON2=53272. LET 0 -> JIFFY -> J IFFY-1. LET VICCON2 = VICCON2 OR 8. LET VICCON1 = VICCON1 OR 32. LET BASE = 0 : LDY #0. FOR BASE+1 = 32 TO 63.LOOP1 LET 0 -> (BASE),Y. INY : BNE LOOP1. NEXT BA SE+1. FOR BASE+1 = 4 TO 7.LOOP2 LET 3 -> (BASE),Y. INY : BNE LOOP2. NEXT BASE+1 . LET TMP = JIFFY. LET TMP+1 = JIFFY-1. CINT. PUT #EOL : PUT #EOL. WPRINT TMP% : PRINT " = JIFFIES". RETURN. DIM TMP%... ..
> CLICK IMAGE PREVIEW FOR FULL MODAL