100 REM MERGE
110 DATA A
120 DATA *=,828,0
130 DATA ,GOSUB,44797,
140 DATA ,GOSUB,57812,
150 DATA ,MOVE,45,A
160 DATA ,ADD#,-2,A
170 DATA ,CMOVE#,0,185
180 DATA ,SETREGS,185,A
190 DATA ,GOTO,57717,
200 DATA _