JSR4((36866)128)64((36869)120):CO(378884((36866)128))SR} "":214,10::201,5:A$"QUATRAINMENT":646,0DF37154:PA37151:PB37152T11(A$):(A$,T1,1);:T1200:::T1500:RN16("";10);"TIME:"-"MOVES:";MO-2"EDGES"T5"CORNERS  "x6"CENTERS"7:214,19::211,0d140nL14:B14:D(L,B)(C(L,B)):B:L:sT1500:xL14:B14:B(L,B)D(L,B)/::SC(TI$)16MO5:"":"MATCHED!!"I" SCORE:":(SC);""d5)"AGAIN Y OR N?"(197)11(197)28137(197)1136879,24J082TSRSR17622:TJ,93TCOJ,6::J082TSRSR8:TJ22,67:TCOJ22,6:,J082PTSR230SR23017622:TJ,93bTCOJ,6::oJ082TSR230SR8230:TJ22,67:TCOJ22,6:U14:T14:C(T,U)SR2072T44U:T:U,T14:A(T,1)SR212T:A(T,2)SR652T,1A(T,3)SR1092T:A(T,4)SR1532T:B6570:X1:Y1:500S;TI$"000000"@DF,127:GP(PB)128:JO(GP0)4:DF,255:GP(PA):JO340AJO((GP8)0)2:JO340BJO((GP4)0):JO340DJO((GP16)0)3EJO0JO5 TJO390,410,450,430,470# ^((GP32)0)03754 h910:MOMO1_ rGP(PA):((GP32)0)1370:110:120 w"";15);(TI$,5);"";MO |320 Y10480 YY1:500: Y15480 YY1:500: X15480 XX1:500: X10480 XX1:500: 500: ' 3208 P1(A(X,Y))G A(X,Y),81b A(X,Y)CO,2:T150:q A(X,Y),P1z P10 110:120: :WE((0)8)1:J1WERN:X: DY14:X14:Q:Q0600 N610 XX:Y:640:680: bA(X,Y),86 lA(X,Y)CO,2 v110,120:< X14:Y14:B(X,Y)(A(X,Y))H Y:X:] Y14:X14:P| PC(X,Y),86:C(X,Y)CO,0 X:Y: 1,1,1,1,1,0,0,1,1,0,0,1,1,1,1,1 0,0,0,0,0,1,1,0,0,1,1,0,0,0,0,0 0,1,1,0,1,0,0,1,1,0,0,1,0,1,1,0 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1A 1,0,0,1,0,1,1,0,0,1,1,0,1,0,0,1f 1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1 0,0,0,1,0,0,0,1,0,0,0,1,0,0,0,1 1,0,0,1,0,0,0,0,0,0,0,0,1,0,0,1 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 0,0,0,0,1,0,0,1,1,0,0,1,0,0,0,0  REVERSE" *A(C,D),118(A(C,D))3 >A(C,D)CO,2< HP10B \Y f SET DATA POINTERv  WHICH ONES TO CHANGE XY2950 C23:D1:810::D13:C1:810: D2:C2:810: XY8980 C321:D4:810::D411:C4:810:C3:D3:810:#XY510204XY41020_C321:D1:810::D13:C4:810:rC3:D2:810:XY51060X11060C23:D4:810::D421:C1:810:C2:D3:810:$ CHECK EDGES.(X1X4)(Y1Y4)CX1:DY:810:CX1:810:1100T8(Y1Y4)(X1X4)DY1:CX:810:DY1:810:1100^B1160vLY1DY1:CX:810VY4DY1:CX:810`X4CX1:DY:810jX1CX1:DY:810t~ CHECK CENTERS(X1)(Y1)(X4)(Y4)1200DY1:CX:810:CX1:DY:810>DY1:CX:810:CX1:DY:810OCX:DY:810U