Listing of file='EDIT07.SCR;12' on disk='vmedia/chip_121-sector.ccvf'
### Disk Sector 144 ### 00: 28 20 53 63 72 65 65 6e 20 45 64 69 74 6f 72 20 ( Screen Editor 10: 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30: 20 20 20 20 57 4c 47 32 33 4f 43 54 38 32 20 29 WLG23OCT82 ) 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 145 ### 00: 3a 20 53 43 41 4e 2d 3c 3e 20 20 20 20 20 20 20 : SCAN-<> 10: 20 32 44 55 50 20 3d 20 49 46 20 44 52 4f 50 20 2DUP = IF DROP 20: 32 44 52 4f 50 20 30 20 45 4c 53 45 20 30 20 52 2DROP 0 ELSE 0 R 30: 4f 54 20 52 4f 54 20 44 4f 20 4f 56 45 52 20 20 OT ROT DO OVER 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 49 20 43 40 20 3c 3e 20 49 46 20 4c 45 41 56 I C@ <> IF LEAV 60: 45 20 45 4c 53 45 20 31 2d 20 45 4e 44 49 46 20 E ELSE 1- ENDIF 70: 2d 31 20 2b 4c 4f 4f 50 20 20 20 20 20 20 20 20 -1 +LOOP ### Disk Sector 146 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10: 20 53 57 41 50 20 44 52 4f 50 20 45 4e 44 49 46 SWAP DROP ENDIF 20: 20 3b 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: 3a 20 53 43 41 4e 2b 3c 3e 20 20 20 20 20 20 20 : SCAN+<> 50: 20 32 44 55 50 20 3d 20 49 46 20 44 52 4f 50 20 2DUP = IF DROP 60: 32 44 52 4f 50 20 30 20 45 4c 53 45 20 30 20 52 2DROP 0 ELSE 0 R 70: 4f 54 20 52 4f 54 20 44 4f 20 4f 56 45 52 20 20 OT ROT DO OVER ### Disk Sector 147 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10: 20 49 20 43 40 20 3c 3e 20 49 46 20 4c 45 41 56 I C@ <> IF LEAV 20: 45 20 45 4c 53 45 20 31 2b 20 45 4e 44 49 46 20 E ELSE 1+ ENDIF 30: 4c 4f 4f 50 20 20 20 20 20 20 20 20 20 20 20 20 LOOP 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 53 57 41 50 20 44 52 4f 50 20 45 4e 44 49 46 SWAP DROP ENDIF 60: 20 3b 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 148 ### 00: 3a 20 4c 2d 57 4f 52 44 20 20 20 20 20 20 20 20 : L-WORD 10: 20 42 4c 20 30 20 42 55 46 2d 41 44 52 20 42 55 BL 0 BUF-ADR BU 20: 46 50 4f 53 20 53 43 41 4e 2d 3d 20 3e 52 20 42 FPOS SCAN-= >R B 30: 4c 20 30 20 42 55 46 2d 41 44 52 20 20 20 20 20 L 0 BUF-ADR 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 42 55 46 50 4f 53 20 52 20 2b 20 53 43 41 4e BUFPOS R + SCAN 60: 2d 3c 3e 20 52 3e 20 2b 20 44 55 50 20 42 55 46 -<> R> + DUP BUF 70: 50 4f 53 20 2b 20 43 40 20 42 4c 20 20 20 20 20 POS + C@ BL ### Disk Sector 149 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10: 20 3d 20 49 46 20 31 2b 20 45 4e 44 49 46 20 2b = IF 1+ ENDIF + 20: 43 55 52 50 4f 53 20 3b 20 20 20 20 20 20 20 20 CURPOS ; 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 3a 20 4d 4f 56 2d 52 2d 57 4f 52 44 20 20 20 20 : MOV-R-WORD 50: 20 42 4c 20 5b 20 43 2f 53 43 52 20 31 2d 20 5d BL [ C/SCR 1- ] 60: 20 4c 49 54 45 52 41 4c 20 42 55 46 2d 41 44 52 LITERAL BUF-ADR 70: 20 42 55 46 50 4f 53 20 20 20 20 20 20 20 20 20 BUFPOS ### Disk Sector 150 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10: 20 53 43 41 4e 2b 3d 20 3e 52 20 42 4c 20 5b 20 SCAN+= >R BL [ 20: 43 2f 53 43 52 20 31 2d 20 5d 20 4c 49 54 45 52 C/SCR 1- ] LITER 30: 41 4c 20 42 55 46 2d 41 44 52 20 20 20 20 20 20 AL BUF-ADR 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 42 55 46 50 4f 53 20 52 20 2b 20 53 43 41 4e BUFPOS R + SCAN 60: 2b 3c 3e 20 52 3e 20 2b 20 3b 20 20 20 20 20 20 +<> R> + ; 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 151 ### 00: 3a 20 52 2d 57 4f 52 44 20 20 20 20 20 20 20 20 : R-WORD 10: 20 4d 4f 56 2d 52 2d 57 4f 52 44 20 2b 43 55 52 MOV-R-WORD +CUR 20: 50 4f 53 20 3b 20 2d 2d 3e 20 20 20 20 20 20 20 POS ; --> 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