Listing of file='UTIL05.SCR;26' on disk='vmedia/chip_121-sector.ccvf'
### Disk Sector 304 ### 00: 28 20 55 54 49 4c 49 54 49 45 53 20 35 20 20 20 ( UTILITIES 5 10: 20 2d 21 20 57 48 45 52 45 20 45 52 52 20 47 4f -! WHERE ERR GO 20: 4f 44 42 59 45 20 20 20 20 20 20 20 20 20 20 20 ODBYE 30: 20 20 20 20 33 30 4d 41 52 38 34 57 4c 47 20 29 30MAR84WLG ) 40: 20 20 48 45 58 20 20 20 30 20 56 41 52 49 41 42 HEX 0 VARIAB 50: 4c 45 20 45 52 52 4c 4f 43 20 20 20 20 3a 20 2d LE ERRLOC : - 60: 21 20 20 44 55 50 20 40 20 52 4f 54 20 2d 20 53 ! DUP @ ROT - S 70: 57 41 50 20 21 20 3b 20 20 20 20 20 20 20 20 20 WAP ! ; ### Disk Sector 305 ### 00: 3a 20 57 48 45 52 45 20 42 4c 4b 20 40 20 49 46 : WHERE BLK @ IF 10: 20 42 4c 4b 20 40 20 44 55 50 20 53 43 52 20 21 BLK @ DUP SCR ! 20: 20 43 52 20 43 52 20 2e 22 20 53 43 52 23 20 22 CR CR ." SCR# " 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 20 20 20 20 20 20 20 20 44 55 50 20 2e 20 49 4e DUP . IN 50: 20 40 20 33 46 46 20 4d 49 4e 20 44 55 50 20 45 @ 3FF MIN DUP E 60: 52 52 4c 4f 43 20 21 20 43 2f 4c 20 2f 4d 4f 44 RRLOC ! C/L /MOD 70: 20 44 55 50 20 20 20 20 20 20 20 20 20 20 20 20 DUP ### Disk Sector 306 ### 00: 20 20 20 20 20 20 20 20 2e 22 20 4c 49 4e 45 23 ." LINE# 10: 20 22 20 2e 20 43 2f 4c 20 2a 20 52 4f 54 20 42 " . C/L * ROT B 20: 4c 4f 43 4b 20 2b 20 43 52 20 43 52 20 43 2f 4c LOCK + CR CR C/L 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 20 20 20 20 20 20 20 20 2d 54 52 41 49 4c 49 4e -TRAILIN 50: 47 20 54 59 50 45 20 49 4e 20 40 20 33 46 46 46 G TYPE IN @ 3FFF 60: 20 3e 20 2b 20 45 4c 53 45 20 49 4e 20 40 20 20 > + ELSE IN @ 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 307 ### 00: 20 20 20 20 20 20 20 20 54 48 45 4e 20 43 52 20 THEN CR 10: 48 45 52 45 20 43 40 20 44 55 50 20 44 55 50 20 HERE C@ DUP DUP 20: 31 2b 20 45 52 52 4c 4f 43 20 2d 21 20 3e 52 20 1+ ERRLOC -! >R 30: 2d 20 48 45 52 45 20 52 20 2b 20 31 2b 20 20 20 - HERE R + 1+ 40: 20 20 20 20 20 20 20 20 43 40 20 32 30 20 3d 20 C@ 20 = 50: 49 46 20 31 2d 20 54 48 45 4e 20 53 50 41 43 45 IF 1- THEN SPACE 60: 53 20 52 3e 20 30 20 44 4f 20 35 45 20 45 4d 49 S R> 0 DO 5E EMI 70: 54 20 4c 4f 4f 50 20 3b 20 20 20 20 20 20 20 20 T LOOP ; ### Disk Sector 308 ### 00: 3a 20 45 52 52 20 20 20 57 41 52 4e 49 4e 47 20 : ERR WARNING 10: 40 20 30 3c 20 49 46 20 28 41 42 4f 52 54 29 20 @ 0< IF (ABORT) 20: 54 48 45 4e 20 57 48 45 52 45 20 43 52 20 2e 22 THEN WHERE CR ." 30: 20 48 55 48 3f 22 20 20 20 20 20 20 20 20 20 20 HUH?" 40: 20 20 20 20 20 20 20 20 43 52 20 4d 45 53 53 41 CR MESSA 50: 47 45 20 53 50 21 20 42 4c 4b 20 40 20 2d 44 55 GE SP! BLK @ -DU 60: 50 20 49 46 20 49 4e 20 40 20 53 57 41 50 20 54 P IF IN @ SWAP T 70: 48 45 4e 20 53 51 55 49 54 20 3b 20 20 20 20 20 HEN SQUIT ; ### Disk Sector 309 ### 00: 44 45 43 49 4d 41 4c 20 50 41 54 43 48 20 45 52 DECIMAL PATCH ER 10: 52 20 45 52 52 4f 52 20 20 20 20 20 20 20 20 20 R ERROR 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 310 ### 00: 3a 20 47 4f 4f 44 42 59 45 20 20 45 58 54 45 4e : GOODBYE EXTEN 10: 44 20 48 45 52 45 20 31 2d 20 48 45 58 20 43 52 D HERE 1- HEX CR 20: 20 32 32 20 45 4d 49 54 20 2e 22 20 46 4f 52 54 22 EMIT ." FORT 30: 48 20 65 6e 64 73 20 61 74 20 22 20 20 20 20 20 H ends at " 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 20 31 39 20 45 4d 49 54 20 55 2e 20 32 36 20 19 EMIT U. 26 60: 45 4d 49 54 20 2e 22 20 48 22 20 32 32 20 45 4d EMIT ." H" 22 EM 70: 49 54 20 43 52 20 20 20 20 20 20 20 20 20 20 20 IT CR ### Disk Sector 311 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10: 20 20 2e 22 20 4c 45 41 56 49 4e 47 20 46 4f 52 ." LEAVING FOR 20: 54 48 2c 20 48 61 76 65 20 41 20 4e 69 63 65 20 TH, Have A Nice 30: 44 61 79 22 20 43 52 20 42 59 45 20 3b 20 20 20 Day" CR BYE ; 40: 20 20 20 20 20 3b 53 20 20 20 20 20 20 20 20 20 ;S 50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20