00000000: 00 80 5E 55 3A 43 42 4D 0D 0D 0D 20 20 20 20 20 |..^U:CBM... |
00000010: 20 20 20 20 20 20 20 20 20 CC C9 D3 D4 20 D0 C1 | .... ..|
00000020: D4 D2 CF CC 0D 20 20 20 20 20 20 20 20 20 20 20 |..... |
00000030: 20 20 20 20 20 20 20 42 59 0D 20 20 20 20 20 20 | BY. |
00000040: 20 20 20 20 20 20 C2 55 43 4B 20 C3 48 49 4C 44 | .UCK .HILD|
00000050: 52 45 53 53 0D 0D 0D C3 CF CD CD CF C4 CF D2 C5 |RESS............|
00000060: 20 CD C1 C7 C1 DA C9 CE C5 0D CF 43 54 4F 42 45 | ..........CTOBE|
00000070: 52 20 31 39 38 37 0D 0D 0D 20 20 D7 48 45 4E 20 |R 1987... .HEN |
00000080: 59 4F 55 27 52 45 20 44 45 42 55 47 47 49 4E 47 |YOU'RE DEBUGGING|
00000090: 20 41 20 50 52 4F 47 52 41 4D 2C 0D 4E 4F 54 48 | A PROGRAM,.NOTH|
000000A0: 49 4E 47 20 49 53 20 4D 4F 52 45 20 46 52 55 53 |ING IS MORE FRUS|
000000B0: 54 52 41 54 49 4E 47 20 54 48 41 4E 0D 48 41 56 |TRATING THAN.HAV|
000000C0: 49 4E 47 20 54 4F 20 50 4F 52 45 20 4F 56 45 52 |ING TO PORE OVER|
000000D0: 20 41 20 4C 4F 4E 47 20 4C 49 53 54 49 4E 47 20 | A LONG LISTING |
000000E0: 54 4F 0D 46 49 4E 44 20 57 48 45 52 45 20 41 20 |TO.FIND WHERE A |
000000F0: 50 41 52 54 49 43 55 4C 41 52 20 56 41 52 49 41 |PARTICULAR VARIA|
00000100: 42 4C 45 2C 0D 56 41 4C 55 45 2C 20 4F 52 20 53 |BLE,.VALUE, OR S|
00000110: 55 42 2D 52 4F 55 54 49 4E 45 20 57 41 53 20 55 |UB-ROUTINE WAS U|
00000120: 53 45 44 2E 0D CC C9 D3 D4 20 D0 C1 D4 D2 CF CC |SED...... ......|
00000130: 20 43 41 4E 20 48 45 4C 50 20 49 4E 20 54 48 45 | CAN HELP IN THE|
00000140: 53 45 0D 53 49 54 55 41 54 49 4F 4E 53 3A 20 49 |SE.SITUATIONS: I|
00000150: 54 20 53 45 41 52 43 48 45 53 20 41 20 50 52 4F |T SEARCHES A PRO|
00000160: 47 52 41 4D 20 46 4F 52 0D 41 4E 59 54 48 49 4E |GRAM FOR.ANYTHIN|
00000170: 47 20 59 4F 55 20 43 41 52 45 20 54 4F 20 4C 4F |G YOU CARE TO LO|
00000180: 4F 4B 20 46 4F 52 20 2D 2D 0D 45 56 45 52 59 54 |OK FOR --.EVERYT|
00000190: 48 49 4E 47 20 46 52 4F 4D 20 56 41 4C 55 45 53 |HING FROM VALUES|
000001A0: 20 41 4E 44 20 56 41 52 49 41 42 4C 45 53 0D 54 | AND VARIABLES.T|
000001B0: 4F 20 43 55 52 53 4F 52 2D 43 4F 4E 54 52 4F 4C |O CURSOR-CONTROL|
000001C0: 2C 20 46 55 4E 43 54 49 4F 4E 20 4B 45 59 2C 20 |, FUNCTION KEY, |
000001D0: 41 4E 44 0D 47 52 41 50 48 49 43 53 20 43 48 41 |AND.GRAPHICS CHA|
000001E0: 52 41 43 54 45 52 53 2E 0D 0D 20 20 D5 53 49 4E |RACTERS... .SIN|
000001F0: 47 20 54 48 45 20 50 52 4F 47 52 41 4D 20 49 53 |G THE PROGRAM IS|
00000200: 20 53 49 4D 50 4C 45 3A 20 4C 4F 41 44 0D 41 4E | SIMPLE: LOAD.AN|
00000210: 44 20 52 55 4E 20 CC C9 D3 D4 20 D0 C1 D4 D2 CF |D RUN .... .....|
00000220: CC 2C 20 54 48 45 4E 20 4C 4F 41 44 20 54 48 45 |., THEN LOAD THE|
00000230: 0D 50 52 4F 47 52 41 4D 20 59 4F 55 20 57 49 53 |.PROGRAM YOU WIS|
00000240: 48 20 54 4F 20 53 45 41 52 43 48 2E 20 20 D0 52 |H TO SEARCH. .R|
00000250: 45 53 53 49 4E 47 0D 41 4E 59 20 46 55 4E 43 54 |ESSING.ANY FUNCT|
00000260: 49 4F 4E 20 4B 45 59 20 41 43 54 49 56 41 54 45 |ION KEY ACTIVATE|
00000270: 53 20 CC C9 D3 D4 0D D0 C1 D4 D2 CF CC 2E 20 20 |S ............ |
00000280: C1 20 50 52 4F 4D 50 54 20 41 53 4B 53 20 59 4F |. PROMPT ASKS YO|
00000290: 55 20 54 4F 20 45 4E 54 45 52 0D 54 48 45 20 54 |U TO ENTER.THE T|
000002A0: 41 52 47 45 54 20 28 55 50 20 54 4F 20 33 30 20 |ARGET (UP TO 30 |
000002B0: 43 48 41 52 41 43 54 45 52 53 29 20 59 4F 55 0D |CHARACTERS) YOU.|
000002C0: 57 49 53 48 20 54 4F 20 53 45 41 52 43 48 20 46 |WISH TO SEARCH F|
000002D0: 4F 52 2E 20 20 28 CC C9 D3 D4 20 D0 C1 D4 D2 CF |OR. (.... .....|
000002E0: CC 0D 52 45 4D 41 49 4E 53 20 49 4E 20 51 55 4F |..REMAINS IN QUO|
000002F0: 54 45 20 4D 4F 44 45 2C 20 41 4C 4C 4F 57 49 4E |TE MODE, ALLOWIN|
00000300: 47 20 59 4F 55 0D 54 4F 20 45 4E 54 45 52 20 4E |G YOU.TO ENTER N|
00000310: 4F 52 4D 41 4C 4C 59 20 4E 4F 4E 2D 50 52 49 4E |ORMALLY NON-PRIN|
00000320: 54 49 4E 47 0D 43 48 41 52 41 43 54 45 52 53 20 |TING.CHARACTERS |
00000330: 4C 49 4B 45 20 46 55 4E 43 54 49 4F 4E 20 4B 45 |LIKE FUNCTION KE|
00000340: 59 53 2E 29 0D D0 52 45 53 53 20 D2 C5 D4 D5 D2 |YS.)..RESS .....|
00000350: CE 20 57 48 45 4E 20 46 49 4E 49 53 48 45 44 2E |. WHEN FINISHED.|
00000360: 0D 0D 20 20 D7 48 45 4E 20 CC C9 D3 D4 20 D0 C1 |.. .HEN .... ..|
00000370: D4 D2 CF CC 20 46 49 4E 44 53 20 54 48 45 20 54 |.... FINDS THE T|
00000380: 41 52 47 45 54 2C 0D 45 41 43 48 20 4C 49 4E 45 |ARGET,.EACH LINE|
00000390: 20 43 4F 4E 54 41 49 4E 49 4E 47 20 54 48 45 20 | CONTAINING THE |
000003A0: 54 41 52 47 45 54 20 49 53 0D 44 49 53 50 4C 41 |TARGET IS.DISPLA|
000003B0: 59 45 44 2E 20 20 D4 48 45 20 50 52 4F 47 52 41 |YED. .HE PROGRA|
000003C0: 4D 20 4C 49 53 54 53 20 55 50 20 54 4F 0D 45 49 |M LISTS UP TO.EI|
000003D0: 47 48 54 20 4C 49 4E 45 53 20 41 54 20 41 20 54 |GHT LINES AT A T|
000003E0: 49 4D 45 2E 20 20 C9 46 20 54 48 45 52 45 20 41 |IME. .F THERE A|
000003F0: 52 45 0D 4D 4F 52 45 20 54 48 41 54 20 45 49 47 |RE.MORE THAT EIG|
00000400: 48 54 20 4C 49 4E 45 53 2C 20 50 52 45 53 53 49 |HT LINES, PRESSI|
00000410: 4E 47 20 C6 31 0D 44 49 53 50 4C 41 59 53 20 54 |NG .1.DISPLAYS T|
00000420: 48 45 20 52 45 53 54 2E 20 20 C1 20 52 4F 57 20 |HE REST. . ROW |
00000430: 4F 46 0D 41 53 54 45 52 49 53 4B 53 20 54 45 4C |OF.ASTERISKS TEL|
00000440: 4C 53 20 59 4F 55 20 54 48 41 54 20 54 48 45 52 |LS YOU THAT THER|
00000450: 45 20 41 52 45 20 4E 4F 0D 4D 4F 52 45 20 4C 49 |E ARE NO.MORE LI|
00000460: 4E 45 53 20 54 48 41 54 20 43 4F 4E 54 41 49 4E |NES THAT CONTAIN|
00000470: 20 54 48 45 20 54 41 52 47 45 54 2E 0D D0 52 45 | THE TARGET...RE|
00000480: 53 53 49 4E 47 20 C6 33 20 4C 49 53 54 53 20 54 |SSING .3 LISTS T|
00000490: 48 45 20 4C 49 4E 45 53 0D 49 4E 20 52 45 56 45 |HE LINES.IN REVE|
000004A0: 52 53 45 20 4F 52 44 45 52 3B 20 C6 35 20 54 41 |RSE ORDER; .5 TA|
000004B0: 4B 45 53 20 59 4F 55 20 42 41 43 4B 0D 54 4F 20 |KES YOU BACK.TO |
000004C0: 54 48 45 20 42 45 47 49 4E 4E 49 4E 47 20 4F 46 |THE BEGINNING OF|
000004D0: 20 54 48 45 20 4C 49 53 54 2E 20 20 D0 52 45 53 | THE LIST. .RES|
000004E0: 53 0D C6 37 20 54 4F 20 53 54 41 52 54 20 4F 56 |S..7 TO START OV|
000004F0: 45 52 2E 0D 0D 20 20 D4 4F 20 45 58 49 54 20 CC |ER... .O EXIT .|
00000500: C9 D3 D4 20 D0 C1 D4 D2 CF CC 2C 20 50 52 45 53 |... ......, PRES|
00000510: 53 20 54 48 45 0D D2 D5 CE 2F D3 D4 CF D0 20 4B |S THE..../.... K|
00000520: 45 59 2E 20 20 C1 47 41 49 4E 2C 20 50 52 45 53 |EY. .GAIN, PRES|
00000530: 53 49 4E 47 20 41 4E 59 0D 46 55 4E 43 54 49 4F |SING ANY.FUNCTIO|
00000540: 4E 20 4B 45 59 20 4C 45 54 53 20 59 4F 55 20 52 |N KEY LETS YOU R|
00000550: 45 45 4E 54 45 52 20 54 48 45 0D 50 52 4F 47 52 |EENTER THE.PROGR|
00000560: 41 4D 2E 20 20 D4 4F 20 44 49 53 41 42 4C 45 20 |AM. .O DISABLE |
00000570: CC C9 D3 D4 20 D0 C1 D4 D2 CF CC 2C 0D 50 52 45 |.... ......,.PRE|
00000580: 53 53 20 54 48 45 20 D2 D5 CE 2F D3 D4 CF D0 2D |SS THE .../....-|
00000590: D2 C5 D3 D4 CF D2 C5 0D 43 4F 4D 42 49 4E 41 54 |........COMBINAT|
000005A0: 49 4F 4E 2E 20 20 D3 D9 D3 20 35 30 30 30 30 20 |ION. ... 50000 |
000005B0: 52 45 45 4E 41 42 4C 45 53 20 54 48 45 0D 50 52 |REENABLES THE.PR|
000005C0: 4F 47 52 41 4D 2E 0D 0D 0D C4 C9 D3 CB 20 C6 C9 |OGRAM........ ..|
000005D0: CC C5 D3 20 D4 C8 C9 D3 20 D0 D2 CF C7 D2 C1 CD |... .... .......|
000005E0: 20 D5 D3 C5 D3 3A 0D 0D CC C9 D3 D4 20 D0 C1 D4 | ....:...... ...|
000005F0: D2 CF CC 20 C2 CF CF D4 20 20 20 CC C9 D3 D4 20 |... .... .... |
00000600: D0 C1 D4 D2 CF CC 0D D4 2E CC C9 D3 D4 20 D0 C1 |............. ..|
00000610: D4 D2 CF CC 20 C2 CF 0D 0D 20 20 20 20 20 20 20 |.... .... |
00000620: 20 2A 2A 2A 2A 20 C5 4E 44 20 CF 46 20 D4 45 58 | **** .ND .F .EX|
00000630: 54 20 2A 2A 2A 2A 0D |T ****. |
..^U:CBM... LIST PATROL.
BY. BUCK CHILD
RESS...COMMODORE MAGAZINE.OCTOBER 1987..
. WHEN YOU'RE DEBUGGING A PROGRAM,.NOTH
ING IS MORE FRUSTRATING THAN.HAVING TO P
ORE OVER A LONG LISTING TO.FIND WHERE A
PARTICULAR VARIABLE,.VALUE, OR SUB-ROUTI
NE WAS USED..LIST PATROL CAN HELP IN THE
SE.SITUATIONS: IT SEARCHES A PROGRAM FOR
.ANYTHING YOU CARE TO LOOK FOR --.EVERYT
HING FROM VALUES AND VARIABLES.TO CURSOR
-CONTROL, FUNCTION KEY, AND.GRAPHICS CHA
RACTERS... USING THE PROGRAM IS SIMPLE:
LOAD.AND RUN LIST PATROL, THEN LOAD THE
.PROGRAM YOU WISH TO SEARCH. PRESSING.A
NY FUNCTION KEY ACTIVATES LIST.PATROL.
A PROMPT ASKS YOU TO ENTER.THE TARGET (U
P TO 30 CHARACTERS) YOU.WISH TO SEARCH F
OR. (LIST PATROL.REMAINS IN QUOTE MODE,
ALLOWING YOU.TO ENTER NORMALLY NON-PRIN
TING.CHARACTERS LIKE FUNCTION KEYS.).PRE
SS RETURN WHEN FINISHED... WHEN LIST PA
TROL FINDS THE TARGET,.EACH LINE CONTAIN
ING THE TARGET IS.DISPLAYED. THE PROGRA
M LISTS UP TO.EIGHT LINES AT A TIME. IF
THERE ARE.MORE THAT EIGHT LINES, PRESSI
NG F1.DISPLAYS THE REST. A ROW OF.ASTER
ISKS TELLS YOU THAT THERE ARE NO.MORE LI
NES THAT CONTAIN THE TARGET..PRESSING F3
LISTS THE LINES.IN REVERSE ORDER; F5 TA
KES YOU BACK.TO THE BEGINNING OF THE LIS
T. PRESS.F7 TO START OVER... TO EXIT L
IST PATROL, PRESS THE.RUN/STOP KEY. AGA
IN, PRESSING ANY.FUNCTION KEY LETS YOU R
EENTER THE.PROGRAM. TO DISABLE LIST PAT
ROL,.PRESS THE RUN/STOP-RESTORE.COMBINAT
ION. SYS 50000 REENABLES THE.PROGRAM...
.DISK FILES THIS PROGRAM USES:..LIST PAT
ROL BOOT LIST PATROL.T.LIST PATROL BO.
. **** END OF TEXT ****.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL