Listing of file='REDEC2.SCR;2B' on disk='vmedia/chip_121-sector.ccvf'
### Disk Sector 344 ### 00: 28 20 52 45 43 55 52 53 49 56 45 20 44 45 43 4f ( RECURSIVE DECO 10: 4d 50 49 4c 45 52 20 32 20 20 20 20 20 20 20 20 MPILER 2 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30: 20 20 20 20 31 32 4d 41 52 38 34 57 4c 47 20 29 12MAR84WLG ) 40: 3a 20 47 43 48 4b 20 44 55 50 20 40 20 32 2b 20 : GCHK DUP @ 2+ 50: 27 20 43 4f 4d 50 49 4c 45 20 3d 20 20 20 20 20 ' COMPILE = 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 345 ### 00: 20 20 49 46 20 32 2b 20 44 55 50 20 40 20 32 2b IF 2+ DUP @ 2+ 10: 20 4e 46 41 20 49 44 2e 20 32 2b 20 20 20 20 20 NFA ID. 2+ 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 45 4c 53 45 20 44 55 50 20 40 20 32 2b 20 ELSE DUP @ 2+ 50: 44 55 50 20 27 20 4c 49 54 20 3d 20 20 20 20 20 DUP ' LIT = 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 346 ### 00: 20 20 20 20 20 20 20 20 4f 56 45 52 20 27 20 42 OVER ' B 10: 52 41 4e 43 48 20 3d 20 4f 52 20 20 20 20 20 20 RANCH = OR 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 4f 56 45 52 20 27 20 30 OVER ' 0 50: 42 52 41 4e 43 48 20 3d 20 4f 52 20 20 20 20 20 BRANCH = OR 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 347 ### 00: 20 20 20 20 20 20 20 20 4f 56 45 52 20 27 20 28 OVER ' ( 10: 4c 4f 4f 50 29 20 3d 20 4f 52 20 20 20 20 20 20 LOOP) = OR 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 53 57 41 50 20 27 20 28 SWAP ' ( 50: 2b 4c 4f 4f 50 29 20 3d 20 4f 52 20 20 20 20 20 +LOOP) = OR 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 348 ### 00: 20 20 49 46 20 32 2b 20 44 55 50 20 40 20 53 50 IF 2+ DUP @ SP 10: 41 43 45 20 2e 20 32 2b 20 20 20 20 20 20 20 20 ACE . 2+ 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 45 4c 53 45 20 44 55 50 20 40 20 32 2b 20 ELSE DUP @ 2+ 50: 33 33 30 30 30 20 3d 20 20 20 20 20 20 20 20 20 33000 = 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 349 ### 00: 20 20 20 20 20 20 20 20 49 46 20 32 2b 20 44 55 IF 2+ DU 10: 50 20 43 40 20 53 50 41 43 45 20 2e 20 31 2b 20 P C@ SPACE . 1+ 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 45 4c 53 45 20 44 55 50 ELSE DUP 50: 20 40 20 32 2b 20 27 20 28 2e 22 29 20 3d 20 20 @ 2+ ' (.") = 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 350 ### 00: 20 20 20 20 20 20 20 20 20 20 49 46 20 32 2b 20 IF 2+ 10: 44 55 50 20 43 4f 55 4e 54 20 54 59 50 45 20 20 DUP COUNT TYPE 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: 44 55 50 20 43 40 20 31 2b 20 2b 20 20 20 20 20 DUP C@ 1+ + 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 351 ### 00: 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 32 ELSE 2 10: 2b 20 54 48 45 4e 20 54 48 45 4e 20 54 48 45 4e + THEN THEN THEN 20: 20 54 48 45 4e 20 20 20 20 20 20 20 20 20 20 20 THEN 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 2d 32 20 47 49 4e -2 GIN 50: 20 2b 21 20 3b 20 2d 2d 3e 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