// #define GTC_ONCALC //undo this line if with GCC4TI #define MIN_AMS 200 #include #ifdef GTC_ONCALC long al(long a) {return a;} long mu(long a,long b) {return a*b;} long di(long a,long b) {return a/b;} #else #define al(a) (a) #define mu(a,b) (a)*(b) #define di(a,b) (a)/(b) #endif #define WITH_GRAPHH WINDOW wind; unsigned char is_interh; unsigned char *lcdad; unsigned char gmode; INT_HANDLER OldInt5 = NULL; long ir; long var23,var42,var44,var46,var47,var48,var49,var50,var51,var53,var54,var55,var56,var61,var62,var63,var64,var66,var67,var69,var70,var73,var74,var75,var76,var77,var78,var79,var80,var81,var82,var83,var84,var85,var86,var87,var88,var89,var90,var91; char *psb1,*psb2,*psb3,*psb4,*psb5,*psb6,*psb7,*psb8; char psb9[]={255,129,189,189,189,189,129,255,255,255,195,195,195,195,255,255}; char psb10[]={126,255,255,255,255,255,255,126,60,126,102,60,126,195,165,153,153,165,195,126,60,66,66,60,129,0,0,0,0,0,0,129,195,129,129,195}; char psb11[]={126,255,255,255,255,255,255,126,60,126,102,60,126,129,165,165,165,165,129,126,60,66,66,60,129,0,0,0,0,0,0,129,195,129,129,195}; char psb12[]={126,255,255,255,255,255,255,126,60,126,102,60,126,129,129,129,129,129,129,126,60,66,66,60,129,0,0,0,0,0,0,129,195,129,129,195}; char psb13[]={60,126,126,126,126,126,126,60,24,60,36,24,60,66,74,74,74,74,66,60,24,36,36,24,195,129,129,129,129,129,129,195,231,195,195,231}; char psb14[]={60,126,126,126,126,126,126,60,24,60,36,24,60,66,82,82,82,82,66,60,24,36,36,24,195,129,129,129,129,129,129,195,231,195,195,231}; char psb15[]={255,51,17,255,153,136,136,255,255,221,255,255,238,255,255,255}; char psb16[]={1,62,126,118,126,126,126,60,1,62,118,122,126,126,126,60}; char psb17[]={255,255,255,255,255,255,255,255,255,129,189,165,165,189,129,255}; char psb18[]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}; char psb19[]={255,255,255,255,255,255,255,255,129,66,36,24,24,36,66,129}; char psb20[]={1,62,126,118,118,98,118,60,1,62,118,122,118,98,118,60}; char psb21[]={24,0,0,153,153,0,0,24,0,24,24,126,126,24,24,0}; char psb22[]={102,155,135,129,66,36,24,0,102,253,249,255,126,60,24,0}; long fc1(),fc2(),fc3(),fc4(),fc5(),fc6(),fc7(),fc8(),fc9(),fc10(long,long,long,long),fc11(long,long,long),fc12(long,long,long),fc13(),fc14(long,long),fc15(long,long),fc16(long,long),fc17(long),fc18(long,long),fc19(),fc20(long,long,long); #include #include #include #include #ifdef WITH_GRAPHH #ifdef GTC_ONCALC #include #else #include #endif #endif #include long fc1() { GrayOff();lcdad=0x4c00; if(psb1) {free(psb1);} if(psb2) {free(psb2);} if(psb3) {free(psb3);} if(psb4) {free(psb4);} if(psb6) {free(psb6);} if(psb7) {free(psb7);} if(psb8) {free(psb8);} if(psb5) {free(psb5);} f_finish_(0); } long fc2() { return (_rowread_inverted(16)&_rowread_inverted(16)&4); } long fc3() { return (_rowread_inverted(4)&_rowread_inverted(4)&4); } long fc4() { return (_rowread_inverted(8)&_rowread_inverted(8)&8); } long fc5() { return (_rowread_inverted(8)&_rowread_inverted(8)&2); } long fc6() { return (_rowread_inverted(32)&_rowread_inverted(32)&8); } long fc7() { f_light_(&lcdad); f_savescr_(0,lcdad); f_dark_(&lcdad); f_savescr_(1,lcdad); } long fc8() { f_light_(&lcdad); f_loadscr_(0,lcdad); f_dark_(&lcdad); f_loadscr_(1,lcdad); } long fc9() { f_light_(&lcdad); f_clrscr_(lcdad); f_dark_(&lcdad); f_clrscr_(lcdad); } long fc10(long var34,long var35,long var36,long var37) { f_light_(&lcdad); f_sprt8_(var34,var35,var36,(unsigned char*)(var37),gmode,lcdad); f_dark_(&lcdad); f_sprt8_(var34,var35,var36,(unsigned char*)(al((var37)+(var36))),gmode,lcdad); } long fc11(long var39,long var40,long var41) { var42=(long)(var41); if(((long)(var41))==((long)(2))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb11)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb11); } if(((long)(var41))==((long)(8))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb12)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb12); } if(((long)(var41))==((long)(6))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb13)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb13); } if(((long)(var41))==((long)(4))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb14)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb14); } } long fc12(long var39,long var40,long var41) { var44=(long)(var41); if(((long)(var41))==((long)(2))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb11)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb11); } if(((long)(var41))==((long)(8))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb12)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb12); } if(((long)(var41))==((long)(6))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb13)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb13); } if(((long)(var41))==((long)(4))) { (gmode=3); f_sprt8_(var39,al((var40)-(4)),12,(unsigned char*)(al((psb14)+(24))),gmode,lcdad); (gmode=0); fc10(var39,(var40)-(4),12,psb14); } } long fc13() { FontSetSys(1); printf_xy(2,90," %ld",(long)var46); printf_xy(27,90," %ld",(long)var47); printf_xy(52,90," %ld",(long)var48); printf_xy(87,90," %ld",(long)var49); printf_xy(112,90," %ld",(long)var50); printf_xy(137,90," %ld",(long)var51); } long fc14(long var39,long var40) { (--((var46))); if(((long)(var46))==((long)(0))) { FontSetSys(2); f_clrscr_(lcdad); f_drawstr_(20,45,(char*)("Player 2 WIN !"),gmode); for(ir=0;ir<-31072;ir++) 1; ; fc1(); } else { fc8(); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); return 0; } fc1(); } long fc15(long var39,long var40) { (--((var49))); if(((long)(var49))==((long)(0))) { FontSetSys(2); f_clrscr_(lcdad); f_drawstr_(20,45,(char*)("Player 1 WIN !"),gmode); for(ir=0;ir<-31072;ir++) 1; ; fc1(); } else { fc8(); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); return 0; } fc1(); } long fc16(long var59,long var60) { while((var60)>(0)) { var61=(long)(random(var62)); var63=(long)(random(var64)); if(((var61)<(4)) && ((var63)<(4))) {continue;} if(((var61)>(15)) && ((var63)>(7))) {continue;} if(((long)(psb1[(var61)+(mu(var63,var62))]))==((long)(0))) { psb1[(var61)+(mu(var63,var62))]=(char)(var59); fc10(mu(var61,8),mu(var63,8),8,psb15); } else { continue; } (--((var60))); } } long fc17(long var60) { var62=(long)(19); var64=(long)(11); psb1=(char*)(malloc(mu(var62,var64))); for(var66=0;var66!=((var62)-(1)+1);var66+=1) { for(var67=0;var67!=((var64)-(1)+1);var67+=1) { psb1[(var66)+(mu(var67,var62))]=(char)(0); } } for(var66=0;var66!=((var62)-(1)+1);var66+=1) { psb1[(var66)+(mu(0,var62))]=(char)(60); psb1[(var66)+(mu((var64)-(1),var62))]=(char)(60); } for(var67=1;var67!=((var64)-(1)+1);var67+=1) { psb1[(0)+(mu(var67,var62))]=(char)(60); psb1[((var62)-(1))+(mu(var67,var62))]=(char)(60); } for(var66=2;var66!=(((var62)-(1))-(2)+2);var66+=2) { for(var67=2;var67!=(((var64)-(1))-(2)+2);var67+=2) { if(((var66)>=(var62)) || ((var67)>=(var64))) {return 0;} psb1[(var66)+(mu(var67,var62))]=(char)(60); } } fc16(61,var60); } long fc18(long var39,long var40) { var69=(long)(psb1[(var39)+(mu(var40,var62))]); if(((var69)>=(1)) && ((var69)<=(9))) { fc10(mu(var39,8),mu(var40,8),8,psb18); psb1[(var39)+(mu(var40,var62))]=(char)(0); } if(((long)(var69))==((long)(60))) {fc10(mu(var39,8),mu(var40,8),8,psb9);} if(((long)(var69))==((long)(61))) { (gmode=3); fc10(mu(var39,8),mu(var40,8),8,psb18); (gmode=0); var70=(long)(random((var23)+(3))); if((var70)<=(4)) { psb1[(var39)+(mu(var40,var62))]=(char)(var70); } else { psb1[(var39)+(mu(var40,var62))]=(char)(0); } if(((var70)>=(var23)) && ((var70)<=((var23)+(3)))) {var70=(long)(0);} if(((long)(var70))==((long)(0))) {fc10(mu(var39,8),mu(var40,8),8,psb18);} if(((long)(var70))==((long)(1))) {fc10(mu(var39,8),mu(var40,8),8,psb18);} if(((long)(var70))==((long)(2))) {fc10(mu(var39,8),mu(var40,8),8,psb20);} if(((long)(var70))==((long)(3))) {fc10(mu(var39,8),mu(var40,8),8,psb21);} if(((long)(var70))==((long)(4))) {fc10(mu(var39,8),mu(var40,8),8,psb22);} } if(((var69)>=(40)) && ((var69)<=(59))) {fc10(mu(var39,8),mu(var40,8),8,psb17);} } long fc19() { for(var66=0;var66!=((var62)-(1)+1);var66+=1) { for(var67=0;var67!=((var64)-(1)+1);var67+=1) { if(((long)(psb1[(var66)+(mu(var67,var62))]))==((long)(60))) {fc10(mu(var66,8),mu(var67,8),8,psb9);} if(((long)(psb1[(var66)+(mu(var67,var62))]))==((long)(61))) {fc10(mu(var66,8),mu(var67,8),8,psb15);} if(((psb1[(var66)+(mu(var67,var62))])>=(1)) && ((psb1[(var66)+(mu(var67,var62))])<=(9))) {fc10(mu(var66,8),mu(var67,8),8,psb19);} } } fc10(15,90,8,psb22); fc10(40,90,8,psb20); fc10(65,90,8,psb21); fc10(100,90,8,psb22); fc10(125,90,8,psb20); fc10(150,90,8,psb21); } long fc20(long var73,long var74,long var48) { fc8(); for(var75=0;var75!=(var48+1);var75+=1) { var76=(long)(psb1[((var73)-(var75))+(mu(var74,var62))]); if(((var76)>=(40)) && ((var76)<=(59))) { psb1[((var73)-(var75))+(mu(var74,var62))]=(char)((var76)+(1)); psb6[var77]=(char)(20); psb7[var77]=(char)((var73)-(var75)); psb8[var77]=(char)(var74); (++((var77))); fc10(((var73)-(var75))*(8),mu(var74,8),8,psb17); } if(((var76)>=(0)) && ((var76)<=(9))) { psb1[((var73)-(var75))+(mu(var74,var62))]=(char)(40); psb6[var77]=(char)(20); psb7[var77]=(char)((var73)-(var75)); psb8[var77]=(char)(var74); (++((var77))); fc10(((var73)-(var75))*(8),mu(var74,8),8,psb17); } if(((var76)>=(60)) && ((var76)<(100))) { if(((long)(var76))==((long)(60))) {break;} if(((long)(var76))==((long)(61))) { fc18((var73)-(var75),var74); fc7(); break; } } } for(var75=1;var75!=(var48+1);var75+=1) { var76=(long)(psb1[((var73)+(var75))+(mu(var74,var62))]); if(((var76)>=(40)) && ((var76)<=(59))) { psb1[((var73)+(var75))+(mu(var74,var62))]=(char)((var76)+(1)); psb6[var77]=(char)(20); psb7[var77]=(char)((var73)+(var75)); psb8[var77]=(char)(var74); (++((var77))); fc10(((var73)+(var75))*(8),mu(var74,8),8,psb17); } if(((var76)>=(0)) && ((var76)<=(9))) { psb1[((var73)+(var75))+(mu(var74,var62))]=(char)(40); psb6[var77]=(char)(20); psb7[var77]=(char)((var73)+(var75)); psb8[var77]=(char)(var74); (++((var77))); fc10(((var73)+(var75))*(8),mu(var74,8),8,psb17); } if(((var76)>=(60)) && ((var76)<(100))) { if(((long)(var76))==((long)(60))) {break;} if(((long)(var76))==((long)(61))) { fc18((var73)+(var75),var74); fc7(); break; } } } for(var75=1;var75!=(var48+1);var75+=1) { var76=(long)(psb1[(var73)+(mu((var74)-(var75),var62))]); if(((var76)>=(40)) && ((var76)<=(59))) { psb1[(var73)+(mu((var74)-(var75),var62))]=(char)((var76)+(1)); psb6[var77]=(char)(20); psb7[var77]=(char)(var73); psb8[var77]=(char)((var74)-(var75)); (++((var77))); fc10(mu(var73,8),((var74)-(var75))*(8),8,psb17); } if(((var76)>=(0)) && ((var76)<=(9))) { psb1[(var73)+(mu((var74)-(var75),var62))]=(char)(40); psb6[var77]=(char)(20); psb7[var77]=(char)(var73); psb8[var77]=(char)((var74)-(var75)); (++((var77))); fc10(mu(var73,8),((var74)-(var75))*(8),8,psb17); } if(((var76)>=(60)) && ((var76)<(100))) { if(((long)(var76))==((long)(60))) {break;} if(((long)(var76))==((long)(61))) { fc18(var73,(var74)-(var75)); fc7(); break; } } } for(var75=1;var75!=(var48+1);var75+=1) { var76=(long)(psb1[(var73)+(mu((var74)+(var75),var62))]); if(((var76)>=(40)) && ((var76)<=(59))) { psb1[(var73)+(mu((var74)+(var75),var62))]=(char)((var76)+(1)); psb6[var77]=(char)(20); psb7[var77]=(char)(var73); psb8[var77]=(char)((var74)+(var75)); (++((var77))); fc10(mu(var73,8),((var74)+(var75))*(8),8,psb17); } if(((var76)>=(0)) && ((var76)<=(9))) { psb1[(var73)+(mu((var74)+(var75),var62))]=(char)(40); psb6[var77]=(char)(20); psb7[var77]=(char)(var73); psb8[var77]=(char)((var74)+(var75)); (++((var77))); fc10(mu(var73,8),((var74)+(var75))*(8),8,psb17); } if(((var76)>=(60)) && ((var76)<(100))) { if(((long)(var76))==((long)(60))) {break;} if(((long)(var76))==((long)(61))) { fc18(var73,(var74)+(var75)); fc7(); break; } } } fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } void _main(void) { is_interh=0; init_save_load_scr(); #ifdef GTC_ONCALC #ifdef WITH_GRAPHH loadasm(); #endif #endif lcdad=0x4C00; gmode=0; randomize(); var23=(long)(5); GrayOn(); fc9(); fc17(50); fc19(); var78=(long)(0); var79=(long)(0); var80=(long)(30); psb2=(char*)(malloc(var80)); psb3=(char*)(malloc(var80)); psb4=(char*)(malloc(var80)); psb5=(char*)(malloc(var80)); if(((((long)(psb2))==((long)(0))) || (((long)(psb3))==((long)(0)))) || (((long)(psb4))==((long)(0)))) {fc1();} for(var79=0;var79!=((var80)-(1)+1);var79+=1) { psb2[var79]=(char)(0); psb3[var79]=(char)(0); psb4[var79]=(char)(0); psb5[var79]=(char)(0); } var77=(long)(0); var81=(long)(0); var82=(long)(100); psb6=(char*)(malloc(var82)); psb7=(char*)(malloc(var82)); psb8=(char*)(malloc(var82)); if(((((long)(psb6))==((long)(0))) || (((long)(psb7))==((long)(0)))) || (((long)(psb8))==((long)(0)))) {fc1();} for(var81=0;var81!=((var82)-(1)+1);var81+=1) { psb6[var81]=(char)(0); psb7[var81]=(char)(0); psb8[var81]=(char)(0); } var83=(long)(0); var53=(long)(8); var54=(long)(8); var67=(long)(0); var66=(long)(0); var48=(long)(1); var47=(long)(1); var46=(long)(5); var55=(long)(136); var56=(long)(72); var84=(long)(0); var85=(long)(0); var51=(long)(1); var50=(long)(1); var49=(long)(5); var86=(long)(0); var87=(long)(0); fc13(); fc7(); fc11(var53,var54,2); fc12(var55,var56,8); while(!(_keytest(RR_ESC)&_keytest(RR_ESC))) { if(((long)(var83%2))==((long)(0))) {f_wait_(1);} if(((long)(var83%10))==((long)(0))) { var81=(long)(var77); while((var81)>(0)) { if(((long)(psb6[(var81)-(1)]))==((long)(0))) { var73=(long)(psb7[(var81)-(1)]); var74=(long)(psb8[(var81)-(1)]); if(((long)(psb1[(var73)+(mu(var74,var62))]))==((long)(40))) { psb1[(var73)+(mu(var74,var62))]=(char)(0); fc8(); (gmode=3); fc10((psb7[(var81)-(1)])*(8),(psb8[(var81)-(1)])*(8),8,psb18); (gmode=0); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); memmove(((psb6)+(var81))-(1),(psb6)+(var81),(var82)-(var81)); memmove(((psb7)+(var81))-(1),(psb7)+(var81),(var82)-(var81)); memmove(((psb8)+(var81))-(1),(psb8)+(var81),(var82)-(var81)); (--((var77))); } if(((psb1[(var73)+(mu(var74,var62))])>(40)) && ((psb1[(var73)+(mu(var74,var62))])<=(59))) { psb1[(var73)+(mu(var74,var62))]=(char)((psb1[(var73)+(mu(var74,var62))])-(1)); memmove(((psb6)+(var81))-(1),(psb6)+(var81),(var82)-(var81)); memmove(((psb7)+(var81))-(1),(psb7)+(var81),(var82)-(var81)); memmove(((psb8)+(var81))-(1),(psb8)+(var81),(var82)-(var81)); (--((var77))); } } else { psb6[(var81)-(1)]=(char)((psb6[(var81)-(1)])-(1)); } (--((var81))); } } if(((long)(var83%10))==((long)(0))) { var79=(long)(var78); while((var79)>(0)) { if(((long)(psb2[(var79)-(1)]))==((long)(0))) { var73=(long)(psb3[(var79)-(1)]); var74=(long)(psb4[(var79)-(1)]); psb1[(var73)+(mu(var74,var62))]=(char)(0); fc8(); (gmode=2); fc10(mu(var73,8),mu(var74,8),8,psb16); (gmode=0); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); if(((long)(psb5[(var79)-(1)]))==((long)(1))) { fc20(var73,var74,var48); (--((var86))); } else { fc20(var73,var74,var51); (--((var87))); } memmove(((psb2)+(var79))-(1),(psb2)+(var79),(var80)-(var79)); memmove(((psb3)+(var79))-(1),(psb3)+(var79),(var80)-(var79)); memmove(((psb4)+(var79))-(1),(psb4)+(var79),(var80)-(var79)); memmove(((psb5)+(var79))-(1),(psb5)+(var79),(var80)-(var79)); if((var78)>(0)) {(--((var78)));} } else { psb2[(var79)-(1)]=(char)((psb2[(var79)-(1)])-(1)); } (--((var79))); } } if(((_keytest(RR_2ND)&_keytest(RR_2ND))) && ((var86)<(var47))) { if(((long)(psb1[(di(var53,8))+(mu(di(var54,8),var62))]))==((long)(0))) { psb1[(di(var53,8))+(mu(di(var54,8),var62))]=(char)(62); fc8(); fc10(((di(var53,8))*(1))*(8),((di(var54,8))*(1))*(8),8,psb16); psb2[var78]=(char)(35); psb3[var78]=(char)(di(var53,8)); psb4[var78]=(char)(di(var54,8)); psb5[var78]=(char)(1); (++((var78))); (++((var86))); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } } if((fc6()) && ((var87)<(var50))) { if(((long)(psb1[(di(var55,8))+(mu(di(var56,8),var62))]))==((long)(0))) { psb1[(di(var55,8))+(mu(di(var56,8),var62))]=(char)(62); fc8(); fc10(((di(var55,8))*(1))*(8),((di(var56,8))*(1))*(8),8,psb16); psb2[var78]=(char)(35); psb3[var78]=(char)(di(var55,8)); psb4[var78]=(char)(di(var56,8)); psb5[var78]=(char)(2); (++((var78))); (++((var87))); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } } if((((_keytest(RR_DOWN)&_keytest(RR_DOWN))) && ((psb1[(di(var53,8))+(mu(((var54)+(8))/(8),var62))])<=(59))) && (((long)(var66))==((long)(0)))) { var67=(long)(1); if(((long)(var54%8))==((long)(0))) { (++((var54))); fc8(); fc11(var53,var54,2); fc12(var55,var56,var44); } } else { if(((long)(var54%8))==((long)(0))) {var67=(long)(0);} } if((((_keytest(RR_UP)&_keytest(RR_UP))) && ((psb1[(di(var53,8))+(mu(((var54)-(8))/(8),var62))])<=(59))) && (((long)(var66))==((long)(0)))) { var67=(long)(-1); if(((long)(var54%8))==((long)(0))) { (--((var54))); fc8(); fc11(var53,var54,8); fc12(var55,var56,var44); } } else { if(((long)(var54%8))==((long)(0))) {var67=(long)(0);} } if((((_keytest(RR_LEFT)&_keytest(RR_LEFT))) && ((psb1[(((var53)-(8))/(8))+(mu(di(var54,8),var62))])<=(59))) && (((long)(var67))==((long)(0)))) { var66=(long)(-1); if(((long)(var53%8))==((long)(0))) { (--((var53))); fc8(); fc11(var53,var54,4); fc12(var55,var56,var44); } } else { if(((long)(var53%8))==((long)(0))) {var66=(long)(0);} } if((((_keytest(RR_RIGHT)&_keytest(RR_RIGHT))) && ((psb1[(((var53)+(8))/(8))+(mu(di(var54,8),var62))])<=(59))) && (((long)(var67))==((long)(0)))) { var66=(long)(1); if(((long)(var53%8))==((long)(0))) { (++((var53))); fc8(); fc11(var53,var54,6); fc12(var55,var56,var44); } } else { if(((long)(var53%8))==((long)(0))) {var66=(long)(0);} } if(((fc5()) && ((psb1[(di(var55,8))+(mu(((var56)+(8))/(8),var62))])<=(59))) && (((long)(var85))==((long)(0)))) { var84=(long)(1); if(((long)(var56%8))==((long)(0))) { (++((var56))); fc8(); fc11(var53,var54,var42); fc12(var55,var56,2); } } else { if(((long)(var56%8))==((long)(0))) {var84=(long)(0);} } if(((fc4()) && ((psb1[(di(var55,8))+(mu(((var56)-(8))/(8),var62))])<=(59))) && (((long)(var85))==((long)(0)))) { var84=(long)(-1); if(((long)(var56%8))==((long)(0))) { (--((var56))); fc8(); fc11(var53,var54,var42); fc12(var55,var56,8); } } else { if(((long)(var56%8))==((long)(0))) {var84=(long)(0);} } if(((fc2()) && ((psb1[(((var55)-(8))/(8))+(mu(di(var56,8),var62))])<=(59))) && (((long)(var84))==((long)(0)))) { var85=(long)(-1); if(((long)(var55%8))==((long)(0))) { (--((var55))); fc8(); fc11(var53,var54,var42); fc12(var55,var56,4); } } else { if(((long)(var55%8))==((long)(0))) {var85=(long)(0);} } if(((fc3()) && ((psb1[(((var55)+(8))/(8))+(mu(di(var56,8),var62))])<=(59))) && (((long)(var84))==((long)(0)))) { var85=(long)(1); if(((long)(var55%8))==((long)(0))) { (++((var55))); fc8(); fc11(var53,var54,var42); fc12(var55,var56,6); } } else { if(((long)(var55%8))==((long)(0))) {var85=(long)(0);} } if(((long)(var83%3))==((long)(0))) { if(((long)(var67))==((long)(1))) { if((var54%8)!=(0)) { var54=(long)((var54)+(var67)); fc8(); fc11(var53,var54,2); fc12(var55,var56,var44); } else { if(!(_keytest(RR_DOWN)&_keytest(RR_DOWN))) {var67=(long)(0);} } } if(((long)(var67))==((long)(-1))) { if((var54%8)!=(0)) { var54=(long)((var54)+(var67)); fc8(); fc11(var53,var54,8); fc12(var55,var56,var44); } else { if(!(_keytest(RR_UP)&_keytest(RR_UP))) {var67=(long)(0);} } } if(((long)(var66))==((long)(1))) { if((var53%8)!=(0)) { var53=(long)((var53)+(var66)); fc8(); fc11(var53,var54,6); fc12(var55,var56,var44); } else { if(!(_keytest(RR_RIGHT)&_keytest(RR_RIGHT))) {var66=(long)(0);} } } if(((long)(var66))==((long)(-1))) { if((var53%8)!=(0)) { var53=(long)((var53)+(var66)); fc8(); fc11(var53,var54,4); fc12(var55,var56,var44); } else { if(!(_keytest(RR_LEFT)&_keytest(RR_LEFT))) {var66=(long)(0);} } } if(((long)(var84))==((long)(1))) { if((var56%8)!=(0)) { var56=(long)((var56)+(var84)); fc8(); fc11(var53,var54,var42); fc12(var55,var56,2); } else { if(!fc5()) {var84=(long)(0);} } } if(((long)(var84))==((long)(-1))) { if((var56%8)!=(0)) { var56=(long)((var56)+(var84)); fc8(); fc11(var53,var54,var42); fc12(var55,var56,8); } else { if(!fc4()) {var84=(long)(0);} } } if(((long)(var85))==((long)(1))) { if((var55%8)!=(0)) { var55=(long)((var55)+(var85)); fc8(); fc11(var53,var54,var42); fc12(var55,var56,6); } else { if(!fc3()) {var85=(long)(0);} } } if(((long)(var85))==((long)(-1))) { if((var55%8)!=(0)) { var55=(long)((var55)+(var85)); fc8(); fc11(var53,var54,var42); fc12(var55,var56,4); } else { if(!fc2()) {var85=(long)(0);} } } } if(((long)(var83%20))==((long)(0))) { var88=(long)(psb1[(di(var53,8))+(mu(di(var54,8),var62))]); var89=(long)(psb1[(((var53)+(7))/(8))+(mu(di(var54,8),var62))]); var90=(long)(psb1[(((var53)+(7))/(8))+(mu(((var54)+(7))/(8),var62))]); var91=(long)(psb1[(di(var53,8))+(mu(((var54)+(7))/(8),var62))]); if(((var88)>=(40)) && ((var88)<(60))) { fc14(var53,var54); } else { if(((var89)>=(40)) && ((var89)<(60))) { fc14(var53,var54); } else { if(((var90)>=(40)) && ((var90)<(60))) { fc14(var53,var54); } else { if(((var91)>=(40)) && ((var91)<(60))) { fc14(var53,var54); } else { 1; } } } } if(((long)(var88))==((long)(1))) { psb1[(di(var53,8))+(mu(di(var54,8),var62))]=(char)(0); } if(((long)(var88))==((long)(2))) { if((var47)<(9)) {(++((var47)));} psb1[(di(var53,8))+(mu(di(var54,8),var62))]=(char)(0); fc8(); (gmode=3); fc10(((di(var53,8))*(1))*(8),((di(var54,8))*(1))*(8),8,psb18); (gmode=0); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } if(((long)(var88))==((long)(3))) { if((var48)<(9)) {(++((var48)));} psb1[(di(var53,8))+(mu(di(var54,8),var62))]=(char)(0); fc8(); (gmode=3); fc10(((di(var53,8))*(1))*(8),((di(var54,8))*(1))*(8),8,psb18); (gmode=0); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } if(((long)(var88))==((long)(4))) { if((var46)<(9)) { var46=(long)((var46)+(1)); } psb1[(di(var53,8))+(mu(di(var54,8),var62))]=(char)(0); fc8(); (gmode=3); fc10(((di(var53,8))*(1))*(8),((di(var54,8))*(1))*(8),8,psb18); (gmode=0); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } } if(((long)(var83%20))==((long)(0))) { var88=(long)(psb1[(di(var55,8))+(mu(di(var56,8),var62))]); var89=(long)(psb1[(((var55)+(7))/(8))+(mu(di(var56,8),var62))]); var90=(long)(psb1[(((var55)+(7))/(8))+(mu(((var56)+(7))/(8),var62))]); var91=(long)(psb1[(di(var55,8))+(mu(((var56)+(7))/(8),var62))]); if(((var88)>=(40)) && ((var88)<(60))) { fc15(var55,var56); } else { if(((var89)>=(40)) && ((var89)<(60))) { fc15(var55,var56); } else { if(((var90)>=(40)) && ((var90)<(60))) { fc15(var55,var56); } else { if(((var91)>=(40)) && ((var91)<(60))) { fc15(var55,var56); } else { 1; } } } } if(((long)(var88))==((long)(1))) { psb1[(di(var55,8))+(mu(di(var56,8),var62))]=(char)(0); } if(((long)(var88))==((long)(2))) { if((var50)<(9)) {(++((var50)));} psb1[(di(var55,8))+(mu(di(var56,8),var62))]=(char)(0); fc8(); (gmode=3); fc10(((di(var55,8))*(1))*(8),((di(var56,8))*(1))*(8),8,psb18); (gmode=0); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } if(((long)(var88))==((long)(3))) { if((var51)<(9)) {(++((var51)));} psb1[(di(var55,8))+(mu(di(var56,8),var62))]=(char)(0); fc8(); (gmode=3); fc10(((di(var55,8))*(1))*(8),((di(var56,8))*(1))*(8),8,psb18); (gmode=0); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } if(((long)(var88))==((long)(4))) { if((var49)<(9)) { var49=(long)((var49)+(1)); } psb1[(di(var55,8))+(mu(di(var56,8),var62))]=(char)(0); fc8(); (gmode=3); fc10(((di(var55,8))*(1))*(8),((di(var56,8))*(1))*(8),8,psb18); (gmode=0); fc13(); fc7(); fc11(var53,var54,var42); fc12(var55,var56,var44); } } (++((var83))); } f_keywait_(); fc1(); f_finish_(0); }