0 'ZIPSUB.100 (c)1989 Wilson Van Alst v5.00 All rights reserved. 1 'Run this program to make ZIPSUB.CO, 2 ' a machine language Search/Replace 3 ' utility that runs in the AltLCD 4 ' buffer and works on RAM files 5 ' in place. 6 'See ZIPSUB.DOC for details. 7 ' 10 READT,E,X:FORR=TTOE:PRINT@90,R:READY:POKER,Y:C=C+Y:NEXT:READK:IFC-KTHENPRINT"Bad Data":BEEPELSESAVEM"ZIPSUB",T,E,X:MENU:DATA64704,64977,64704,205,49,66,205,58,31,205,187,253,70,105,108,101,0,200,235,33,192,252,34,82,246,229,235,95,205,11,76 11 DATA205,160,32,200,205,187,253,27,106,70,105,110,100,0,208,17,224,252,213,50,96,253,17,233,246,205,195,101,205,187,253,32,83,117,98,0,218,17,253,192,205,160,253,68,101,108,101,116,101,7,0,200,175,50,97,253,205,160,253,27,77,65,115,107,0 12 DATA254,81,200,50,52,253,205,15,34,235,33,233,246,205,63,92,208,205,118,118,105,96,62,0,167,202,95,253,229,205,49,66,223,204,143,253,26,254,26,202,78,253,231,19,254,10,194,61,253,205,160,253,83,117,98,0,225,194,95,253,167,192,35,195,38,253 13 DATA1,0,0,120,167,202,137,253,17,133,246,26,119,5,35,19,202,136,253,13,194,106,253,72,6,0,213,205,109,107,209,218,167,96,65,205,105,52,195,38,253,13,205,159,107,195,38,253,58,72,246,47,50,72,246,167,200,58,96,253,79,6,0,9,201,227,205,162 14 DATA17,227,33,202,253,205,162,17,205,100,93,254,81,200,214,78,200,254,11,194,165,253,167,201,227,205,162,17,227,205,62,70,35,5,120,200,254,80,201,63,32,89,47,78,47,81,0,036842