1 FL%=0
2 FOR I%=1TO4: READ LO,L%,H%: IF PEEK(LO)<>L% OR PEEK(LO+1)<>H% THEN PRINTLO;"HAS WRONG DATA": FL%=FL%+1
3 NEXT: IF FL% THEN END
4 FORI%=1TO4: READ LO,AD:  H%=AD/256:L%=AD-H%*256: POKE LO,L%: POKE LO+1,H%: NEXT
5 CALL 41216
7 ' ORDER OF DATA IS: KEYX, CHGET, PRTTAB, LCD, MENU
8 DATA 46206,112,114, 46219,203,18, 46261,85,75, 46358,68,75, 47502,151,87
9 DATA 46206,KEYX, 46219,CHGET, 46261,PRTTAB, 46358,LCD, 47502,MENU