S_0:; S_1:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(qbs_new_txt_len("internal",8))== 0 )))||new_error){ if(qbevent){evnt(6);if(r)goto S_1;} do{ sub__screenshow(); if(!qbevent)break;evnt(7);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("QB64 cannot locate the 'internal' folder",40)); if (new_error) goto skip1; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip1: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8);}while(r); do{ qbs_print(nothingstring,1); skip2: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Check that QB64 has been extracted properly.",44)); if (new_error) goto skip3; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("For MacOSX, launch 'qb64_start.command' or enter './qb64' in Terminal.",70)); if (new_error) goto skip4; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("For Linux, in the console enter './qb64'.",41)); if (new_error) goto skip5; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip5: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12);}while(r); S_8:; do{ if(qbevent){evnt(13);if(r)goto S_8;} do{ sub__limit( 1 ); if(!qbevent)break;evnt(14);}while(r); S_10:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_inkey(),qbs_new_txt_len("",0)))))&&(!new_error)); dl_exit_6:; if(qbevent){evnt(15);if(r)goto S_10;} do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(16);}while(r); } do{ if(!qbevent)break;evnt(19);}while(r); do{ if(!qbevent)break;evnt(22);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(23);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(24);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(25);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(26);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(27);}while(r); do{ if (__ARRAY_LONG_DEPENDENCY[2]&2){ error(10); }else{ if (__ARRAY_LONG_DEPENDENCY[2]&1){ error(10); }else{ __ARRAY_LONG_DEPENDENCY[4]= 1 ; __ARRAY_LONG_DEPENDENCY[5]=(*__LONG_DEPENDENCY_LAST)-__ARRAY_LONG_DEPENDENCY[4]+1; __ARRAY_LONG_DEPENDENCY[6]=1; if (__ARRAY_LONG_DEPENDENCY[2]&4){ __ARRAY_LONG_DEPENDENCY[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_DEPENDENCY[5]*4); memset((void*)(__ARRAY_LONG_DEPENDENCY[0]),0,__ARRAY_LONG_DEPENDENCY[5]*4); }else{ __ARRAY_LONG_DEPENDENCY[0]=(ptrszint)calloc(__ARRAY_LONG_DEPENDENCY[5]*4,1); if (!__ARRAY_LONG_DEPENDENCY[0]) error(257); } __ARRAY_LONG_DEPENDENCY[2]|=1; } } if(!qbevent)break;evnt(29);}while(r); do{ if(!qbevent)break;evnt(31);}while(r); do{ if(!qbevent)break;evnt(33);}while(r); do{ if(!qbevent)break;evnt(34);}while(r); do{ if(!qbevent)break;evnt(35);}while(r); do{ qbs_set(__STRING_VERSION,qbs_new_txt_len("0.973",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36);}while(r); do{ *__LONG_DEBUG= 0 ; if(!qbevent)break;evnt(36);}while(r); do{ *__LONG_C_CORE= 1 ; if(!qbevent)break;evnt(36);}while(r); do{ sub__title(qbs_new_txt_len("QB64",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(38);}while(r); do{ if (__ARRAY_UDT_GL_COMMANDS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_GL_COMMANDS)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_GL_COMMANDS[2]&1){ if (__ARRAY_UDT_GL_COMMANDS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_GL_COMMANDS[0])); }else{ free((void*)(__ARRAY_UDT_GL_COMMANDS[0])); } } __ARRAY_UDT_GL_COMMANDS[4]= 0 ; __ARRAY_UDT_GL_COMMANDS[5]=( 2000 )-__ARRAY_UDT_GL_COMMANDS[4]+1; __ARRAY_UDT_GL_COMMANDS[6]=1; if (__ARRAY_UDT_GL_COMMANDS[2]&4){ __ARRAY_UDT_GL_COMMANDS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_GL_COMMANDS[5]*1728/8+1); memset((void*)(__ARRAY_UDT_GL_COMMANDS[0]),0,__ARRAY_UDT_GL_COMMANDS[5]*1728/8+1); }else{ __ARRAY_UDT_GL_COMMANDS[0]=(ptrszint)calloc(__ARRAY_UDT_GL_COMMANDS[5]*1728/8+1,1); if (!__ARRAY_UDT_GL_COMMANDS[0]) error(257); } __ARRAY_UDT_GL_COMMANDS[2]|=1; } if(!qbevent)break;evnt(51);}while(r); do{ if(!qbevent)break;evnt(52);}while(r); do{ if(!qbevent)break;evnt(53);}while(r); do{ if (__ARRAY_STRING_GL_DEFINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_GL_DEFINES)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_GL_DEFINES[2]&1){ tmp_long=__ARRAY_STRING_GL_DEFINES[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long]); free((void*)(__ARRAY_STRING_GL_DEFINES[0])); } __ARRAY_STRING_GL_DEFINES[4]= 0 ; __ARRAY_STRING_GL_DEFINES[5]=( 2000 )-__ARRAY_STRING_GL_DEFINES[4]+1; __ARRAY_STRING_GL_DEFINES[6]=1; __ARRAY_STRING_GL_DEFINES[0]=(ptrszint)malloc(__ARRAY_STRING_GL_DEFINES[5]*8); if (!__ARRAY_STRING_GL_DEFINES[0]) error(257); __ARRAY_STRING_GL_DEFINES[2]|=1; tmp_long=__ARRAY_STRING_GL_DEFINES[5]; if (__ARRAY_STRING_GL_DEFINES[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(54);}while(r); do{ if (__ARRAY_INTEGER64_GL_DEFINES_VALUE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER64_GL_DEFINES_VALUE)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER64_GL_DEFINES_VALUE[2]&1){ if (__ARRAY_INTEGER64_GL_DEFINES_VALUE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0])); }else{ free((void*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0])); } } __ARRAY_INTEGER64_GL_DEFINES_VALUE[4]= 0 ; __ARRAY_INTEGER64_GL_DEFINES_VALUE[5]=( 2000 )-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4]+1; __ARRAY_INTEGER64_GL_DEFINES_VALUE[6]=1; if (__ARRAY_INTEGER64_GL_DEFINES_VALUE[2]&4){ __ARRAY_INTEGER64_GL_DEFINES_VALUE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]*8); memset((void*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]),0,__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]*8); }else{ __ARRAY_INTEGER64_GL_DEFINES_VALUE[0]=(ptrszint)calloc(__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]*8,1); if (!__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]) error(257); } __ARRAY_INTEGER64_GL_DEFINES_VALUE[2]|=1; } if(!qbevent)break;evnt(55);}while(r); do{ if(!qbevent)break;evnt(56);}while(r); do{ if(!qbevent)break;evnt(57);}while(r); do{ *__LONG_GL_KIT= 0 ; if(!qbevent)break;evnt(57);}while(r); do{ if(!qbevent)break;evnt(60);}while(r); do{ *__LONG_CLOUD= 0 ; if(!qbevent)break;evnt(61);}while(r); do{ if(!qbevent)break;evnt(63);}while(r); do{ *__LONG_OS_BITS= 64 ; if(!qbevent)break;evnt(64);}while(r); S_41:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[32BIT]",7),0)))||new_error){ if(qbevent){evnt(64);if(r)goto S_41;} do{ *__LONG_OS_BITS= 32 ; if(!qbevent)break;evnt(64);}while(r); } do{ if(!qbevent)break;evnt(66);}while(r); do{ qbs_set(__STRING_COMMAND2,func_command()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(67);}while(r); do{ if(!qbevent)break;evnt(69);}while(r); do{ if(!qbevent)break;evnt(70);}while(r); do{ qbs_set(__STRING_A,qbs_ltrim(qbs_rtrim(__STRING_COMMAND2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(72);}while(r); do{ qbs_set(__STRING_A2,qbs_lcase(qbs_left(__STRING_A, 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(73);}while(r); S_50:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("-q",2))))||new_error){ if(qbevent){evnt(75);if(r)goto S_50;} do{ qbs_set(__STRING_COMMAND2,qbs_add(qbs_new_txt_len("-x",2),qbs_right(__STRING_A,__STRING_A->len- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(75);}while(r); do{ *__LONG_CLOUD= 1 ; if(!qbevent)break;evnt(75);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("-x",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(75);}while(r); } S_55:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("-z",2))))||new_error){ if(qbevent){evnt(77);if(r)goto S_55;} do{ qbs_set(__STRING_COMMAND2,qbs_add(qbs_new_txt_len("-c",2),qbs_right(__STRING_A,__STRING_A->len- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(77);}while(r); do{ *__LONG_NO_C_COMPILE_MODE= 1 ; if(!qbevent)break;evnt(77);}while(r); do{ *__LONG_CONSOLEMODE= 1 ; if(!qbevent)break;evnt(77);}while(r); } S_60:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("-x",2))))||new_error){ if(qbevent){evnt(78);if(r)goto S_60;} do{ qbs_set(__STRING_COMMAND2,qbs_add(qbs_new_txt_len("-c",2),qbs_right(__STRING_A,__STRING_A->len- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(78);}while(r); do{ *__LONG_CONSOLEMODE= 1 ; if(!qbevent)break;evnt(78);}while(r); } S_64:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(79);if(r)goto S_64;} do{ sub__dest(func__console()); if(!qbevent)break;evnt(80);}while(r); }else{ do{ sub__console( 2 ); if(!qbevent)break;evnt(82);}while(r); do{ sub__screenshow(); if(!qbevent)break;evnt(83);}while(r); } do{ if(!qbevent)break;evnt(86);}while(r); do{ if(!qbevent)break;evnt(88);}while(r); do{ if(!qbevent)break;evnt(89);}while(r); do{ if(!qbevent)break;evnt(90);}while(r); do{ *__LONG_OPTMAX= 256 ; if(!qbevent)break;evnt(91);}while(r); do{ if (__ARRAY_STRING256_OPT[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_OPT)[12])->id=(++mem_lock_id); if (__ARRAY_STRING256_OPT[2]&1){ if (__ARRAY_STRING256_OPT[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING256_OPT[0])); }else{ free((void*)(__ARRAY_STRING256_OPT[0])); } } __ARRAY_STRING256_OPT[8]= 1 ; __ARRAY_STRING256_OPT[9]=(*__LONG_OPTMAX)-__ARRAY_STRING256_OPT[8]+1; __ARRAY_STRING256_OPT[10]=1; __ARRAY_STRING256_OPT[4]= 1 ; __ARRAY_STRING256_OPT[5]=( 10 )-__ARRAY_STRING256_OPT[4]+1; __ARRAY_STRING256_OPT[6]=__ARRAY_STRING256_OPT[10]*__ARRAY_STRING256_OPT[9]; if (__ARRAY_STRING256_OPT[2]&4){ __ARRAY_STRING256_OPT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING256_OPT[5]*__ARRAY_STRING256_OPT[9]*256); memset((void*)(__ARRAY_STRING256_OPT[0]),0,__ARRAY_STRING256_OPT[5]*__ARRAY_STRING256_OPT[9]*256); }else{ __ARRAY_STRING256_OPT[0]=(ptrszint)calloc(__ARRAY_STRING256_OPT[5]*__ARRAY_STRING256_OPT[9]*256,1); if (!__ARRAY_STRING256_OPT[0]) error(257); } __ARRAY_STRING256_OPT[2]|=1; } if(!qbevent)break;evnt(92);}while(r); do{ if (__ARRAY_INTEGER_OPTWORDS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_OPTWORDS)[12])->id=(++mem_lock_id); if (__ARRAY_INTEGER_OPTWORDS[2]&1){ if (__ARRAY_INTEGER_OPTWORDS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_OPTWORDS[0])); }else{ free((void*)(__ARRAY_INTEGER_OPTWORDS[0])); } } __ARRAY_INTEGER_OPTWORDS[8]= 1 ; __ARRAY_INTEGER_OPTWORDS[9]=(*__LONG_OPTMAX)-__ARRAY_INTEGER_OPTWORDS[8]+1; __ARRAY_INTEGER_OPTWORDS[10]=1; __ARRAY_INTEGER_OPTWORDS[4]= 1 ; __ARRAY_INTEGER_OPTWORDS[5]=( 10 )-__ARRAY_INTEGER_OPTWORDS[4]+1; __ARRAY_INTEGER_OPTWORDS[6]=__ARRAY_INTEGER_OPTWORDS[10]*__ARRAY_INTEGER_OPTWORDS[9]; if (__ARRAY_INTEGER_OPTWORDS[2]&4){ __ARRAY_INTEGER_OPTWORDS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_OPTWORDS[5]*__ARRAY_INTEGER_OPTWORDS[9]*2); memset((void*)(__ARRAY_INTEGER_OPTWORDS[0]),0,__ARRAY_INTEGER_OPTWORDS[5]*__ARRAY_INTEGER_OPTWORDS[9]*2); }else{ __ARRAY_INTEGER_OPTWORDS[0]=(ptrszint)calloc(__ARRAY_INTEGER_OPTWORDS[5]*__ARRAY_INTEGER_OPTWORDS[9]*2,1); if (!__ARRAY_INTEGER_OPTWORDS[0]) error(257); } __ARRAY_INTEGER_OPTWORDS[2]|=1; } if(!qbevent)break;evnt(96);}while(r); do{ if (__ARRAY_INTEGER_T[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_T)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_T[2]&1){ if (__ARRAY_INTEGER_T[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_T[0])); }else{ free((void*)(__ARRAY_INTEGER_T[0])); } } __ARRAY_INTEGER_T[4]= 1 ; __ARRAY_INTEGER_T[5]=(*__LONG_OPTMAX)-__ARRAY_INTEGER_T[4]+1; __ARRAY_INTEGER_T[6]=1; if (__ARRAY_INTEGER_T[2]&4){ __ARRAY_INTEGER_T[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_T[5]*2); memset((void*)(__ARRAY_INTEGER_T[0]),0,__ARRAY_INTEGER_T[5]*2); }else{ __ARRAY_INTEGER_T[0]=(ptrszint)calloc(__ARRAY_INTEGER_T[5]*2,1); if (!__ARRAY_INTEGER_T[0]) error(257); } __ARRAY_INTEGER_T[2]|=1; } if(!qbevent)break;evnt(100);}while(r); do{ if (__ARRAY_INTEGER_LEV[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_LEV)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_LEV[2]&1){ if (__ARRAY_INTEGER_LEV[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_LEV[0])); }else{ free((void*)(__ARRAY_INTEGER_LEV[0])); } } __ARRAY_INTEGER_LEV[4]= 1 ; __ARRAY_INTEGER_LEV[5]=(*__LONG_OPTMAX)-__ARRAY_INTEGER_LEV[4]+1; __ARRAY_INTEGER_LEV[6]=1; if (__ARRAY_INTEGER_LEV[2]&4){ __ARRAY_INTEGER_LEV[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_LEV[5]*2); memset((void*)(__ARRAY_INTEGER_LEV[0]),0,__ARRAY_INTEGER_LEV[5]*2); }else{ __ARRAY_INTEGER_LEV[0]=(ptrszint)calloc(__ARRAY_INTEGER_LEV[5]*2,1); if (!__ARRAY_INTEGER_LEV[0]) error(257); } __ARRAY_INTEGER_LEV[2]|=1; } if(!qbevent)break;evnt(105);}while(r); do{ if (__ARRAY_INTEGER_ENTRYLEV[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_ENTRYLEV)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_ENTRYLEV[2]&1){ if (__ARRAY_INTEGER_ENTRYLEV[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_ENTRYLEV[0])); }else{ free((void*)(__ARRAY_INTEGER_ENTRYLEV[0])); } } __ARRAY_INTEGER_ENTRYLEV[4]= 1 ; __ARRAY_INTEGER_ENTRYLEV[5]=(*__LONG_OPTMAX)-__ARRAY_INTEGER_ENTRYLEV[4]+1; __ARRAY_INTEGER_ENTRYLEV[6]=1; if (__ARRAY_INTEGER_ENTRYLEV[2]&4){ __ARRAY_INTEGER_ENTRYLEV[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_ENTRYLEV[5]*2); memset((void*)(__ARRAY_INTEGER_ENTRYLEV[0]),0,__ARRAY_INTEGER_ENTRYLEV[5]*2); }else{ __ARRAY_INTEGER_ENTRYLEV[0]=(ptrszint)calloc(__ARRAY_INTEGER_ENTRYLEV[5]*2,1); if (!__ARRAY_INTEGER_ENTRYLEV[0]) error(257); } __ARRAY_INTEGER_ENTRYLEV[2]|=1; } if(!qbevent)break;evnt(106);}while(r); do{ if (__ARRAY_INTEGER_DITCHLEV[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_DITCHLEV)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_DITCHLEV[2]&1){ if (__ARRAY_INTEGER_DITCHLEV[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_DITCHLEV[0])); }else{ free((void*)(__ARRAY_INTEGER_DITCHLEV[0])); } } __ARRAY_INTEGER_DITCHLEV[4]= 1 ; __ARRAY_INTEGER_DITCHLEV[5]=(*__LONG_OPTMAX)-__ARRAY_INTEGER_DITCHLEV[4]+1; __ARRAY_INTEGER_DITCHLEV[6]=1; if (__ARRAY_INTEGER_DITCHLEV[2]&4){ __ARRAY_INTEGER_DITCHLEV[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_DITCHLEV[5]*2); memset((void*)(__ARRAY_INTEGER_DITCHLEV[0]),0,__ARRAY_INTEGER_DITCHLEV[5]*2); }else{ __ARRAY_INTEGER_DITCHLEV[0]=(ptrszint)calloc(__ARRAY_INTEGER_DITCHLEV[5]*2,1); if (!__ARRAY_INTEGER_DITCHLEV[0]) error(257); } __ARRAY_INTEGER_DITCHLEV[2]|=1; } if(!qbevent)break;evnt(107);}while(r); do{ if (__ARRAY_INTEGER_DONTPASS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_DONTPASS)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_DONTPASS[2]&1){ if (__ARRAY_INTEGER_DONTPASS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_DONTPASS[0])); }else{ free((void*)(__ARRAY_INTEGER_DONTPASS[0])); } } __ARRAY_INTEGER_DONTPASS[4]= 1 ; __ARRAY_INTEGER_DONTPASS[5]=(*__LONG_OPTMAX)-__ARRAY_INTEGER_DONTPASS[4]+1; __ARRAY_INTEGER_DONTPASS[6]=1; if (__ARRAY_INTEGER_DONTPASS[2]&4){ __ARRAY_INTEGER_DONTPASS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_DONTPASS[5]*2); memset((void*)(__ARRAY_INTEGER_DONTPASS[0]),0,__ARRAY_INTEGER_DONTPASS[5]*2); }else{ __ARRAY_INTEGER_DONTPASS[0]=(ptrszint)calloc(__ARRAY_INTEGER_DONTPASS[5]*2,1); if (!__ARRAY_INTEGER_DONTPASS[0]) error(257); } __ARRAY_INTEGER_DONTPASS[2]|=1; } if(!qbevent)break;evnt(108);}while(r); do{ if (__ARRAY_INTEGER_TEMPLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_TEMPLIST)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_TEMPLIST[2]&1){ if (__ARRAY_INTEGER_TEMPLIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_TEMPLIST[0])); }else{ free((void*)(__ARRAY_INTEGER_TEMPLIST[0])); } } __ARRAY_INTEGER_TEMPLIST[4]= 1 ; __ARRAY_INTEGER_TEMPLIST[5]=(*__LONG_OPTMAX)-__ARRAY_INTEGER_TEMPLIST[4]+1; __ARRAY_INTEGER_TEMPLIST[6]=1; if (__ARRAY_INTEGER_TEMPLIST[2]&4){ __ARRAY_INTEGER_TEMPLIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_TEMPLIST[5]*2); memset((void*)(__ARRAY_INTEGER_TEMPLIST[0]),0,__ARRAY_INTEGER_TEMPLIST[5]*2); }else{ __ARRAY_INTEGER_TEMPLIST[0]=(ptrszint)calloc(__ARRAY_INTEGER_TEMPLIST[5]*2,1); if (!__ARRAY_INTEGER_TEMPLIST[0]) error(257); } __ARRAY_INTEGER_TEMPLIST[2]|=1; } if(!qbevent)break;evnt(110);}while(r); do{ if (__ARRAY_LONG_PASSRULE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_PASSRULE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_PASSRULE[2]&1){ if (__ARRAY_LONG_PASSRULE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_PASSRULE[0])); }else{ free((void*)(__ARRAY_LONG_PASSRULE[0])); } } __ARRAY_LONG_PASSRULE[4]= 1 ; __ARRAY_LONG_PASSRULE[5]=(*__LONG_OPTMAX)-__ARRAY_LONG_PASSRULE[4]+1; __ARRAY_LONG_PASSRULE[6]=1; if (__ARRAY_LONG_PASSRULE[2]&4){ __ARRAY_LONG_PASSRULE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_PASSRULE[5]*4); memset((void*)(__ARRAY_LONG_PASSRULE[0]),0,__ARRAY_LONG_PASSRULE[5]*4); }else{ __ARRAY_LONG_PASSRULE[0]=(ptrszint)calloc(__ARRAY_LONG_PASSRULE[5]*4,1); if (!__ARRAY_LONG_PASSRULE[0]) error(257); } __ARRAY_LONG_PASSRULE[2]|=1; } if(!qbevent)break;evnt(111);}while(r); do{ if (__ARRAY_LONG_LEVELENTERED[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_LEVELENTERED)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_LEVELENTERED[2]&1){ if (__ARRAY_LONG_LEVELENTERED[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_LEVELENTERED[0])); }else{ free((void*)(__ARRAY_LONG_LEVELENTERED[0])); } } __ARRAY_LONG_LEVELENTERED[4]= 0 ; __ARRAY_LONG_LEVELENTERED[5]=(*__LONG_OPTMAX)-__ARRAY_LONG_LEVELENTERED[4]+1; __ARRAY_LONG_LEVELENTERED[6]=1; if (__ARRAY_LONG_LEVELENTERED[2]&4){ __ARRAY_LONG_LEVELENTERED[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_LEVELENTERED[5]*4); memset((void*)(__ARRAY_LONG_LEVELENTERED[0]),0,__ARRAY_LONG_LEVELENTERED[5]*4); }else{ __ARRAY_LONG_LEVELENTERED[0]=(ptrszint)calloc(__ARRAY_LONG_LEVELENTERED[5]*4,1); if (!__ARRAY_LONG_LEVELENTERED[0]) error(257); } __ARRAY_LONG_LEVELENTERED[2]|=1; } if(!qbevent)break;evnt(115);}while(r); do{ if (__ARRAY_STRING_SEPARGS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SEPARGS)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_SEPARGS[2]&1){ tmp_long=__ARRAY_STRING_SEPARGS[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long]); free((void*)(__ARRAY_STRING_SEPARGS[0])); } __ARRAY_STRING_SEPARGS[4]= 0 ; __ARRAY_STRING_SEPARGS[5]=(*__LONG_OPTMAX+ 1 )-__ARRAY_STRING_SEPARGS[4]+1; __ARRAY_STRING_SEPARGS[6]=1; __ARRAY_STRING_SEPARGS[0]=(ptrszint)malloc(__ARRAY_STRING_SEPARGS[5]*8); if (!__ARRAY_STRING_SEPARGS[0]) error(257); __ARRAY_STRING_SEPARGS[2]|=1; tmp_long=__ARRAY_STRING_SEPARGS[5]; if (__ARRAY_STRING_SEPARGS[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(116);}while(r); do{ if (__ARRAY_STRING_SEPARGSLAYOUT[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SEPARGSLAYOUT)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_SEPARGSLAYOUT[2]&1){ tmp_long=__ARRAY_STRING_SEPARGSLAYOUT[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long]); free((void*)(__ARRAY_STRING_SEPARGSLAYOUT[0])); } __ARRAY_STRING_SEPARGSLAYOUT[4]= 0 ; __ARRAY_STRING_SEPARGSLAYOUT[5]=(*__LONG_OPTMAX+ 1 )-__ARRAY_STRING_SEPARGSLAYOUT[4]+1; __ARRAY_STRING_SEPARGSLAYOUT[6]=1; __ARRAY_STRING_SEPARGSLAYOUT[0]=(ptrszint)malloc(__ARRAY_STRING_SEPARGSLAYOUT[5]*8); if (!__ARRAY_STRING_SEPARGSLAYOUT[0]) error(257); __ARRAY_STRING_SEPARGSLAYOUT[2]|=1; tmp_long=__ARRAY_STRING_SEPARGSLAYOUT[5]; if (__ARRAY_STRING_SEPARGSLAYOUT[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(117);}while(r); do{ if (__ARRAY_STRING_SEPARGS2[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SEPARGS2)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_SEPARGS2[2]&1){ tmp_long=__ARRAY_STRING_SEPARGS2[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[tmp_long]); free((void*)(__ARRAY_STRING_SEPARGS2[0])); } __ARRAY_STRING_SEPARGS2[4]= 0 ; __ARRAY_STRING_SEPARGS2[5]=(*__LONG_OPTMAX+ 1 )-__ARRAY_STRING_SEPARGS2[4]+1; __ARRAY_STRING_SEPARGS2[6]=1; __ARRAY_STRING_SEPARGS2[0]=(ptrszint)malloc(__ARRAY_STRING_SEPARGS2[5]*8); if (!__ARRAY_STRING_SEPARGS2[0]) error(257); __ARRAY_STRING_SEPARGS2[2]|=1; tmp_long=__ARRAY_STRING_SEPARGS2[5]; if (__ARRAY_STRING_SEPARGS2[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(118);}while(r); do{ if (__ARRAY_STRING_SEPARGSLAYOUT2[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SEPARGSLAYOUT2)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_SEPARGSLAYOUT2[2]&1){ tmp_long=__ARRAY_STRING_SEPARGSLAYOUT2[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[tmp_long]); free((void*)(__ARRAY_STRING_SEPARGSLAYOUT2[0])); } __ARRAY_STRING_SEPARGSLAYOUT2[4]= 0 ; __ARRAY_STRING_SEPARGSLAYOUT2[5]=(*__LONG_OPTMAX+ 1 )-__ARRAY_STRING_SEPARGSLAYOUT2[4]+1; __ARRAY_STRING_SEPARGSLAYOUT2[6]=1; __ARRAY_STRING_SEPARGSLAYOUT2[0]=(ptrszint)malloc(__ARRAY_STRING_SEPARGSLAYOUT2[5]*8); if (!__ARRAY_STRING_SEPARGSLAYOUT2[0]) error(257); __ARRAY_STRING_SEPARGSLAYOUT2[2]|=1; tmp_long=__ARRAY_STRING_SEPARGSLAYOUT2[5]; if (__ARRAY_STRING_SEPARGSLAYOUT2[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(119);}while(r); do{ sub__controlchr( 2 ); if(!qbevent)break;evnt(121);}while(r); do{ if(!qbevent)break;evnt(123);}while(r); do{ if(!qbevent)break;evnt(126);}while(r); do{ qbs_set(__STRING_CACHE_FOLDER,qbs_new_txt_len("internal\\help",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(127);}while(r); S_93:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(__STRING_CACHE_FOLDER)== 0 )))||new_error){ if(qbevent){evnt(128);if(r)goto S_93;} do{ sub_mkdir(__STRING_CACHE_FOLDER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(128);}while(r); } do{ if(!qbevent)break;evnt(129);}while(r); do{ if(!qbevent)break;evnt(130);}while(r); do{ if(!qbevent)break;evnt(131);}while(r); do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(132);}while(r); do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(132);}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(132);}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(132);}while(r); do{ if(!qbevent)break;evnt(133);}while(r); do{ if(!qbevent)break;evnt(134);}while(r); do{ if(!qbevent)break;evnt(135);}while(r); do{ if(!qbevent)break;evnt(136);}while(r); do{ if(!qbevent)break;evnt(137);}while(r); do{ if(!qbevent)break;evnt(138);}while(r); do{ if(!qbevent)break;evnt(139);}while(r); do{ if(!qbevent)break;evnt(140);}while(r); do{ qbs_set(__STRING_HELP_LINK_SEP,func_chr( 13 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(140);}while(r); do{ if(!qbevent)break;evnt(141);}while(r); do{ if(!qbevent)break;evnt(142);}while(r); do{ if(!qbevent)break;evnt(143);}while(r); do{ if(!qbevent)break;evnt(146);}while(r); do{ if(!qbevent)break;evnt(147);}while(r); do{ if(!qbevent)break;evnt(148);}while(r); do{ *__LONG_HELP_COL_NORMAL= 7 ; if(!qbevent)break;evnt(148);}while(r); do{ if(!qbevent)break;evnt(149);}while(r); do{ *__LONG_HELP_COL_LINK= 9 ; if(!qbevent)break;evnt(149);}while(r); do{ if(!qbevent)break;evnt(150);}while(r); do{ *__LONG_HELP_COL_BOLD= 15 ; if(!qbevent)break;evnt(150);}while(r); do{ if(!qbevent)break;evnt(151);}while(r); do{ *__LONG_HELP_COL_ITALIC= 15 ; if(!qbevent)break;evnt(151);}while(r); do{ if(!qbevent)break;evnt(152);}while(r); do{ *__LONG_HELP_COL_SECTION= 8 ; if(!qbevent)break;evnt(152);}while(r); do{ if(!qbevent)break;evnt(153);}while(r); do{ if(!qbevent)break;evnt(154);}while(r); do{ if (__ARRAY_LONG_HELP_LINELEN[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_HELP_LINELEN)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_HELP_LINELEN[2]&1){ if (__ARRAY_LONG_HELP_LINELEN[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_HELP_LINELEN[0])); }else{ free((void*)(__ARRAY_LONG_HELP_LINELEN[0])); } } __ARRAY_LONG_HELP_LINELEN[4]= 0 ; __ARRAY_LONG_HELP_LINELEN[5]=( 1 )-__ARRAY_LONG_HELP_LINELEN[4]+1; __ARRAY_LONG_HELP_LINELEN[6]=1; if (__ARRAY_LONG_HELP_LINELEN[2]&4){ __ARRAY_LONG_HELP_LINELEN[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HELP_LINELEN[5]*4); memset((void*)(__ARRAY_LONG_HELP_LINELEN[0]),0,__ARRAY_LONG_HELP_LINELEN[5]*4); }else{ __ARRAY_LONG_HELP_LINELEN[0]=(ptrszint)calloc(__ARRAY_LONG_HELP_LINELEN[5]*4,1); if (!__ARRAY_LONG_HELP_LINELEN[0]) error(257); } __ARRAY_LONG_HELP_LINELEN[2]|=1; } if(!qbevent)break;evnt(155);}while(r); do{ if (__ARRAY_STRING_BACK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_BACK)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_BACK[2]&1){ tmp_long=__ARRAY_STRING_BACK[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long]); free((void*)(__ARRAY_STRING_BACK[0])); } __ARRAY_STRING_BACK[4]= 0 ; __ARRAY_STRING_BACK[5]=( 1 )-__ARRAY_STRING_BACK[4]+1; __ARRAY_STRING_BACK[6]=1; __ARRAY_STRING_BACK[0]=(ptrszint)malloc(__ARRAY_STRING_BACK[5]*8); if (!__ARRAY_STRING_BACK[0]) error(257); __ARRAY_STRING_BACK[2]|=1; tmp_long=__ARRAY_STRING_BACK[5]; if (__ARRAY_STRING_BACK[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(156);}while(r); do{ if (__ARRAY_STRING_BACK_NAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_BACK_NAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_BACK_NAME[2]&1){ tmp_long=__ARRAY_STRING_BACK_NAME[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long]); free((void*)(__ARRAY_STRING_BACK_NAME[0])); } __ARRAY_STRING_BACK_NAME[4]= 0 ; __ARRAY_STRING_BACK_NAME[5]=( 1 )-__ARRAY_STRING_BACK_NAME[4]+1; __ARRAY_STRING_BACK_NAME[6]=1; __ARRAY_STRING_BACK_NAME[0]=(ptrszint)malloc(__ARRAY_STRING_BACK_NAME[5]*8); if (!__ARRAY_STRING_BACK_NAME[0]) error(257); __ARRAY_STRING_BACK_NAME[2]|=1; tmp_long=__ARRAY_STRING_BACK_NAME[5]; if (__ARRAY_STRING_BACK_NAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(157);}while(r); do{ if (__ARRAY_UDT_HELP_BACK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_HELP_BACK)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_HELP_BACK[2]&1){ if (__ARRAY_UDT_HELP_BACK[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_HELP_BACK[0])); }else{ free((void*)(__ARRAY_UDT_HELP_BACK[0])); } } __ARRAY_UDT_HELP_BACK[4]= 0 ; __ARRAY_UDT_HELP_BACK[5]=( 1 )-__ARRAY_UDT_HELP_BACK[4]+1; __ARRAY_UDT_HELP_BACK[6]=1; if (__ARRAY_UDT_HELP_BACK[2]&4){ __ARRAY_UDT_HELP_BACK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_HELP_BACK[5]*128/8+1); memset((void*)(__ARRAY_UDT_HELP_BACK[0]),0,__ARRAY_UDT_HELP_BACK[5]*128/8+1); }else{ __ARRAY_UDT_HELP_BACK[0]=(ptrszint)calloc(__ARRAY_UDT_HELP_BACK[5]*128/8+1,1); if (!__ARRAY_UDT_HELP_BACK[0]) error(257); } __ARRAY_UDT_HELP_BACK[2]|=1; } if(!qbevent)break;evnt(164);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long])),qbs_new_txt_len("QB64 Help Menu",14)); if(!qbevent)break;evnt(165);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long])),FUNC_BACK2BACKNAME(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check(( 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])))); if(!qbevent)break;evnt(166);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check(( 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))= 1 ; if(!qbevent)break;evnt(167);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check(( 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))= 1 ; if(!qbevent)break;evnt(167);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check(( 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))= 1 ; if(!qbevent)break;evnt(167);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check(( 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))= 1 ; if(!qbevent)break;evnt(167);}while(r); do{ if(!qbevent)break;evnt(168);}while(r); do{ *__LONG_HELP_BACK_POS= 1 ; if(!qbevent)break;evnt(169);}while(r); do{ if(!qbevent)break;evnt(170);}while(r); do{ if(!qbevent)break;evnt(171);}while(r); do{ if(!qbevent)break;evnt(172);}while(r); do{ if(!qbevent)break;evnt(173);}while(r); do{ if(!qbevent)break;evnt(175);}while(r); do{ if(!qbevent)break;evnt(177);}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(181);}while(r); do{ if (__ARRAY_STRING_IDERECENTLINK[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDERECENTLINK[2]&1){ error(10); }else{ __ARRAY_STRING_IDERECENTLINK[8]= 1 ; __ARRAY_STRING_IDERECENTLINK[9]=( 4 )-__ARRAY_STRING_IDERECENTLINK[8]+1; __ARRAY_STRING_IDERECENTLINK[10]=1; __ARRAY_STRING_IDERECENTLINK[4]= 1 ; __ARRAY_STRING_IDERECENTLINK[5]=( 2 )-__ARRAY_STRING_IDERECENTLINK[4]+1; __ARRAY_STRING_IDERECENTLINK[6]=__ARRAY_STRING_IDERECENTLINK[10]*__ARRAY_STRING_IDERECENTLINK[9]; __ARRAY_STRING_IDERECENTLINK[0]=(ptrszint)malloc(__ARRAY_STRING_IDERECENTLINK[5]*__ARRAY_STRING_IDERECENTLINK[9]*8); if (!__ARRAY_STRING_IDERECENTLINK[0]) error(257); __ARRAY_STRING_IDERECENTLINK[2]|=1; tmp_long=__ARRAY_STRING_IDERECENTLINK[5]*__ARRAY_STRING_IDERECENTLINK[9]; if (__ARRAY_STRING_IDERECENTLINK[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(183);}while(r); do{ if(!qbevent)break;evnt(184);}while(r); do{ if (__ARRAY_UDT_IDEBMK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDEBMK)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_IDEBMK[2]&1){ if (__ARRAY_UDT_IDEBMK[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDEBMK[0])); }else{ free((void*)(__ARRAY_UDT_IDEBMK[0])); } } __ARRAY_UDT_IDEBMK[4]= 0 ; __ARRAY_UDT_IDEBMK[5]=( 1 )-__ARRAY_UDT_IDEBMK[4]+1; __ARRAY_UDT_IDEBMK[6]=1; if (__ARRAY_UDT_IDEBMK[2]&4){ __ARRAY_UDT_IDEBMK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_IDEBMK[5]*128/8+1); memset((void*)(__ARRAY_UDT_IDEBMK[0]),0,__ARRAY_UDT_IDEBMK[5]*128/8+1); }else{ __ARRAY_UDT_IDEBMK[0]=(ptrszint)calloc(__ARRAY_UDT_IDEBMK[5]*128/8+1,1); if (!__ARRAY_UDT_IDEBMK[0]) error(257); } __ARRAY_UDT_IDEBMK[2]|=1; } if(!qbevent)break;evnt(192);}while(r); do{ if(!qbevent)break;evnt(193);}while(r); do{ if(!qbevent)break;evnt(196);}while(r); do{ if(!qbevent)break;evnt(197);}while(r); do{ if(!qbevent)break;evnt(198);}while(r); do{ if(!qbevent)break;evnt(199);}while(r); do{ if(!qbevent)break;evnt(200);}while(r); do{ if(!qbevent)break;evnt(201);}while(r); do{ if(!qbevent)break;evnt(202);}while(r); do{ if(!qbevent)break;evnt(203);}while(r); do{ if(!qbevent)break;evnt(204);}while(r); do{ if(!qbevent)break;evnt(205);}while(r); do{ if(!qbevent)break;evnt(206);}while(r); do{ if(!qbevent)break;evnt(207);}while(r); do{ if(!qbevent)break;evnt(208);}while(r); do{ if(!qbevent)break;evnt(209);}while(r); do{ if(!qbevent)break;evnt(210);}while(r); do{ if(!qbevent)break;evnt(225);}while(r); do{ qbs_set(__STRING_CHR_QUOTE,func_chr( 34 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(225);}while(r); do{ if(!qbevent)break;evnt(261);}while(r); do{ if (__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[2]&1){ tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[tmp_long]); free((void*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0])); } __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4]= 1 ; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]=( 100 )-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4]+1; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[6]=1; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]=(ptrszint)malloc(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]*8); if (!__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]) error(257); __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[2]|=1; tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; if (__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(262);}while(r); do{ if (__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]&1){ tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[tmp_long]); free((void*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0])); } __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4]= 1 ; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]=( 100 )-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4]+1; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[6]=1; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]=(ptrszint)malloc(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]*8); if (!__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]) error(257); __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]|=1; tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; if (__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(263);}while(r); do{ if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&1){ if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0])); }else{ free((void*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0])); } } __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4]= 1 ; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]=( 100 )-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4]+1; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[6]=1; if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&4){ __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]*4); memset((void*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]),0,__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]*4); }else{ __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]=(ptrszint)calloc(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]*4,1); if (!__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]) error(257); } __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]|=1; } if(!qbevent)break;evnt(264);}while(r); do{ if(!qbevent)break;evnt(267);}while(r); do{ qbs_set(__STRING1_SP,func_chr( 13 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(268);}while(r); do{ qbs_set(__STRING1_SP2,func_chr( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(268);}while(r); do{ qbs_set(__STRING1_SP3,func_chr( 26 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(268);}while(r); do{ if(!qbevent)break;evnt(269);}while(r); do{ *__LONG_SP_ASC=qbs_asc(__STRING1_SP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(270);}while(r); do{ *__LONG_SP2_ASC=qbs_asc(__STRING1_SP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(270);}while(r); do{ *__LONG_SP3_ASC=qbs_asc(__STRING1_SP3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(270);}while(r); S_181:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(272);if(r)goto S_181;} do{ qbs_set(__STRING1_SP,func_chr( 250 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(272);}while(r); do{ qbs_set(__STRING1_SP2,func_chr( 249 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(272);}while(r); do{ qbs_set(__STRING1_SP3,qbs_new_txt_len("\263",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(272);}while(r); } do{ if(!qbevent)break;evnt(274);}while(r); do{ if(!qbevent)break;evnt(275);}while(r); do{ if(!qbevent)break;evnt(277);}while(r); do{ qbs_set(__STRING_OS,qbs_new_txt_len("WIN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(278);}while(r); S_190:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[LINUX]",7),0)))||new_error){ if(qbevent){evnt(279);if(r)goto S_190;} do{ qbs_set(__STRING_OS,qbs_new_txt_len("LNX",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(279);}while(r); } do{ if(!qbevent)break;evnt(281);}while(r); S_194:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(282);if(r)goto S_194;} do{ *__LONG_MACOSX= 1 ; if(!qbevent)break;evnt(282);}while(r); } do{ if(!qbevent)break;evnt(284);}while(r); S_198:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(285);if(r)goto S_198;} do{ *__LONG_INLINE_DATA= 1 ; if(!qbevent)break;evnt(285);}while(r); } do{ if(!qbevent)break;evnt(288);}while(r); do{ qbs_set(__STRING_BATCHFILE_EXTENSION,qbs_new_txt_len(".bat",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(289);}while(r); S_203:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(290);if(r)goto S_203;} do{ qbs_set(__STRING_BATCHFILE_EXTENSION,qbs_new_txt_len(".sh",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(290);}while(r); } S_206:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(291);if(r)goto S_206;} do{ qbs_set(__STRING_BATCHFILE_EXTENSION,qbs_new_txt_len(".command",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(291);}while(r); } S_209:; if ((*__LONG_INLINE_DATA)||new_error){ if(qbevent){evnt(293);if(r)goto S_209;} do{ if (__ARRAY_STRING_INLINEDATASTR[2]&2){ error(10); }else{ if (__ARRAY_STRING_INLINEDATASTR[2]&1){ error(10); }else{ __ARRAY_STRING_INLINEDATASTR[4]= 0 ; __ARRAY_STRING_INLINEDATASTR[5]=( 255 )-__ARRAY_STRING_INLINEDATASTR[4]+1; __ARRAY_STRING_INLINEDATASTR[6]=1; __ARRAY_STRING_INLINEDATASTR[0]=(ptrszint)malloc(__ARRAY_STRING_INLINEDATASTR[5]*8); if (!__ARRAY_STRING_INLINEDATASTR[0]) error(257); __ARRAY_STRING_INLINEDATASTR[2]|=1; tmp_long=__ARRAY_STRING_INLINEDATASTR[5]; if (__ARRAY_STRING_INLINEDATASTR[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_INLINEDATASTR[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_INLINEDATASTR[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(294);}while(r); S_211:; fornext_value11= 0 ; fornext_finalvalue11= 255 ; fornext_step11= 1 ; if (fornext_step11<0) fornext_step_negative11=1; else fornext_step_negative11=0; if (new_error) goto fornext_error11; goto fornext_entrylabel11; while(1){ fornext_value11=fornext_step11+(*__LONG_I); fornext_entrylabel11: *__LONG_I=fornext_value11; if (fornext_step_negative11){ if (fornext_value11fornext_finalvalue11) break; } fornext_error11:; if(qbevent){evnt(295);if(r)goto S_211;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_INLINEDATASTR[4],__ARRAY_STRING_INLINEDATASTR[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_INLINEDATASTR[0]))[tmp_long])),qbs_add(FUNC_STR2(__LONG_I),qbs_new_txt_len(",",1))); if(!qbevent)break;evnt(296);}while(r); } fornext_exit_10:; } do{ if(!qbevent)break;evnt(300);}while(r); do{ qbs_set(__STRING_EXTENSION,qbs_new_txt_len(".exe",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(301);}while(r); S_217:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(302);if(r)goto S_217;} do{ qbs_set(__STRING_EXTENSION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(302);}while(r); } do{ if(!qbevent)break;evnt(304);}while(r); do{ qbs_set(__STRING1_PATHSEP,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(305);}while(r); S_222:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(306);if(r)goto S_222;} do{ qbs_set(__STRING1_PATHSEP,qbs_new_txt_len("/",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(306);}while(r); } do{ error_goto_line=1; if(!qbevent)break;evnt(309);}while(r); do{ if(!qbevent)break;evnt(311);}while(r); S_227:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(312);if(r)goto S_227;} do{ qbs_set(__STRING_TMPDIR,qbs_new_txt_len(".\\internal\\temp\\",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(312);}while(r); do{ qbs_set(__STRING_TMPDIR2,qbs_new_txt_len("..\\\\temp\\\\",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(312);}while(r); } S_231:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(313);if(r)goto S_231;} do{ qbs_set(__STRING_TMPDIR,qbs_new_txt_len("./internal/temp/",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(313);}while(r); do{ qbs_set(__STRING_TMPDIR2,qbs_new_txt_len("../temp/",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(313);}while(r); } do{ if(!qbevent)break;evnt(315);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(316);}while(r); do{ *__LONG_I= 1 ; if(!qbevent)break;evnt(317);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 2 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(318);}while(r); S_239:; while((*__LONG_E)||new_error){ if(qbevent){evnt(319);if(r)goto S_239;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(320);}while(r); S_241:; if ((-(*__LONG_I== 1000 ))||new_error){ if(qbevent){evnt(321);if(r)goto S_241;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Unable to locate the 'internal' folder",38)); if (new_error) goto skip13; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip13: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(321);}while(r); do{ sub_end(); if(!qbevent)break;evnt(321);}while(r); } do{ sub_mkdir(qbs_add(qbs_new_txt_len(".\\internal\\temp",15),FUNC_STR2(__LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(322);}while(r); S_246:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(323);if(r)goto S_246;} do{ qbs_set(__STRING_TMPDIR,qbs_add(qbs_add(qbs_new_txt_len(".\\internal\\temp",15),FUNC_STR2(__LONG_I)),qbs_new_txt_len("\\",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(323);}while(r); do{ qbs_set(__STRING_TMPDIR2,qbs_add(qbs_add(qbs_new_txt_len("..\\\\temp",8),FUNC_STR2(__LONG_I)),qbs_new_txt_len("\\\\",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(323);}while(r); } S_250:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(324);if(r)goto S_250;} do{ qbs_set(__STRING_TMPDIR,qbs_add(qbs_add(qbs_new_txt_len("./internal/temp",15),FUNC_STR2(__LONG_I)),qbs_new_txt_len("/",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(324);}while(r); do{ qbs_set(__STRING_TMPDIR2,qbs_add(qbs_add(qbs_new_txt_len("../temp",7),FUNC_STR2(__LONG_I)),qbs_new_txt_len("/",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(324);}while(r); } do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(325);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 2 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(326);}while(r); } dl_exit_12:; do{ *__LONG_TEMPFOLDERINDEX=*__LONG_I; if(!qbevent)break;evnt(329);}while(r); S_258:; if ((-(*__LONG_I> 1 ))||new_error){ if(qbevent){evnt(330);if(r)goto S_258;} do{ sub_open(qbs_add(qbs_add(qbs_new_txt_len(".\\internal\\c\\qbx",16),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".cpp",4)), 4 ,NULL,NULL, 2 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(332);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\c\\qbx.cpp",20), 3 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(333);}while(r); S_261:; while((!(func_eof( 1 )))||new_error){ if(qbevent){evnt(334);if(r)goto S_261;} do{ tmp_fileno= 1 ; if (new_error) goto skip15; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip15; skip15: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(335);}while(r); do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len("..\\\\temp\\\\",10),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(336);}while(r); S_264:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(336);if(r)goto S_264;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len("..\\\\temp",8)),FUNC_STR2(__LONG_I)),qbs_new_txt_len("\\\\",2)),qbs_right(__STRING_A,__STRING_A->len-(*__LONG_X+ 9 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(336);}while(r); } do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len("../temp/",8),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(337);}while(r); S_268:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(337);if(r)goto S_268;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len("../temp",7)),FUNC_STR2(__LONG_I)),qbs_new_txt_len("/",1)),qbs_right(__STRING_A,__STRING_A->len-(*__LONG_X+ 7 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(337);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 2 ; if (new_error) goto skip18; sub_file_print(tmp_fileno,__STRING_A, 0 , 0 , 1 ); if (new_error) goto skip18; skip18: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(338);}while(r); } dl_exit_14:; do{ sub_close( 1 ,1); sub_close( 2 ,1); if(!qbevent)break;evnt(340);}while(r); } S_275:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(343);if(r)goto S_275;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("debug.txt",9)), 4 ,NULL,NULL, 9 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(343);}while(r); } do{ error_goto_line=2; if(!qbevent)break;evnt(345);}while(r); do{ if(!qbevent)break;evnt(349);}while(r); do{ if(!qbevent)break;evnt(350);}while(r); S_281:; if ((-(*__LONG_TEMPFOLDERINDEX!= 1 ))||new_error){ if(qbevent){evnt(351);if(r)goto S_281;} do{ qbs_set(__STRING_TEMPFOLDERINDEXSTR,qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_STR2(__LONG_TEMPFOLDERINDEX)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(351);}while(r); do{ qbs_set(__STRING_TEMPFOLDERINDEXSTR2,FUNC_STR2(__LONG_TEMPFOLDERINDEX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(351);}while(r); } do{ if (__ARRAY_INTEGER_BLOCK_CHR[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_BLOCK_CHR[2]&1){ error(10); }else{ __ARRAY_INTEGER_BLOCK_CHR[4]= 0 ; __ARRAY_INTEGER_BLOCK_CHR[5]=( 255 )-__ARRAY_INTEGER_BLOCK_CHR[4]+1; __ARRAY_INTEGER_BLOCK_CHR[6]=1; if (__ARRAY_INTEGER_BLOCK_CHR[2]&4){ __ARRAY_INTEGER_BLOCK_CHR[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_BLOCK_CHR[5]*2); memset((void*)(__ARRAY_INTEGER_BLOCK_CHR[0]),0,__ARRAY_INTEGER_BLOCK_CHR[5]*2); }else{ __ARRAY_INTEGER_BLOCK_CHR[0]=(ptrszint)calloc(__ARRAY_INTEGER_BLOCK_CHR[5]*2,1); if (!__ARRAY_INTEGER_BLOCK_CHR[0]) error(257); } __ARRAY_INTEGER_BLOCK_CHR[2]|=1; } } if(!qbevent)break;evnt(353);}while(r); do{ tmp_long=array_check(( 10 )-__ARRAY_INTEGER_BLOCK_CHR[4],__ARRAY_INTEGER_BLOCK_CHR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_BLOCK_CHR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(354);}while(r); do{ tmp_long=array_check(( 13 )-__ARRAY_INTEGER_BLOCK_CHR[4],__ARRAY_INTEGER_BLOCK_CHR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_BLOCK_CHR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(355);}while(r); do{ if(!qbevent)break;evnt(357);}while(r); do{ qbs_set(__STRING_CRLF,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(358);}while(r); do{ if(!qbevent)break;evnt(360);}while(r); do{ qbs_set(__STRING_CHR_TAB,func_chr( 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(361);}while(r); do{ if(!qbevent)break;evnt(363);}while(r); do{ if(!qbevent)break;evnt(364);}while(r); do{ if(!qbevent)break;evnt(366);}while(r); do{ if(!qbevent)break;evnt(368);}while(r); do{ if(!qbevent)break;evnt(369);}while(r); do{ if(!qbevent)break;evnt(372);}while(r); do{ *__LONG_SYMBOLTYPE_SIZE= 0 ; if(!qbevent)break;evnt(373);}while(r); do{ if(!qbevent)break;evnt(375);}while(r); do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(376);}while(r); do{ if(!qbevent)break;evnt(379);}while(r); do{ if (__ARRAY_STRING_IDECPNAME[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDECPNAME[2]&1){ error(10); }else{ __ARRAY_STRING_IDECPNAME[4]= 1 ; __ARRAY_STRING_IDECPNAME[5]=( 27 )-__ARRAY_STRING_IDECPNAME[4]+1; __ARRAY_STRING_IDECPNAME[6]=1; __ARRAY_STRING_IDECPNAME[0]=(ptrszint)malloc(__ARRAY_STRING_IDECPNAME[5]*8); if (!__ARRAY_STRING_IDECPNAME[0]) error(257); __ARRAY_STRING_IDECPNAME[2]|=1; tmp_long=__ARRAY_STRING_IDECPNAME[5]; if (__ARRAY_STRING_IDECPNAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(381);}while(r); do{ if (__ARRAY_STRING_IDECP[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDECP[2]&1){ error(10); }else{ __ARRAY_STRING_IDECP[4]= 1 ; __ARRAY_STRING_IDECP[5]=( 27 )-__ARRAY_STRING_IDECP[4]+1; __ARRAY_STRING_IDECP[6]=1; __ARRAY_STRING_IDECP[0]=(ptrszint)malloc(__ARRAY_STRING_IDECP[5]*8); if (!__ARRAY_STRING_IDECP[0]) error(257); __ARRAY_STRING_IDECP[2]|=1; tmp_long=__ARRAY_STRING_IDECP[5]; if (__ARRAY_STRING_IDECP[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(382);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp437",15)); if(!qbevent)break;evnt(384);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000E4000000E0000000E5000000E7000000EA000000EB000000E8000000EF000000EE000000EC000000C4000000C5000000C9000000E6000000C6000000F4000000F6000000F2000000FB000000F9000000FF000000D6000000DC000000A2000000A3000000A5000020A700000192000000E1000000ED000000F3000000FA000000F1000000D1000000AA000000BA000000BF00002310000000AC000000BD000000BC000000A1000000AB000000BB0000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000003B1000000DF00000393000003C0000003A3000003C3000000B5000003C4000003A600000398000003A9000003B40000221E000003C6000003B50000222900002261000000B100002265000022640000232000002321000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(385);}while(r); do{ tmp_long=array_check(( 2 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp737",15)); if(!qbevent)break;evnt(386);}while(r); do{ tmp_long=array_check(( 2 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F0000039100000392000003930000039400000395000003960000039700000398000003990000039A0000039B0000039C0000039D0000039E0000039F000003A0000003A1000003A3000003A4000003A5000003A6000003A7000003A8000003A9000003B1000003B2000003B3000003B4000003B5000003B6000003B7000003B8000003B9000003BA000003BB000003BC000003BD000003BE000003BF000003C0000003C1000003C3000003C2000003C4000003C5000003C6000003C7000003C80000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000003C9000003AC000003AD000003AE000003CA000003AF000003CC000003CD000003CB000003CE0000038600000388000003890000038A0000038C0000038E0000038F000000B10000226500002264000003AA000003AB000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(387);}while(r); do{ tmp_long=array_check(( 3 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp775",15)); if(!qbevent)break;evnt(388);}while(r); do{ tmp_long=array_check(( 3 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F00000106000000FC000000E900000101000000E400000123000000E500000107000001420000011300000156000001570000012B00000179000000C4000000C5000000C9000000E6000000C60000014D000000F600000122000000A20000015A0000015B000000D6000000DC000000F8000000A3000000D8000000D7000000A4000001000000012A000000F30000017B0000017C0000017A0000201D000000A6000000A9000000AE000000AC000000BD000000BC00000141000000AB000000BB0000259100002592000025930000250200002524000001040000010C00000118000001160000256300002551000025570000255D0000012E000001600000251000002514000025340000252C0000251C000025000000253C000001720000016A0000255A00002554000025690000256600002560000025500000256C0000017D000001050000010D00000119000001170000012F00000161000001730000016B0000017E000025180000250C00002588000025840000258C0000259000002580000000D3000000DF0000014C00000143000000F5000000D5000000B50000014400000136000001370000013B0000013C00000146000001120000014500002019000000AD000000B10000201C000000BE000000B6000000A7000000F70000201E000000B000002219000000B7000000B9000000B3000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(389);}while(r); do{ tmp_long=array_check(( 4 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp850",15)); if(!qbevent)break;evnt(390);}while(r); do{ tmp_long=array_check(( 4 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000E4000000E0000000E5000000E7000000EA000000EB000000E8000000EF000000EE000000EC000000C4000000C5000000C9000000E6000000C6000000F4000000F6000000F2000000FB000000F9000000FF000000D6000000DC000000F8000000A3000000D8000000D700000192000000E1000000ED000000F3000000FA000000F1000000D1000000AA000000BA000000BF000000AE000000AC000000BD000000BC000000A1000000AB000000BB0000259100002592000025930000250200002524000000C1000000C2000000C0000000A90000256300002551000025570000255D000000A2000000A50000251000002514000025340000252C0000251C000025000000253C000000E3000000C30000255A00002554000025690000256600002560000025500000256C000000A4000000F0000000D0000000CA000000CB000000C800000131000000CD000000CE000000CF000025180000250C0000258800002584000000A6000000CC00002580000000D3000000DF000000D4000000D2000000F5000000D5000000B5000000FE000000DE000000DA000000DB000000D9000000FD000000DD000000AF000000B4000000AD000000B100002017000000BE000000B6000000A7000000F7000000B8000000B0000000A8000000B7000000B9000000B3000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(391);}while(r); do{ tmp_long=array_check(( 5 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp852",15)); if(!qbevent)break;evnt(392);}while(r); do{ tmp_long=array_check(( 5 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000E40000016F00000107000000E700000142000000EB0000015000000151000000EE00000179000000C400000106000000C9000001390000013A000000F4000000F60000013D0000013E0000015A0000015B000000D6000000DC000001640000016500000141000000D70000010D000000E1000000ED000000F3000000FA00000104000001050000017D0000017E0000011800000119000000AC0000017A0000010C0000015F000000AB000000BB0000259100002592000025930000250200002524000000C1000000C20000011A0000015E0000256300002551000025570000255D0000017B0000017C0000251000002514000025340000252C0000251C000025000000253C00000102000001030000255A00002554000025690000256600002560000025500000256C000000A400000111000001100000010E000000CB0000010F00000147000000CD000000CE0000011B000025180000250C0000258800002584000001620000016E00002580000000D3000000DF000000D4000001430000014400000148000001600000016100000154000000DA0000015500000170000000FD000000DD00000163000000B4000000AD000002DD000002DB000002C7000002D8000000A7000000F7000000B8000000B0000000A8000002D9000001710000015800000159000025A0000000A0",2048)); if(!qbevent)break;evnt(393);}while(r); do{ tmp_long=array_check(( 6 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp855",15)); if(!qbevent)break;evnt(394);}while(r); do{ tmp_long=array_check(( 6 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F0000045200000402000004530000040300000451000004010000045400000404000004550000040500000456000004060000045700000407000004580000040800000459000004090000045A0000040A0000045B0000040B0000045C0000040C0000045E0000040E0000045F0000040F0000044E0000042E0000044A0000042A0000043000000410000004310000041100000446000004260000043400000414000004350000041500000444000004240000043300000413000000AB000000BB0000259100002592000025930000250200002524000004450000042500000438000004180000256300002551000025570000255D00000439000004190000251000002514000025340000252C0000251C000025000000253C0000043A0000041A0000255A00002554000025690000256600002560000025500000256C000000A40000043B0000041B0000043C0000041C0000043D0000041D0000043E0000041E0000043F000025180000250C00002588000025840000041F0000044F000025800000042F0000044000000420000004410000042100000442000004220000044300000423000004360000041600000432000004120000044C0000042C00002116000000AD0000044B0000042B000004370000041700000448000004280000044D0000042D00000449000004290000044700000427000000A7000025A0000000A0",2048)); if(!qbevent)break;evnt(395);}while(r); do{ tmp_long=array_check(( 7 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp857",15)); if(!qbevent)break;evnt(396);}while(r); do{ tmp_long=array_check(( 7 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000E4000000E0000000E5000000E7000000EA000000EB000000E8000000EF000000EE00000131000000C4000000C5000000C9000000E6000000C6000000F4000000F6000000F2000000FB000000F900000130000000D6000000DC000000F8000000A3000000D80000015E0000015F000000E1000000ED000000F3000000FA000000F1000000D10000011E0000011F000000BF000000AE000000AC000000BD000000BC000000A1000000AB000000BB0000259100002592000025930000250200002524000000C1000000C2000000C0000000A90000256300002551000025570000255D000000A2000000A50000251000002514000025340000252C0000251C000025000000253C000000E3000000C30000255A00002554000025690000256600002560000025500000256C000000A4000000BA000000AA000000CA000000CB000000C800000000000000CD000000CE000000CF000025180000250C0000258800002584000000A6000000CC00002580000000D3000000DF000000D4000000D2000000F5000000D5000000B500000000000000D7000000DA000000DB000000D9000000EC000000FF000000AF000000B4000000AD000000B100000000000000BE000000B6000000A7000000F7000000B8000000B0000000A8000000B7000000B9000000B3000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(397);}while(r); do{ tmp_long=array_check(( 8 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp860",15)); if(!qbevent)break;evnt(398);}while(r); do{ tmp_long=array_check(( 8 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000E3000000E0000000C1000000E7000000EA000000CA000000E8000000CD000000D4000000EC000000C3000000C2000000C9000000C0000000C8000000F4000000F5000000F2000000DA000000F9000000CC000000D5000000DC000000A2000000A3000000D9000020A7000000D3000000E1000000ED000000F3000000FA000000F1000000D1000000AA000000BA000000BF000000D2000000AC000000BD000000BC000000A1000000AB000000BB0000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000003B1000000DF00000393000003C0000003A3000003C3000000B5000003C4000003A600000398000003A9000003B40000221E000003C6000003B50000222900002261000000B100002265000022640000232000002321000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(399);}while(r); do{ tmp_long=array_check(( 9 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp861",15)); if(!qbevent)break;evnt(400);}while(r); do{ tmp_long=array_check(( 9 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000E4000000E0000000E5000000E7000000EA000000EB000000E8000000D0000000F0000000DE000000C4000000C5000000C9000000E6000000C6000000F4000000F6000000FE000000FB000000DD000000FD000000D6000000DC000000F8000000A3000000D8000020A700000192000000E1000000ED000000F3000000FA000000C1000000CD000000D3000000DA000000BF00002310000000AC000000BD000000BC000000A1000000AB000000BB0000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000003B1000000DF00000393000003C0000003A3000003C3000000B5000003C4000003A600000398000003A9000003B40000221E000003C6000003B50000222900002261000000B100002265000022640000232000002321000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(401);}while(r); do{ tmp_long=array_check(( 10 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp862",15)); if(!qbevent)break;evnt(402);}while(r); do{ tmp_long=array_check(( 10 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000005D0000005D1000005D2000005D3000005D4000005D5000005D6000005D7000005D8000005D9000005DA000005DB000005DC000005DD000005DE000005DF000005E0000005E1000005E2000005E3000005E4000005E5000005E6000005E7000005E8000005E9000005EA000000A2000000A3000000A5000020A700000192000000E1000000ED000000F3000000FA000000F1000000D1000000AA000000BA000000BF00002310000000AC000000BD000000BC000000A1000000AB000000BB0000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000003B1000000DF00000393000003C0000003A3000003C3000000B5000003C4000003A600000398000003A9000003B40000221E000003C6000003B50000222900002261000000B100002265000022640000232000002321000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(403);}while(r); do{ tmp_long=array_check(( 11 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp863",15)); if(!qbevent)break;evnt(404);}while(r); do{ tmp_long=array_check(( 11 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000C2000000E0000000B6000000E7000000EA000000EB000000E8000000EF000000EE00002017000000C0000000A7000000C9000000C8000000CA000000F4000000CB000000CF000000FB000000F9000000A4000000D4000000DC000000A2000000A3000000D9000000DB00000192000000A6000000B4000000F3000000FA000000A8000000B8000000B3000000AF000000CE00002310000000AC000000BD000000BC000000BE000000AB000000BB0000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000003B1000000DF00000393000003C0000003A3000003C3000000B5000003C4000003A600000398000003A9000003B40000221E000003C6000003B50000222900002261000000B100002265000022640000232000002321000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(405);}while(r); do{ tmp_long=array_check(( 12 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp864",15)); if(!qbevent)break;evnt(406);}while(r); do{ tmp_long=array_check(( 12 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F00000020000000210000002200000023000000240000066A000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000B0000000B7000022190000221A0000259200002500000025020000253C000025240000252C0000251C00002534000025100000250C0000251400002518000003B20000221E000003C6000000B1000000BD000000BC00002248000000AB000000BB0000FEF70000FEF800000000000000000000FEFB0000FEFC00000000000000A0000000AD0000FE82000000A3000000A40000FE8400000000000000000000FE8E0000FE8F0000FE950000FE990000060C0000FE9D0000FEA10000FEA5000006600000066100000662000006630000066400000665000006660000066700000668000006690000FED10000061B0000FEB10000FEB50000FEB90000061F000000A20000FE800000FE810000FE830000FE850000FECA0000FE8B0000FE8D0000FE910000FE930000FE970000FE9B0000FE9F0000FEA30000FEA70000FEA90000FEAB0000FEAD0000FEAF0000FEB30000FEB70000FEBB0000FEBF0000FEC10000FEC50000FECB0000FECF000000A6000000AC000000F7000000D70000FEC9000006400000FED30000FED70000FEDB0000FEDF0000FEE30000FEE70000FEEB0000FEED0000FEEF0000FEF30000FEBD0000FECC0000FECE0000FECD0000FEE10000FE7D000006510000FEE50000FEE90000FEEC0000FEF00000FEF20000FED00000FED50000FEF50000FEF60000FEDD0000FED90000FEF1000025A000000000",2048)); if(!qbevent)break;evnt(407);}while(r); do{ tmp_long=array_check(( 13 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp865",15)); if(!qbevent)break;evnt(408);}while(r); do{ tmp_long=array_check(( 13 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000000C7000000FC000000E9000000E2000000E4000000E0000000E5000000E7000000EA000000EB000000E8000000EF000000EE000000EC000000C4000000C5000000C9000000E6000000C6000000F4000000F6000000F2000000FB000000F9000000FF000000D6000000DC000000F8000000A3000000D8000020A700000192000000E1000000ED000000F3000000FA000000F1000000D1000000AA000000BA000000BF00002310000000AC000000BD000000BC000000A1000000AB000000A40000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000003B1000000DF00000393000003C0000003A3000003C3000000B5000003C4000003A600000398000003A9000003B40000221E000003C6000003B50000222900002261000000B100002265000022640000232000002321000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(409);}while(r); do{ tmp_long=array_check(( 14 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp866",15)); if(!qbevent)break;evnt(410);}while(r); do{ tmp_long=array_check(( 14 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000004100000041100000412000004130000041400000415000004160000041700000418000004190000041A0000041B0000041C0000041D0000041E0000041F000004200000042100000422000004230000042400000425000004260000042700000428000004290000042A0000042B0000042C0000042D0000042E0000042F000004300000043100000432000004330000043400000435000004360000043700000438000004390000043A0000043B0000043C0000043D0000043E0000043F0000259100002592000025930000250200002524000025610000256200002556000025550000256300002551000025570000255D0000255C0000255B0000251000002514000025340000252C0000251C000025000000253C0000255E0000255F0000255A00002554000025690000256600002560000025500000256C00002567000025680000256400002565000025590000255800002552000025530000256B0000256A000025180000250C00002588000025840000258C0000259000002580000004400000044100000442000004430000044400000445000004460000044700000448000004490000044A0000044B0000044C0000044D0000044E0000044F0000040100000451000004040000045400000407000004570000040E0000045E000000B000002219000000B70000221A00002116000000A4000025A0000000A0",2048)); if(!qbevent)break;evnt(411);}while(r); do{ tmp_long=array_check(( 15 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp869",15)); if(!qbevent)break;evnt(412);}while(r); do{ tmp_long=array_check(( 15 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F0000000000000000000000000000000000000000000000000000038600000000000000B7000000AC000000A600002018000020190000038800002015000003890000038A000003AA0000038C00000000000000000000038E000003AB000000A90000038F000000B2000000B3000003AC000000A3000003AD000003AE000003AF000003CA00000390000003CC000003CD00000391000003920000039300000394000003950000039600000397000000BD0000039800000399000000AB000000BB00002591000025920000259300002502000025240000039A0000039B0000039C0000039D0000256300002551000025570000255D0000039E0000039F0000251000002514000025340000252C0000251C000025000000253C000003A0000003A10000255A00002554000025690000256600002560000025500000256C000003A3000003A4000003A5000003A6000003A7000003A8000003A9000003B1000003B2000003B3000025180000250C0000258800002584000003B4000003B500002580000003B6000003B7000003B8000003B9000003BA000003BB000003BC000003BD000003BE000003BF000003C0000003C1000003C3000003C2000003C400000384000000AD000000B1000003C5000003C6000003C7000000A7000003C800000385000000B0000000A8000003C9000003CB000003B0000003CE000025A0000000A0",2048)); if(!qbevent)break;evnt(413);}while(r); do{ tmp_long=array_check(( 16 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_pc_cp874",15)); if(!qbevent)break;evnt(414);}while(r); do{ tmp_long=array_check(( 16 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC0000000000000000000000000000000000002026000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002018000020190000201C0000201D0000202200002013000020140000000000000000000000000000000000000000000000000000000000000000000000A000000E0100000E0200000E0300000E0400000E0500000E0600000E0700000E0800000E0900000E0A00000E0B00000E0C00000E0D00000E0E00000E0F00000E1000000E1100000E1200000E1300000E1400000E1500000E1600000E1700000E1800000E1900000E1A00000E1B00000E1C00000E1D00000E1E00000E1F00000E2000000E2100000E2200000E2300000E2400000E2500000E2600000E2700000E2800000E2900000E2A00000E2B00000E2C00000E2D00000E2E00000E2F00000E3000000E3100000E3200000E3300000E3400000E3500000E3600000E3700000E3800000E3900000E3A0000000000000000000000000000000000000E3F00000E4000000E4100000E4200000E4300000E4400000E4500000E4600000E4700000E4800000E4900000E4A00000E4B00000E4C00000E4D00000E4E00000E4F00000E5000000E5100000E5200000E5300000E5400000E5500000E5600000E5700000E5800000E5900000E5A00000E5B00000000000000000000000000000000",2048)); if(!qbevent)break;evnt(415);}while(r); do{ tmp_long=array_check(( 17 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1250",21)); if(!qbevent)break;evnt(416);}while(r); do{ tmp_long=array_check(( 17 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC000000000000201A000000000000201E000020260000202000002021000000000000203000000160000020390000015A000001640000017D000001790000000000002018000020190000201C0000201D0000202200002013000020140000000000002122000001610000203A0000015B000001650000017E0000017A000000A0000002C7000002D800000141000000A400000104000000A6000000A7000000A8000000A90000015E000000AB000000AC000000AD000000AE0000017B000000B0000000B1000002DB00000142000000B4000000B5000000B6000000B7000000B8000001050000015F000000BB0000013D000002DD0000013E0000017C00000154000000C1000000C200000102000000C40000013900000106000000C70000010C000000C900000118000000CB0000011A000000CD000000CE0000010E000001100000014300000147000000D3000000D400000150000000D6000000D7000001580000016E000000DA00000170000000DC000000DD00000162000000DF00000155000000E1000000E200000103000000E40000013A00000107000000E70000010D000000E900000119000000EB0000011B000000ED000000EE0000010F000001110000014400000148000000F3000000F400000151000000F6000000F7000001590000016F000000FA00000171000000FC000000FD00000163000002D9",2048)); if(!qbevent)break;evnt(417);}while(r); do{ tmp_long=array_check(( 18 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1251",21)); if(!qbevent)break;evnt(418);}while(r); do{ tmp_long=array_check(( 18 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F00000402000004030000201A000004530000201E000020260000202000002021000020AC0000203000000409000020390000040A0000040C0000040B0000040F0000045200002018000020190000201C0000201D0000202200002013000020140000000000002122000004590000203A0000045A0000045C0000045B0000045F000000A00000040E0000045E00000408000000A400000490000000A6000000A700000401000000A900000404000000AB000000AC000000AD000000AE00000407000000B0000000B1000004060000045600000491000000B5000000B6000000B7000004510000211600000454000000BB00000458000004050000045500000457000004100000041100000412000004130000041400000415000004160000041700000418000004190000041A0000041B0000041C0000041D0000041E0000041F000004200000042100000422000004230000042400000425000004260000042700000428000004290000042A0000042B0000042C0000042D0000042E0000042F000004300000043100000432000004330000043400000435000004360000043700000438000004390000043A0000043B0000043C0000043D0000043E0000043F000004400000044100000442000004430000044400000445000004460000044700000448000004490000044A0000044B0000044C0000044D0000044E0000044F",2048)); if(!qbevent)break;evnt(419);}while(r); do{ tmp_long=array_check(( 19 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1252",21)); if(!qbevent)break;evnt(420);}while(r); do{ tmp_long=array_check(( 19 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC000000000000201A000001920000201E000020260000202000002021000002C600002030000001600000203900000152000000000000017D000000000000000000002018000020190000201C0000201D000020220000201300002014000002DC00002122000001610000203A00000153000000000000017E00000178000000A0000000A1000000A2000000A3000000A4000000A5000000A6000000A7000000A8000000A9000000AA000000AB000000AC000000AD000000AE000000AF000000B0000000B1000000B2000000B3000000B4000000B5000000B6000000B7000000B8000000B9000000BA000000BB000000BC000000BD000000BE000000BF000000C0000000C1000000C2000000C3000000C4000000C5000000C6000000C7000000C8000000C9000000CA000000CB000000CC000000CD000000CE000000CF000000D0000000D1000000D2000000D3000000D4000000D5000000D6000000D7000000D8000000D9000000DA000000DB000000DC000000DD000000DE000000DF000000E0000000E1000000E2000000E3000000E4000000E5000000E6000000E7000000E8000000E9000000EA000000EB000000EC000000ED000000EE000000EF000000F0000000F1000000F2000000F3000000F4000000F5000000F6000000F7000000F8000000F9000000FA000000FB000000FC000000FD000000FE000000FF",2048)); if(!qbevent)break;evnt(421);}while(r); do{ tmp_long=array_check(( 20 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1253",21)); if(!qbevent)break;evnt(422);}while(r); do{ tmp_long=array_check(( 20 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC000000000000201A000001920000201E00002026000020200000202100000000000020300000000000002039000000000000000000000000000000000000000000002018000020190000201C0000201D0000202200002013000020140000000000002122000000000000203A00000000000000000000000000000000000000A00000038500000386000000A3000000A4000000A5000000A6000000A7000000A8000000A900000000000000AB000000AC000000AD000000AE00002015000000B0000000B1000000B2000000B300000384000000B5000000B6000000B700000388000003890000038A000000BB0000038C000000BD0000038E0000038F000003900000039100000392000003930000039400000395000003960000039700000398000003990000039A0000039B0000039C0000039D0000039E0000039F000003A0000003A100000000000003A3000003A4000003A5000003A6000003A7000003A8000003A9000003AA000003AB000003AC000003AD000003AE000003AF000003B0000003B1000003B2000003B3000003B4000003B5000003B6000003B7000003B8000003B9000003BA000003BB000003BC000003BD000003BE000003BF000003C0000003C1000003C2000003C3000003C4000003C5000003C6000003C7000003C8000003C9000003CA000003CB000003CC000003CD000003CE00000000",2048)); if(!qbevent)break;evnt(423);}while(r); do{ tmp_long=array_check(( 21 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1254",21)); if(!qbevent)break;evnt(424);}while(r); do{ tmp_long=array_check(( 21 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC000000000000201A000001920000201E000020260000202000002021000002C6000020300000016000002039000001520000000000000000000000000000000000002018000020190000201C0000201D000020220000201300002014000002DC00002122000001610000203A00000153000000000000000000000178000000A0000000A1000000A2000000A3000000A4000000A5000000A6000000A7000000A8000000A9000000AA000000AB000000AC000000AD000000AE000000AF000000B0000000B1000000B2000000B3000000B4000000B5000000B6000000B7000000B8000000B9000000BA000000BB000000BC000000BD000000BE000000BF000000C0000000C1000000C2000000C3000000C4000000C5000000C6000000C7000000C8000000C9000000CA000000CB000000CC000000CD000000CE000000CF0000011E000000D1000000D2000000D3000000D4000000D5000000D6000000D7000000D8000000D9000000DA000000DB000000DC000001300000015E000000DF000000E0000000E1000000E2000000E3000000E4000000E5000000E6000000E7000000E8000000E9000000EA000000EB000000EC000000ED000000EE000000EF0000011F000000F1000000F2000000F3000000F4000000F5000000F6000000F7000000F8000000F9000000FA000000FB000000FC000001310000015F000000FF",2048)); if(!qbevent)break;evnt(425);}while(r); do{ tmp_long=array_check(( 22 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1255",21)); if(!qbevent)break;evnt(426);}while(r); do{ tmp_long=array_check(( 22 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC000000000000201A000001920000201E000020260000202000002021000002C6000020300000000000002039000000000000000000000000000000000000000000002018000020190000201C0000201D000020220000201300002014000002DC00002122000000000000203A00000000000000000000000000000000000000A0000000A1000000A2000000A3000020AA000000A5000000A6000000A7000000A8000000A9000000D7000000AB000000AC000000AD000000AE000000AF000000B0000000B1000000B2000000B3000000B4000000B5000000B6000000B7000000B8000000B9000000F7000000BB000000BC000000BD000000BE000000BF000005B0000005B1000005B2000005B3000005B4000005B5000005B6000005B7000005B8000005B900000000000005BB000005BC000005BD000005BE000005BF000005C0000005C1000005C2000005C3000005F0000005F1000005F2000005F3000005F400000000000000000000000000000000000000000000000000000000000005D0000005D1000005D2000005D3000005D4000005D5000005D6000005D7000005D8000005D9000005DA000005DB000005DC000005DD000005DE000005DF000005E0000005E1000005E2000005E3000005E4000005E5000005E6000005E7000005E8000005E9000005EA00000000000000000000200E0000200F00000000",2048)); if(!qbevent)break;evnt(427);}while(r); do{ tmp_long=array_check(( 23 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1256",21)); if(!qbevent)break;evnt(428);}while(r); do{ tmp_long=array_check(( 23 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC0000067E0000201A000001920000201E000020260000202000002021000002C600002030000006790000203900000152000006860000069800000688000006AF00002018000020190000201C0000201D000020220000201300002014000006A900002122000006910000203A000001530000200C0000200D000006BA000000A00000060C000000A2000000A3000000A4000000A5000000A6000000A7000000A8000000A9000006BE000000AB000000AC000000AD000000AE000000AF000000B0000000B1000000B2000000B3000000B4000000B5000000B6000000B7000000B8000000B90000061B000000BB000000BC000000BD000000BE0000061F000006C10000062100000622000006230000062400000625000006260000062700000628000006290000062A0000062B0000062C0000062D0000062E0000062F00000630000006310000063200000633000006340000063500000636000000D70000063700000638000006390000063A00000640000006410000064200000643000000E000000644000000E200000645000006460000064700000648000000E7000000E8000000E9000000EA000000EB000006490000064A000000EE000000EF0000064B0000064C0000064D0000064E000000F40000064F00000650000000F700000651000000F900000652000000FB000000FC0000200E0000200F000006D2",2048)); if(!qbevent)break;evnt(429);}while(r); do{ tmp_long=array_check(( 24 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1257",21)); if(!qbevent)break;evnt(430);}while(r); do{ tmp_long=array_check(( 24 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC000000000000201A000000000000201E0000202600002020000020210000000000002030000000000000203900000000000000A8000002C7000000B80000000000002018000020190000201C0000201D0000202200002013000020140000000000002122000000000000203A00000000000000AF000002DB00000000000000A000000000000000A2000000A3000000A400000000000000A6000000A7000000D8000000A900000156000000AB000000AC000000AD000000AE000000C6000000B0000000B1000000B2000000B3000000B4000000B5000000B6000000B7000000F8000000B900000157000000BB000000BC000000BD000000BE000000E6000001040000012E0000010000000106000000C4000000C500000118000001120000010C000000C9000001790000011600000122000001360000012A0000013B000001600000014300000145000000D30000014C000000D5000000D6000000D700000172000001410000015A0000016A000000DC0000017B0000017D000000DF000001050000012F0000010100000107000000E4000000E500000119000001130000010D000000E90000017A0000011700000123000001370000012B0000013C000001610000014400000146000000F30000014D000000F5000000F6000000F700000173000001420000015B0000016B000000FC0000017C0000017E000002D9",2048)); if(!qbevent)break;evnt(431);}while(r); do{ tmp_long=array_check(( 25 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp1258",21)); if(!qbevent)break;evnt(432);}while(r); do{ tmp_long=array_check(( 25 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC000000000000201A000001920000201E000020260000202000002021000002C6000020300000000000002039000001520000000000000000000000000000000000002018000020190000201C0000201D000020220000201300002014000002DC00002122000000000000203A00000153000000000000000000000178000000A0000000A1000000A2000000A3000000A4000000A5000000A6000000A7000000A8000000A9000000AA000000AB000000AC000000AD000000AE000000AF000000B0000000B1000000B2000000B3000000B4000000B5000000B6000000B7000000B8000000B9000000BA000000BB000000BC000000BD000000BE000000BF000000C0000000C1000000C200000102000000C4000000C5000000C6000000C7000000C8000000C9000000CA000000CB00000300000000CD000000CE000000CF00000110000000D100000309000000D3000000D4000001A0000000D6000000D7000000D8000000D9000000DA000000DB000000DC000001AF00000303000000DF000000E0000000E1000000E200000103000000E4000000E5000000E6000000E7000000E8000000E9000000EA000000EB00000301000000ED000000EE000000EF00000111000000F100000323000000F3000000F4000001A1000000F6000000F7000000F8000000F9000000FA000000FB000000FC000001B0000020AB000000FF",2048)); if(!qbevent)break;evnt(433);}while(r); do{ tmp_long=array_check(( 26 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("micsft_windows_cp874",20)); if(!qbevent)break;evnt(434);}while(r); do{ tmp_long=array_check(( 26 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000020AC0000000000000000000000000000000000002026000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002018000020190000201C0000201D0000202200002013000020140000000000000000000000000000000000000000000000000000000000000000000000A000000E0100000E0200000E0300000E0400000E0500000E0600000E0700000E0800000E0900000E0A00000E0B00000E0C00000E0D00000E0E00000E0F00000E1000000E1100000E1200000E1300000E1400000E1500000E1600000E1700000E1800000E1900000E1A00000E1B00000E1C00000E1D00000E1E00000E1F00000E2000000E2100000E2200000E2300000E2400000E2500000E2600000E2700000E2800000E2900000E2A00000E2B00000E2C00000E2D00000E2E00000E2F00000E3000000E3100000E3200000E3300000E3400000E3500000E3600000E3700000E3800000E3900000E3A0000000000000000000000000000000000000E3F00000E4000000E4100000E4200000E4300000E4400000E4500000E4600000E4700000E4800000E4900000E4A00000E4B00000E4C00000E4D00000E4E00000E4F00000E5000000E5100000E5200000E5300000E5400000E5500000E5600000E5700000E5800000E5900000E5A00000E5B00000000000000000000000000000000",2048)); if(!qbevent)break;evnt(435);}while(r); do{ tmp_long=array_check(( 27 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[tmp_long])),qbs_new_txt_len("MIK",3)); if(!qbevent)break;evnt(436);}while(r); do{ tmp_long=array_check(( 27 )-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[tmp_long])),qbs_new_txt_len("000000000000000100000002000000030000000400000005000000060000000700000008000000090000000A0000000B0000000C0000000D0000000E0000000F000000100000001100000012000000130000001400000015000000160000001700000018000000190000001A0000001B0000001C0000001D0000001E0000001F000000200000002100000022000000230000002400000025000000260000002700000028000000290000002A0000002B0000002C0000002D0000002E0000002F000000300000003100000032000000330000003400000035000000360000003700000038000000390000003A0000003B0000003C0000003D0000003E0000003F000000400000004100000042000000430000004400000045000000460000004700000048000000490000004A0000004B0000004C0000004D0000004E0000004F000000500000005100000052000000530000005400000055000000560000005700000058000000590000005A0000005B0000005C0000005D0000005E0000005F000000600000006100000062000000630000006400000065000000660000006700000068000000690000006A0000006B0000006C0000006D0000006E0000006F000000700000007100000072000000730000007400000075000000760000007700000078000000790000007A0000007B0000007C0000007D0000007E0000007F000004100000041100000412000004130000041400000415000004160000041700000418000004190000041A0000041B0000041C0000041D0000041E0000041F000004200000042100000422000004230000042400000425000004260000042700000428000004290000042A0000042B0000042C0000042D0000042E0000042F000004300000043100000432000004330000043400000435000004360000043700000438000004390000043A0000043B0000043C0000043D0000043E0000043F000004400000044100000442000004430000044400000445000004460000044700000448000004490000044A0000044B0000044C0000044D0000044E0000044F00002514000025340000252C0000251C000025000000253C00002563000025510000255A00002554000025690000256600002560000025500000256C00002510000025910000259200002593000025020000252400002116000000A7000025570000255D000025180000250C00002588000025840000258C0000259000002580000003B1000000DF00000393000003C0000003A3000003C3000000B5000003C4000003A600000398000003A9000003B40000221E000003C6000003B50000222900002261000000B100002265000022640000232000002321000000F700002248000000B000002219000000B70000221A0000207F000000B2000025A0000000A0",2048)); if(!qbevent)break;evnt(437);}while(r); do{ if(!qbevent)break;evnt(442);}while(r); do{ if (__ARRAY_UDT_DL[2]&2){ error(10); }else{ if (__ARRAY_UDT_DL[2]&1){ error(10); }else{ __ARRAY_UDT_DL[4]= 1 ; __ARRAY_UDT_DL[5]=( 1 )-__ARRAY_UDT_DL[4]+1; __ARRAY_UDT_DL[6]=1; if (__ARRAY_UDT_DL[2]&4){ __ARRAY_UDT_DL[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_DL[5]*64/8+1); memset((void*)(__ARRAY_UDT_DL[0]),0,__ARRAY_UDT_DL[5]*64/8+1); }else{ __ARRAY_UDT_DL[0]=(ptrszint)calloc(__ARRAY_UDT_DL[5]*64/8+1,1); if (!__ARRAY_UDT_DL[0]) error(257); } __ARRAY_UDT_DL[2]|=1; } } if(!qbevent)break;evnt(451);}while(r); do{ if (__ARRAY_STRING_DL_DATA[2]&2){ error(10); }else{ if (__ARRAY_STRING_DL_DATA[2]&1){ error(10); }else{ __ARRAY_STRING_DL_DATA[4]= 1 ; __ARRAY_STRING_DL_DATA[5]=( 1 )-__ARRAY_STRING_DL_DATA[4]+1; __ARRAY_STRING_DL_DATA[6]=1; __ARRAY_STRING_DL_DATA[0]=(ptrszint)malloc(__ARRAY_STRING_DL_DATA[5]*8); if (!__ARRAY_STRING_DL_DATA[0]) error(257); __ARRAY_STRING_DL_DATA[2]|=1; tmp_long=__ARRAY_STRING_DL_DATA[5]; if (__ARRAY_STRING_DL_DATA[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_DL_DATA[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_DL_DATA[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(452);}while(r); do{ if(!qbevent)break;evnt(453);}while(r); do{ if (__ARRAY_LONG_HUFF_COUNT[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_COUNT[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_COUNT[4]= 0 ; __ARRAY_LONG_HUFF_COUNT[5]=( 255 )-__ARRAY_LONG_HUFF_COUNT[4]+1; __ARRAY_LONG_HUFF_COUNT[6]=1; if (__ARRAY_LONG_HUFF_COUNT[2]&4){ __ARRAY_LONG_HUFF_COUNT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_COUNT[5]*4); memset((void*)(__ARRAY_LONG_HUFF_COUNT[0]),0,__ARRAY_LONG_HUFF_COUNT[5]*4); }else{ __ARRAY_LONG_HUFF_COUNT[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_COUNT[5]*4,1); if (!__ARRAY_LONG_HUFF_COUNT[0]) error(257); } __ARRAY_LONG_HUFF_COUNT[2]|=1; } } if(!qbevent)break;evnt(455);}while(r); do{ if (__ARRAY_LONG_HUFF_WEIGHT[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_WEIGHT[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_WEIGHT[4]= 0 ; __ARRAY_LONG_HUFF_WEIGHT[5]=( 1000 )-__ARRAY_LONG_HUFF_WEIGHT[4]+1; __ARRAY_LONG_HUFF_WEIGHT[6]=1; if (__ARRAY_LONG_HUFF_WEIGHT[2]&4){ __ARRAY_LONG_HUFF_WEIGHT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_WEIGHT[5]*4); memset((void*)(__ARRAY_LONG_HUFF_WEIGHT[0]),0,__ARRAY_LONG_HUFF_WEIGHT[5]*4); }else{ __ARRAY_LONG_HUFF_WEIGHT[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_WEIGHT[5]*4,1); if (!__ARRAY_LONG_HUFF_WEIGHT[0]) error(257); } __ARRAY_LONG_HUFF_WEIGHT[2]|=1; } } if(!qbevent)break;evnt(456);}while(r); do{ if (__ARRAY_LONG_HUFF_BRANCH[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_BRANCH[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_BRANCH[4]= 0 ; __ARRAY_LONG_HUFF_BRANCH[5]=( 255 )-__ARRAY_LONG_HUFF_BRANCH[4]+1; __ARRAY_LONG_HUFF_BRANCH[6]=1; if (__ARRAY_LONG_HUFF_BRANCH[2]&4){ __ARRAY_LONG_HUFF_BRANCH[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_BRANCH[5]*4); memset((void*)(__ARRAY_LONG_HUFF_BRANCH[0]),0,__ARRAY_LONG_HUFF_BRANCH[5]*4); }else{ __ARRAY_LONG_HUFF_BRANCH[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_BRANCH[5]*4,1); if (!__ARRAY_LONG_HUFF_BRANCH[0]) error(257); } __ARRAY_LONG_HUFF_BRANCH[2]|=1; } } if(!qbevent)break;evnt(457);}while(r); do{ if (__ARRAY_LONG_HUFF_PARENT[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_PARENT[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_PARENT[4]= 0 ; __ARRAY_LONG_HUFF_PARENT[5]=( 1000 )-__ARRAY_LONG_HUFF_PARENT[4]+1; __ARRAY_LONG_HUFF_PARENT[6]=1; if (__ARRAY_LONG_HUFF_PARENT[2]&4){ __ARRAY_LONG_HUFF_PARENT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_PARENT[5]*4); memset((void*)(__ARRAY_LONG_HUFF_PARENT[0]),0,__ARRAY_LONG_HUFF_PARENT[5]*4); }else{ __ARRAY_LONG_HUFF_PARENT[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_PARENT[5]*4,1); if (!__ARRAY_LONG_HUFF_PARENT[0]) error(257); } __ARRAY_LONG_HUFF_PARENT[2]|=1; } } if(!qbevent)break;evnt(458);}while(r); do{ if (__ARRAY_LONG_HUFF_BIT[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_BIT[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_BIT[4]= 0 ; __ARRAY_LONG_HUFF_BIT[5]=( 1000 )-__ARRAY_LONG_HUFF_BIT[4]+1; __ARRAY_LONG_HUFF_BIT[6]=1; if (__ARRAY_LONG_HUFF_BIT[2]&4){ __ARRAY_LONG_HUFF_BIT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_BIT[5]*4); memset((void*)(__ARRAY_LONG_HUFF_BIT[0]),0,__ARRAY_LONG_HUFF_BIT[5]*4); }else{ __ARRAY_LONG_HUFF_BIT[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_BIT[5]*4,1); if (!__ARRAY_LONG_HUFF_BIT[0]) error(257); } __ARRAY_LONG_HUFF_BIT[2]|=1; } } if(!qbevent)break;evnt(459);}while(r); do{ if (__ARRAY_LONG_HUFF_BIT0LINK[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_BIT0LINK[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_BIT0LINK[4]= 0 ; __ARRAY_LONG_HUFF_BIT0LINK[5]=( 1000 )-__ARRAY_LONG_HUFF_BIT0LINK[4]+1; __ARRAY_LONG_HUFF_BIT0LINK[6]=1; if (__ARRAY_LONG_HUFF_BIT0LINK[2]&4){ __ARRAY_LONG_HUFF_BIT0LINK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_BIT0LINK[5]*4); memset((void*)(__ARRAY_LONG_HUFF_BIT0LINK[0]),0,__ARRAY_LONG_HUFF_BIT0LINK[5]*4); }else{ __ARRAY_LONG_HUFF_BIT0LINK[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_BIT0LINK[5]*4,1); if (!__ARRAY_LONG_HUFF_BIT0LINK[0]) error(257); } __ARRAY_LONG_HUFF_BIT0LINK[2]|=1; } } if(!qbevent)break;evnt(460);}while(r); do{ if (__ARRAY_LONG_HUFF_BIT1LINK[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_BIT1LINK[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_BIT1LINK[4]= 0 ; __ARRAY_LONG_HUFF_BIT1LINK[5]=( 1000 )-__ARRAY_LONG_HUFF_BIT1LINK[4]+1; __ARRAY_LONG_HUFF_BIT1LINK[6]=1; if (__ARRAY_LONG_HUFF_BIT1LINK[2]&4){ __ARRAY_LONG_HUFF_BIT1LINK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_BIT1LINK[5]*4); memset((void*)(__ARRAY_LONG_HUFF_BIT1LINK[0]),0,__ARRAY_LONG_HUFF_BIT1LINK[5]*4); }else{ __ARRAY_LONG_HUFF_BIT1LINK[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_BIT1LINK[5]*4,1); if (!__ARRAY_LONG_HUFF_BIT1LINK[0]) error(257); } __ARRAY_LONG_HUFF_BIT1LINK[2]|=1; } } if(!qbevent)break;evnt(461);}while(r); do{ if (__ARRAY_UBYTE_HUFF_MASK[2]&2){ error(10); }else{ if (__ARRAY_UBYTE_HUFF_MASK[2]&1){ error(10); }else{ __ARRAY_UBYTE_HUFF_MASK[4]= 0 ; __ARRAY_UBYTE_HUFF_MASK[5]=( 32 * 8 * 256 )-__ARRAY_UBYTE_HUFF_MASK[4]+1; __ARRAY_UBYTE_HUFF_MASK[6]=1; if (__ARRAY_UBYTE_HUFF_MASK[2]&4){ __ARRAY_UBYTE_HUFF_MASK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UBYTE_HUFF_MASK[5]*1); memset((void*)(__ARRAY_UBYTE_HUFF_MASK[0]),0,__ARRAY_UBYTE_HUFF_MASK[5]*1); }else{ __ARRAY_UBYTE_HUFF_MASK[0]=(ptrszint)calloc(__ARRAY_UBYTE_HUFF_MASK[5]*1,1); if (!__ARRAY_UBYTE_HUFF_MASK[0]) error(257); } __ARRAY_UBYTE_HUFF_MASK[2]|=1; } } if(!qbevent)break;evnt(462);}while(r); do{ if (__ARRAY_LONG_HUFF_MASK_BYTES[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_MASK_BYTES[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_MASK_BYTES[8]= 0 ; __ARRAY_LONG_HUFF_MASK_BYTES[9]=( 7 )-__ARRAY_LONG_HUFF_MASK_BYTES[8]+1; __ARRAY_LONG_HUFF_MASK_BYTES[10]=1; __ARRAY_LONG_HUFF_MASK_BYTES[4]= 0 ; __ARRAY_LONG_HUFF_MASK_BYTES[5]=( 255 )-__ARRAY_LONG_HUFF_MASK_BYTES[4]+1; __ARRAY_LONG_HUFF_MASK_BYTES[6]=__ARRAY_LONG_HUFF_MASK_BYTES[10]*__ARRAY_LONG_HUFF_MASK_BYTES[9]; if (__ARRAY_LONG_HUFF_MASK_BYTES[2]&4){ __ARRAY_LONG_HUFF_MASK_BYTES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_MASK_BYTES[5]*__ARRAY_LONG_HUFF_MASK_BYTES[9]*4); memset((void*)(__ARRAY_LONG_HUFF_MASK_BYTES[0]),0,__ARRAY_LONG_HUFF_MASK_BYTES[5]*__ARRAY_LONG_HUFF_MASK_BYTES[9]*4); }else{ __ARRAY_LONG_HUFF_MASK_BYTES[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_MASK_BYTES[5]*__ARRAY_LONG_HUFF_MASK_BYTES[9]*4,1); if (!__ARRAY_LONG_HUFF_MASK_BYTES[0]) error(257); } __ARRAY_LONG_HUFF_MASK_BYTES[2]|=1; } } if(!qbevent)break;evnt(463);}while(r); do{ if (__ARRAY_LONG_HUFF_MASK_BITS[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_MASK_BITS[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_MASK_BITS[4]= 0 ; __ARRAY_LONG_HUFF_MASK_BITS[5]=( 255 )-__ARRAY_LONG_HUFF_MASK_BITS[4]+1; __ARRAY_LONG_HUFF_MASK_BITS[6]=1; if (__ARRAY_LONG_HUFF_MASK_BITS[2]&4){ __ARRAY_LONG_HUFF_MASK_BITS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_MASK_BITS[5]*4); memset((void*)(__ARRAY_LONG_HUFF_MASK_BITS[0]),0,__ARRAY_LONG_HUFF_MASK_BITS[5]*4); }else{ __ARRAY_LONG_HUFF_MASK_BITS[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_MASK_BITS[5]*4,1); if (!__ARRAY_LONG_HUFF_MASK_BITS[0]) error(257); } __ARRAY_LONG_HUFF_MASK_BITS[2]|=1; } } if(!qbevent)break;evnt(464);}while(r); do{ if (__ARRAY_LONG_HUFF_BITVAL[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_BITVAL[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_BITVAL[4]= 0 ; __ARRAY_LONG_HUFF_BITVAL[5]=( 7 )-__ARRAY_LONG_HUFF_BITVAL[4]+1; __ARRAY_LONG_HUFF_BITVAL[6]=1; if (__ARRAY_LONG_HUFF_BITVAL[2]&4){ __ARRAY_LONG_HUFF_BITVAL[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_BITVAL[5]*4); memset((void*)(__ARRAY_LONG_HUFF_BITVAL[0]),0,__ARRAY_LONG_HUFF_BITVAL[5]*4); }else{ __ARRAY_LONG_HUFF_BITVAL[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_BITVAL[5]*4,1); if (!__ARRAY_LONG_HUFF_BITVAL[0]) error(257); } __ARRAY_LONG_HUFF_BITVAL[2]|=1; } } if(!qbevent)break;evnt(465);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(466);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 2 ; if(!qbevent)break;evnt(466);}while(r); do{ tmp_long=array_check(( 2 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 4 ; if(!qbevent)break;evnt(466);}while(r); do{ tmp_long=array_check(( 3 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 8 ; if(!qbevent)break;evnt(466);}while(r); do{ tmp_long=array_check(( 4 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 16 ; if(!qbevent)break;evnt(467);}while(r); do{ tmp_long=array_check(( 5 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 32 ; if(!qbevent)break;evnt(467);}while(r); do{ tmp_long=array_check(( 6 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 64 ; if(!qbevent)break;evnt(467);}while(r); do{ tmp_long=array_check(( 7 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[tmp_long]= 128 ; if(!qbevent)break;evnt(467);}while(r); do{ if (__ARRAY_LONG_HUFF_BRANCH0[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_BRANCH0[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_BRANCH0[4]= 0 ; __ARRAY_LONG_HUFF_BRANCH0[5]=( 1000 )-__ARRAY_LONG_HUFF_BRANCH0[4]+1; __ARRAY_LONG_HUFF_BRANCH0[6]=1; if (__ARRAY_LONG_HUFF_BRANCH0[2]&4){ __ARRAY_LONG_HUFF_BRANCH0[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_BRANCH0[5]*4); memset((void*)(__ARRAY_LONG_HUFF_BRANCH0[0]),0,__ARRAY_LONG_HUFF_BRANCH0[5]*4); }else{ __ARRAY_LONG_HUFF_BRANCH0[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_BRANCH0[5]*4,1); if (!__ARRAY_LONG_HUFF_BRANCH0[0]) error(257); } __ARRAY_LONG_HUFF_BRANCH0[2]|=1; } } if(!qbevent)break;evnt(468);}while(r); do{ if (__ARRAY_LONG_HUFF_BRANCH1[2]&2){ error(10); }else{ if (__ARRAY_LONG_HUFF_BRANCH1[2]&1){ error(10); }else{ __ARRAY_LONG_HUFF_BRANCH1[4]= 0 ; __ARRAY_LONG_HUFF_BRANCH1[5]=( 1000 )-__ARRAY_LONG_HUFF_BRANCH1[4]+1; __ARRAY_LONG_HUFF_BRANCH1[6]=1; if (__ARRAY_LONG_HUFF_BRANCH1[2]&4){ __ARRAY_LONG_HUFF_BRANCH1[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HUFF_BRANCH1[5]*4); memset((void*)(__ARRAY_LONG_HUFF_BRANCH1[0]),0,__ARRAY_LONG_HUFF_BRANCH1[5]*4); }else{ __ARRAY_LONG_HUFF_BRANCH1[0]=(ptrszint)calloc(__ARRAY_LONG_HUFF_BRANCH1[5]*4,1); if (!__ARRAY_LONG_HUFF_BRANCH1[0]) error(257); } __ARRAY_LONG_HUFF_BRANCH1[2]|=1; } } if(!qbevent)break;evnt(469);}while(r); do{ if (__ARRAY_STRING_CHKSUMS_NAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CHKSUMS_NAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_CHKSUMS_NAME[2]&1){ tmp_long=__ARRAY_STRING_CHKSUMS_NAME[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_CHKSUMS_NAME[0]))[tmp_long]); free((void*)(__ARRAY_STRING_CHKSUMS_NAME[0])); } __ARRAY_STRING_CHKSUMS_NAME[4]= 1 ; __ARRAY_STRING_CHKSUMS_NAME[5]=( 1 )-__ARRAY_STRING_CHKSUMS_NAME[4]+1; __ARRAY_STRING_CHKSUMS_NAME[6]=1; __ARRAY_STRING_CHKSUMS_NAME[0]=(ptrszint)malloc(__ARRAY_STRING_CHKSUMS_NAME[5]*8); if (!__ARRAY_STRING_CHKSUMS_NAME[0]) error(257); __ARRAY_STRING_CHKSUMS_NAME[2]|=1; tmp_long=__ARRAY_STRING_CHKSUMS_NAME[5]; if (__ARRAY_STRING_CHKSUMS_NAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CHKSUMS_NAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CHKSUMS_NAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(471);}while(r); do{ if (__ARRAY_STRING_CHKSUMS_VALSTR[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CHKSUMS_VALSTR)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_CHKSUMS_VALSTR[2]&1){ tmp_long=__ARRAY_STRING_CHKSUMS_VALSTR[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[tmp_long]); free((void*)(__ARRAY_STRING_CHKSUMS_VALSTR[0])); } __ARRAY_STRING_CHKSUMS_VALSTR[4]= 1 ; __ARRAY_STRING_CHKSUMS_VALSTR[5]=( 1 )-__ARRAY_STRING_CHKSUMS_VALSTR[4]+1; __ARRAY_STRING_CHKSUMS_VALSTR[6]=1; __ARRAY_STRING_CHKSUMS_VALSTR[0]=(ptrszint)malloc(__ARRAY_STRING_CHKSUMS_VALSTR[5]*8); if (!__ARRAY_STRING_CHKSUMS_VALSTR[0]) error(257); __ARRAY_STRING_CHKSUMS_VALSTR[2]|=1; tmp_long=__ARRAY_STRING_CHKSUMS_VALSTR[5]; if (__ARRAY_STRING_CHKSUMS_VALSTR[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(472);}while(r); do{ if(!qbevent)break;evnt(473);}while(r); do{ if(!qbevent)break;evnt(474);}while(r); do{ goto LABEL_SKIP_UPDATE_ERROR_HANDLER; if(!qbevent)break;evnt(475);}while(r); LABEL_UPDATE_ERROR_HANDLER:; if(qbevent){evnt(476);r=0;} do{ *__LONG_UPDATE_ERROR= 1 ; if(!qbevent)break;evnt(477);}while(r); do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; return;} if(!qbevent)break;evnt(478);}while(r); LABEL_SKIP_UPDATE_ERROR_HANDLER:; if(qbevent){evnt(479);r=0;} do{ if(!qbevent)break;evnt(482);}while(r); do{ if(!qbevent)break;evnt(483);}while(r); do{ if(!qbevent)break;evnt(484);}while(r); do{ if(!qbevent)break;evnt(486);}while(r); do{ if(!qbevent)break;evnt(487);}while(r); do{ if(!qbevent)break;evnt(488);}while(r); do{ if(!qbevent)break;evnt(489);}while(r); do{ if(!qbevent)break;evnt(490);}while(r); do{ if(!qbevent)break;evnt(491);}while(r); do{ if(!qbevent)break;evnt(493);}while(r); do{ if(!qbevent)break;evnt(542);}while(r); do{ if(!qbevent)break;evnt(543);}while(r); do{ if(!qbevent)break;evnt(544);}while(r); do{ if(!qbevent)break;evnt(545);}while(r); do{ if(!qbevent)break;evnt(546);}while(r); do{ if(!qbevent)break;evnt(547);}while(r); do{ if(!qbevent)break;evnt(548);}while(r); do{ if(!qbevent)break;evnt(550);}while(r); do{ if(!qbevent)break;evnt(551);}while(r); do{ if(!qbevent)break;evnt(552);}while(r); do{ if(!qbevent)break;evnt(553);}while(r); do{ if(!qbevent)break;evnt(554);}while(r); do{ if(!qbevent)break;evnt(555);}while(r); do{ if(!qbevent)break;evnt(556);}while(r); do{ if(!qbevent)break;evnt(557);}while(r); do{ if(!qbevent)break;evnt(558);}while(r); do{ if(!qbevent)break;evnt(559);}while(r); do{ if(!qbevent)break;evnt(560);}while(r); do{ if (__ARRAY_STRING_IDETXT[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDETXT[2]&1){ error(10); }else{ __ARRAY_STRING_IDETXT[4]= 0 ; __ARRAY_STRING_IDETXT[5]=( 1000 )-__ARRAY_STRING_IDETXT[4]+1; __ARRAY_STRING_IDETXT[6]=1; __ARRAY_STRING_IDETXT[0]=(ptrszint)malloc(__ARRAY_STRING_IDETXT[5]*8); if (!__ARRAY_STRING_IDETXT[0]) error(257); __ARRAY_STRING_IDETXT[2]|=1; tmp_long=__ARRAY_STRING_IDETXT[5]; if (__ARRAY_STRING_IDETXT[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(561);}while(r); do{ if(!qbevent)break;evnt(562);}while(r); do{ if(!qbevent)break;evnt(563);}while(r); do{ if (__ARRAY_INTEGER_IDEALTCODE[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_IDEALTCODE[2]&1){ error(10); }else{ __ARRAY_INTEGER_IDEALTCODE[4]= 0 ; __ARRAY_INTEGER_IDEALTCODE[5]=( 255 )-__ARRAY_INTEGER_IDEALTCODE[4]+1; __ARRAY_INTEGER_IDEALTCODE[6]=1; if (__ARRAY_INTEGER_IDEALTCODE[2]&4){ __ARRAY_INTEGER_IDEALTCODE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_IDEALTCODE[5]*2); memset((void*)(__ARRAY_INTEGER_IDEALTCODE[0]),0,__ARRAY_INTEGER_IDEALTCODE[5]*2); }else{ __ARRAY_INTEGER_IDEALTCODE[0]=(ptrszint)calloc(__ARRAY_INTEGER_IDEALTCODE[5]*2,1); if (!__ARRAY_INTEGER_IDEALTCODE[0]) error(257); } __ARRAY_INTEGER_IDEALTCODE[2]|=1; } } if(!qbevent)break;evnt(564);}while(r); do{ if(!qbevent)break;evnt(565);}while(r); do{ if(!qbevent)break;evnt(566);}while(r); do{ if(!qbevent)break;evnt(567);}while(r); do{ if(!qbevent)break;evnt(568);}while(r); do{ if(!qbevent)break;evnt(569);}while(r); do{ if(!qbevent)break;evnt(570);}while(r); do{ if(!qbevent)break;evnt(571);}while(r); do{ if(!qbevent)break;evnt(572);}while(r); do{ if(!qbevent)break;evnt(573);}while(r); do{ if(!qbevent)break;evnt(574);}while(r); do{ if(!qbevent)break;evnt(575);}while(r); do{ if(!qbevent)break;evnt(605);}while(r); do{ if(!qbevent)break;evnt(606);}while(r); do{ if (__ARRAY_STRING_MENU[2]&2){ error(10); }else{ if (__ARRAY_STRING_MENU[2]&1){ error(10); }else{ __ARRAY_STRING_MENU[8]= 1 ; __ARRAY_STRING_MENU[9]=( 10 )-__ARRAY_STRING_MENU[8]+1; __ARRAY_STRING_MENU[10]=1; __ARRAY_STRING_MENU[4]= 0 ; __ARRAY_STRING_MENU[5]=( 20 )-__ARRAY_STRING_MENU[4]+1; __ARRAY_STRING_MENU[6]=__ARRAY_STRING_MENU[10]*__ARRAY_STRING_MENU[9]; __ARRAY_STRING_MENU[0]=(ptrszint)malloc(__ARRAY_STRING_MENU[5]*__ARRAY_STRING_MENU[9]*8); if (!__ARRAY_STRING_MENU[0]) error(257); __ARRAY_STRING_MENU[2]|=1; tmp_long=__ARRAY_STRING_MENU[5]*__ARRAY_STRING_MENU[9]; if (__ARRAY_STRING_MENU[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(607);}while(r); do{ if (__ARRAY_LONG_MENUSIZE[2]&2){ error(10); }else{ if (__ARRAY_LONG_MENUSIZE[2]&1){ error(10); }else{ __ARRAY_LONG_MENUSIZE[4]= 1 ; __ARRAY_LONG_MENUSIZE[5]=( 10 )-__ARRAY_LONG_MENUSIZE[4]+1; __ARRAY_LONG_MENUSIZE[6]=1; if (__ARRAY_LONG_MENUSIZE[2]&4){ __ARRAY_LONG_MENUSIZE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_MENUSIZE[5]*4); memset((void*)(__ARRAY_LONG_MENUSIZE[0]),0,__ARRAY_LONG_MENUSIZE[5]*4); }else{ __ARRAY_LONG_MENUSIZE[0]=(ptrszint)calloc(__ARRAY_LONG_MENUSIZE[5]*4,1); if (!__ARRAY_LONG_MENUSIZE[0]) error(257); } __ARRAY_LONG_MENUSIZE[2]|=1; } } if(!qbevent)break;evnt(608);}while(r); do{ if(!qbevent)break;evnt(609);}while(r); do{ if(!qbevent)break;evnt(610);}while(r); do{ if(!qbevent)break;evnt(611);}while(r); do{ if(!qbevent)break;evnt(612);}while(r); do{ if(!qbevent)break;evnt(613);}while(r); do{ if(!qbevent)break;evnt(614);}while(r); do{ if(!qbevent)break;evnt(615);}while(r); do{ if(!qbevent)break;evnt(620);}while(r); do{ if(!qbevent)break;evnt(621);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(647);}while(r); S_447:; if ((-(func_lof( 150 )< 1048 ))||new_error){ if(qbevent){evnt(650);if(r)goto S_447;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(651);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 4 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(652);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(652);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(653);}while(r); do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(654);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_19),0); if(!qbevent)break;evnt(654);}while(r); do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(655);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_20),0); if(!qbevent)break;evnt(655);}while(r); do{ *__INTEGER_V= 4 ; if(!qbevent)break;evnt(656);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_21),0); if(!qbevent)break;evnt(656);}while(r); do{ *__INTEGER_V= 80 ; if(!qbevent)break;evnt(657);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_22),0); if(!qbevent)break;evnt(657);}while(r); do{ *__INTEGER_V= 25 ; if(!qbevent)break;evnt(658);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_23),0); if(!qbevent)break;evnt(658);}while(r); do{ *__INTEGER_V= 0 ; if(!qbevent)break;evnt(659);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_24),0); if(!qbevent)break;evnt(659);}while(r); do{ qbs_set(__STRING_V,func_space( 1024 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(660);}while(r); do{ sub_mid(__STRING_V, 1 ,0,qbs_new_txt_len("c:\\windows\\fonts\\lucon.ttf",26),0); if(!qbevent)break;evnt(660);}while(r); do{ sub_put2( 150 ,NULL,byte_element((uint64)__STRING_V->chr,__STRING_V->len,byte_element_25),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(660);}while(r); do{ *__INTEGER_V= 21 ; if(!qbevent)break;evnt(661);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_26),0); if(!qbevent)break;evnt(661);}while(r); do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(662);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_27),0); if(!qbevent)break;evnt(662);}while(r); do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(663);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_28),0); if(!qbevent)break;evnt(663);}while(r); do{ *__INTEGER_V= 0 ; if(!qbevent)break;evnt(664);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_29),0); if(!qbevent)break;evnt(664);}while(r); do{ *__LONG_IDEUPDATELAST= 0 ; if(!qbevent)break;evnt(665);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__LONG_IDEUPDATELAST,4,byte_element_30),0); if(!qbevent)break;evnt(665);}while(r); } S_478:; if ((-(func_lof( 150 )< 1050 ))||new_error){ if(qbevent){evnt(667);if(r)goto S_478;} do{ sub_seek( 150 , 1049 ); if(!qbevent)break;evnt(668);}while(r); do{ *__INTEGER_V= 0 ; if(!qbevent)break;evnt(669);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_31),0); if(!qbevent)break;evnt(669);}while(r); } S_483:; if ((-(func_lof( 150 )< 1054 ))||new_error){ if(qbevent){evnt(671);if(r)goto S_483;} do{ sub_seek( 150 , 1051 ); if(!qbevent)break;evnt(672);}while(r); do{ *__LONG_V= 100 ; if(!qbevent)break;evnt(673);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__LONG_V,4,byte_element_32),0); if(!qbevent)break;evnt(673);}while(r); } S_488:; if ((-(func_lof( 150 )< 1056 ))||new_error){ if(qbevent){evnt(675);if(r)goto S_488;} do{ sub_seek( 150 , 1055 ); if(!qbevent)break;evnt(676);}while(r); do{ *__INTEGER_V= 0 ; if(!qbevent)break;evnt(677);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_33),0); if(!qbevent)break;evnt(677);}while(r); } do{ sub_seek( 150 , 1 ); if(!qbevent)break;evnt(682);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_34),0); if(!qbevent)break;evnt(684);}while(r); S_495:; if ((-(*__INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(684);if(r)goto S_495;} do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(684);}while(r); } do{ *__LONG_IDEAUTOLAYOUT=*__INTEGER_V; if(!qbevent)break;evnt(685);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_35),0); if(!qbevent)break;evnt(686);}while(r); S_500:; if ((-(*__INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(686);if(r)goto S_500;} do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(686);}while(r); } do{ *__LONG_IDEAUTOINDENT=*__INTEGER_V; if(!qbevent)break;evnt(687);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_36),0); if(!qbevent)break;evnt(688);}while(r); S_505:; if (((-(*__INTEGER_V< 0 ))|(-(*__INTEGER_V> 64 )))||new_error){ if(qbevent){evnt(688);if(r)goto S_505;} do{ *__INTEGER_V= 4 ; if(!qbevent)break;evnt(688);}while(r); } do{ *__LONG_IDEAUTOINDENTSIZE=*__INTEGER_V; if(!qbevent)break;evnt(689);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_37),0); if(!qbevent)break;evnt(691);}while(r); S_510:; if (((-(*__INTEGER_V< 80 ))|(-(*__INTEGER_V> 1000 )))||new_error){ if(qbevent){evnt(691);if(r)goto S_510;} do{ *__INTEGER_V= 80 ; if(!qbevent)break;evnt(691);}while(r); } do{ *__LONG_IDEWX=*__INTEGER_V; if(!qbevent)break;evnt(692);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_38),0); if(!qbevent)break;evnt(693);}while(r); S_515:; if (((-(*__INTEGER_V< 25 ))|(-(*__INTEGER_V> 1000 )))||new_error){ if(qbevent){evnt(693);if(r)goto S_515;} do{ *__INTEGER_V= 25 ; if(!qbevent)break;evnt(693);}while(r); } do{ *__LONG_IDEWY=*__INTEGER_V; if(!qbevent)break;evnt(694);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_39),0); if(!qbevent)break;evnt(695);}while(r); S_520:; if ((-(*__INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(695);if(r)goto S_520;} do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(695);}while(r); } do{ *__LONG_IDECUSTOMFONT=*__INTEGER_V; if(!qbevent)break;evnt(696);}while(r); do{ qbs_set(__STRING_V,func_space( 1024 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(697);}while(r); do{ sub_get2( 150 ,NULL,__STRING_V,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(697);}while(r); do{ qbs_set(__STRING_IDECUSTOMFONTFILE,qbs_rtrim(__STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(697);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_40),0); if(!qbevent)break;evnt(698);}while(r); S_528:; if (((-(*__INTEGER_V< 8 ))|(-(*__INTEGER_V> 100 )))||new_error){ if(qbevent){evnt(698);if(r)goto S_528;} do{ *__INTEGER_V= 21 ; if(!qbevent)break;evnt(698);}while(r); } do{ *__LONG_IDECUSTOMFONTHEIGHT=*__INTEGER_V; if(!qbevent)break;evnt(699);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_41),0); if(!qbevent)break;evnt(700);}while(r); S_533:; if (((-(*__INTEGER_V< 0 ))|(-(*__INTEGER_V> 1 )))||new_error){ if(qbevent){evnt(700);if(r)goto S_533;} do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(700);}while(r); } do{ *__LONG_IDEUPDATECHECK=*__INTEGER_V; if(!qbevent)break;evnt(701);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_42),0); if(!qbevent)break;evnt(702);}while(r); S_538:; if (((-(*__INTEGER_V< 0 ))|(-(*__INTEGER_V> 1 )))||new_error){ if(qbevent){evnt(702);if(r)goto S_538;} do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(702);}while(r); } do{ *__LONG_IDEUPDATEDAILY=*__INTEGER_V; if(!qbevent)break;evnt(703);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_43),0); if(!qbevent)break;evnt(704);}while(r); S_543:; if (((-(*__INTEGER_V< 0 ))|(-(*__INTEGER_V> 1 )))||new_error){ if(qbevent){evnt(704);if(r)goto S_543;} do{ *__INTEGER_V= 1 ; if(!qbevent)break;evnt(704);}while(r); } do{ *__LONG_IDEUPDATEAUTO=*__INTEGER_V; if(!qbevent)break;evnt(705);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_V,4,byte_element_44),0); if(!qbevent)break;evnt(706);}while(r); do{ *__LONG_IDEUPDATELAST=*__LONG_V; if(!qbevent)break;evnt(707);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_45),0); if(!qbevent)break;evnt(708);}while(r); S_550:; if (((-(*__INTEGER_V< 0 ))|(-(*__INTEGER_V> 27 )))||new_error){ if(qbevent){evnt(708);if(r)goto S_550;} do{ *__INTEGER_V= 0 ; if(!qbevent)break;evnt(708);}while(r); } do{ *__LONG_IDECPINDEX=*__INTEGER_V; if(!qbevent)break;evnt(709);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_V,4,byte_element_46),0); if(!qbevent)break;evnt(710);}while(r); S_555:; if (((-(*__LONG_V< 10 ))|(-(*__LONG_V> 2000 )))||new_error){ if(qbevent){evnt(710);if(r)goto S_555;} do{ *__LONG_V= 100 ; if(!qbevent)break;evnt(710);}while(r); } do{ *__LONG_IDEBACKUPSIZE=*__LONG_V; if(!qbevent)break;evnt(711);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__INTEGER_V,2,byte_element_47),0); if(!qbevent)break;evnt(712);}while(r); S_560:; if (((-(*__INTEGER_V< 0 ))|(-(*__INTEGER_V> 1 )))||new_error){ if(qbevent){evnt(712);if(r)goto S_560;} do{ *__INTEGER_V= 0 ; if(!qbevent)break;evnt(712);}while(r); } do{ *__LONG_IDEDEBUGINFO=*__INTEGER_V; if(!qbevent)break;evnt(713);}while(r); do{ *__LONG_INCLUDE_GDB_DEBUGGING_INFO=*__LONG_IDEDEBUGINFO; if(!qbevent)break;evnt(714);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(715);}while(r); S_566:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(717);if(r)goto S_566;} S_567:; if ((*__LONG_IDEUPDATECHECK)||new_error){ if(qbevent){evnt(720);if(r)goto S_567;} do{ qbs_set(__STRING_A,func_date()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(721);}while(r); do{ *__LONG_DATEVAL=qbr((func_val(func_mid(__STRING_A, 4 , 2 ,1)))+(func_val(func_mid(__STRING_A, 1 , 2 ,1))* 32 )+(func_val(func_mid(__STRING_A, 7 , 4 ,1))* 416 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(721);}while(r); S_570:; if (((-(*__LONG_IDEUPDATEDAILY== 0 ))|(-(*__LONG_DATEVAL!=*__LONG_IDEUPDATELAST)))||new_error){ if(qbevent){evnt(722);if(r)goto S_570;} do{ *__LONG_IDEUPDATELAST=*__LONG_DATEVAL; if(!qbevent)break;evnt(724);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(725);}while(r); S_573:; if ((-(func_lof( 150 )>= 1048 ))||new_error){ if(qbevent){evnt(726);if(r)goto S_573;} do{ sub_seek( 150 , 1045 ); if(!qbevent)break;evnt(727);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)__LONG_IDEUPDATELAST,4,byte_element_48),0); if(!qbevent)break;evnt(728);}while(r); } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(730);}while(r); do{ *__LONG_UPDATEHANDLE=FUNC_BEGINDOWNLOAD(qbs_new_txt_len("www.qb64.net/update2.txt",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(732);}while(r); do{ *__SINGLE_IDEUPDATETIMERVAL=func_timer(NULL,0); if(!qbevent)break;evnt(733);}while(r); } } } do{ if(!qbevent)break;evnt(748);}while(r); do{ if(!qbevent)break;evnt(749);}while(r); do{ if(!qbevent)break;evnt(750);}while(r); do{ if(!qbevent)break;evnt(751);}while(r); do{ if(!qbevent)break;evnt(752);}while(r); do{ if(!qbevent)break;evnt(753);}while(r); do{ if(!qbevent)break;evnt(754);}while(r); do{ if(!qbevent)break;evnt(755);}while(r); do{ if(!qbevent)break;evnt(756);}while(r); do{ if (__ARRAY_INTEGER_HASH1CHAR[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_HASH1CHAR[2]&1){ error(10); }else{ __ARRAY_INTEGER_HASH1CHAR[4]= 0 ; __ARRAY_INTEGER_HASH1CHAR[5]=( 255 )-__ARRAY_INTEGER_HASH1CHAR[4]+1; __ARRAY_INTEGER_HASH1CHAR[6]=1; if (__ARRAY_INTEGER_HASH1CHAR[2]&4){ __ARRAY_INTEGER_HASH1CHAR[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_HASH1CHAR[5]*2); memset((void*)(__ARRAY_INTEGER_HASH1CHAR[0]),0,__ARRAY_INTEGER_HASH1CHAR[5]*2); }else{ __ARRAY_INTEGER_HASH1CHAR[0]=(ptrszint)calloc(__ARRAY_INTEGER_HASH1CHAR[5]*2,1); if (!__ARRAY_INTEGER_HASH1CHAR[0]) error(257); } __ARRAY_INTEGER_HASH1CHAR[2]|=1; } } if(!qbevent)break;evnt(758);}while(r); do{ if (__ARRAY_INTEGER_HASH2CHAR[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_HASH2CHAR[2]&1){ error(10); }else{ __ARRAY_INTEGER_HASH2CHAR[4]= 0 ; __ARRAY_INTEGER_HASH2CHAR[5]=( 65535 )-__ARRAY_INTEGER_HASH2CHAR[4]+1; __ARRAY_INTEGER_HASH2CHAR[6]=1; if (__ARRAY_INTEGER_HASH2CHAR[2]&4){ __ARRAY_INTEGER_HASH2CHAR[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_HASH2CHAR[5]*2); memset((void*)(__ARRAY_INTEGER_HASH2CHAR[0]),0,__ARRAY_INTEGER_HASH2CHAR[5]*2); }else{ __ARRAY_INTEGER_HASH2CHAR[0]=(ptrszint)calloc(__ARRAY_INTEGER_HASH2CHAR[5]*2,1); if (!__ARRAY_INTEGER_HASH2CHAR[0]) error(257); } __ARRAY_INTEGER_HASH2CHAR[2]|=1; } } if(!qbevent)break;evnt(759);}while(r); S_594:; fornext_value50= 1 ; fornext_finalvalue50= 26 ; fornext_step50= 1 ; if (fornext_step50<0) fornext_step_negative50=1; else fornext_step_negative50=0; if (new_error) goto fornext_error50; goto fornext_entrylabel50; while(1){ fornext_value50=fornext_step50+(*__LONG_X); fornext_entrylabel50: *__LONG_X=fornext_value50; if (fornext_step_negative50){ if (fornext_value50fornext_finalvalue50) break; } fornext_error50:; if(qbevent){evnt(760);if(r)goto S_594;} do{ tmp_long=array_check(( 64 +*__LONG_X)-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]=*__LONG_X; if(!qbevent)break;evnt(761);}while(r); do{ tmp_long=array_check(( 96 +*__LONG_X)-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]=*__LONG_X; if(!qbevent)break;evnt(762);}while(r); } fornext_exit_49:; do{ tmp_long=array_check(( 95 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 27 ; if(!qbevent)break;evnt(764);}while(r); do{ tmp_long=array_check(( 48 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 28 ; if(!qbevent)break;evnt(765);}while(r); do{ tmp_long=array_check(( 49 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 29 ; if(!qbevent)break;evnt(766);}while(r); do{ tmp_long=array_check(( 50 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 30 ; if(!qbevent)break;evnt(767);}while(r); do{ tmp_long=array_check(( 51 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 31 ; if(!qbevent)break;evnt(768);}while(r); do{ tmp_long=array_check(( 52 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 23 ; if(!qbevent)break;evnt(769);}while(r); do{ tmp_long=array_check(( 53 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 22 ; if(!qbevent)break;evnt(770);}while(r); do{ tmp_long=array_check(( 54 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 20 ; if(!qbevent)break;evnt(771);}while(r); do{ tmp_long=array_check(( 55 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 19 ; if(!qbevent)break;evnt(772);}while(r); do{ tmp_long=array_check(( 56 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 18 ; if(!qbevent)break;evnt(773);}while(r); do{ tmp_long=array_check(( 57 )-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[tmp_long]= 17 ; if(!qbevent)break;evnt(774);}while(r); S_609:; fornext_value52= 0 ; fornext_finalvalue52= 255 ; fornext_step52= 1 ; if (fornext_step52<0) fornext_step_negative52=1; else fornext_step_negative52=0; if (new_error) goto fornext_error52; goto fornext_entrylabel52; while(1){ fornext_value52=fornext_step52+(*__LONG_C1); fornext_entrylabel52: *__LONG_C1=fornext_value52; if (fornext_step_negative52){ if (fornext_value52fornext_finalvalue52) break; } fornext_error52:; if(qbevent){evnt(775);if(r)goto S_609;} S_610:; fornext_value54= 0 ; fornext_finalvalue54= 255 ; fornext_step54= 1 ; if (fornext_step54<0) fornext_step_negative54=1; else fornext_step_negative54=0; if (new_error) goto fornext_error54; goto fornext_entrylabel54; while(1){ fornext_value54=fornext_step54+(*__LONG_C2); fornext_entrylabel54: *__LONG_C2=fornext_value54; if (fornext_step_negative54){ if (fornext_value54fornext_finalvalue54) break; } fornext_error54:; if(qbevent){evnt(776);if(r)goto S_610;} do{ tmp_long=array_check((*__LONG_C1+(*__LONG_C2* 256 ))-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[tmp_long]=((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[array_check((*__LONG_C1)-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5])]+(((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[array_check((*__LONG_C2)-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5])]* 32 ); if(!qbevent)break;evnt(777);}while(r); } fornext_exit_53:; } fornext_exit_51:; do{ *__LONG_HASHLISTSIZE= 65536 ; if(!qbevent)break;evnt(781);}while(r); do{ *__LONG_HASHLISTNEXT= 1 ; if(!qbevent)break;evnt(782);}while(r); do{ *__LONG_HASHLISTFREESIZE= 1024 ; if(!qbevent)break;evnt(783);}while(r); do{ *__LONG_HASHLISTFREELAST= 0 ; if(!qbevent)break;evnt(784);}while(r); do{ if (__ARRAY_UDT_HASHLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_HASHLIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_HASHLIST[2]&1){ if (__ARRAY_UDT_HASHLIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_HASHLIST[0])); }else{ free((void*)(__ARRAY_UDT_HASHLIST[0])); } } __ARRAY_UDT_HASHLIST[4]= 1 ; __ARRAY_UDT_HASHLIST[5]=(*__LONG_HASHLISTSIZE)-__ARRAY_UDT_HASHLIST[4]+1; __ARRAY_UDT_HASHLIST[6]=1; if (__ARRAY_UDT_HASHLIST[2]&4){ __ARRAY_UDT_HASHLIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_HASHLIST[5]*160/8+1); memset((void*)(__ARRAY_UDT_HASHLIST[0]),0,__ARRAY_UDT_HASHLIST[5]*160/8+1); }else{ __ARRAY_UDT_HASHLIST[0]=(ptrszint)calloc(__ARRAY_UDT_HASHLIST[5]*160/8+1,1); if (!__ARRAY_UDT_HASHLIST[0]) error(257); } __ARRAY_UDT_HASHLIST[2]|=1; } if(!qbevent)break;evnt(785);}while(r); do{ if (__ARRAY_STRING256_HASHLISTNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_HASHLISTNAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING256_HASHLISTNAME[2]&1){ if (__ARRAY_STRING256_HASHLISTNAME[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0])); }else{ free((void*)(__ARRAY_STRING256_HASHLISTNAME[0])); } } __ARRAY_STRING256_HASHLISTNAME[4]= 1 ; __ARRAY_STRING256_HASHLISTNAME[5]=(*__LONG_HASHLISTSIZE)-__ARRAY_STRING256_HASHLISTNAME[4]+1; __ARRAY_STRING256_HASHLISTNAME[6]=1; if (__ARRAY_STRING256_HASHLISTNAME[2]&4){ __ARRAY_STRING256_HASHLISTNAME[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING256_HASHLISTNAME[5]*256); memset((void*)(__ARRAY_STRING256_HASHLISTNAME[0]),0,__ARRAY_STRING256_HASHLISTNAME[5]*256); }else{ __ARRAY_STRING256_HASHLISTNAME[0]=(ptrszint)calloc(__ARRAY_STRING256_HASHLISTNAME[5]*256,1); if (!__ARRAY_STRING256_HASHLISTNAME[0]) error(257); } __ARRAY_STRING256_HASHLISTNAME[2]|=1; } if(!qbevent)break;evnt(786);}while(r); do{ if (__ARRAY_LONG_HASHLISTFREE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_HASHLISTFREE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_HASHLISTFREE[2]&1){ if (__ARRAY_LONG_HASHLISTFREE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_HASHLISTFREE[0])); }else{ free((void*)(__ARRAY_LONG_HASHLISTFREE[0])); } } __ARRAY_LONG_HASHLISTFREE[4]= 1 ; __ARRAY_LONG_HASHLISTFREE[5]=(*__LONG_HASHLISTFREESIZE)-__ARRAY_LONG_HASHLISTFREE[4]+1; __ARRAY_LONG_HASHLISTFREE[6]=1; if (__ARRAY_LONG_HASHLISTFREE[2]&4){ __ARRAY_LONG_HASHLISTFREE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HASHLISTFREE[5]*4); memset((void*)(__ARRAY_LONG_HASHLISTFREE[0]),0,__ARRAY_LONG_HASHLISTFREE[5]*4); }else{ __ARRAY_LONG_HASHLISTFREE[0]=(ptrszint)calloc(__ARRAY_LONG_HASHLISTFREE[5]*4,1); if (!__ARRAY_LONG_HASHLISTFREE[0]) error(257); } __ARRAY_LONG_HASHLISTFREE[2]|=1; } if(!qbevent)break;evnt(787);}while(r); do{ if (__ARRAY_LONG_HASHTABLE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_HASHTABLE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_HASHTABLE[2]&1){ if (__ARRAY_LONG_HASHTABLE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_HASHTABLE[0])); }else{ free((void*)(__ARRAY_LONG_HASHTABLE[0])); } } __ARRAY_LONG_HASHTABLE[4]= 0 ; __ARRAY_LONG_HASHTABLE[5]=( 16777215 )-__ARRAY_LONG_HASHTABLE[4]+1; __ARRAY_LONG_HASHTABLE[6]=1; if (__ARRAY_LONG_HASHTABLE[2]&4){ __ARRAY_LONG_HASHTABLE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HASHTABLE[5]*4); memset((void*)(__ARRAY_LONG_HASHTABLE[0]),0,__ARRAY_LONG_HASHTABLE[5]*4); }else{ __ARRAY_LONG_HASHTABLE[0]=(ptrszint)calloc(__ARRAY_LONG_HASHTABLE[5]*4,1); if (!__ARRAY_LONG_HASHTABLE[0]) error(257); } __ARRAY_LONG_HASHTABLE[2]|=1; } if(!qbevent)break;evnt(788);}while(r); do{ if(!qbevent)break;evnt(814);}while(r); do{ *__LONG_LABELS_UBOUND= 100 ; if(!qbevent)break;evnt(815);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_LABELS[2]&1){ if (__ARRAY_UDT_LABELS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); }else{ free((void*)(__ARRAY_UDT_LABELS[0])); } } __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_LABELS[5]*2224/8+1); memset((void*)(__ARRAY_UDT_LABELS[0]),0,__ARRAY_UDT_LABELS[5]*2224/8+1); }else{ __ARRAY_UDT_LABELS[0]=(ptrszint)calloc(__ARRAY_UDT_LABELS[5]*2224/8+1,1); if (!__ARRAY_UDT_LABELS[0]) error(257); } __ARRAY_UDT_LABELS[2]|=1; } if(!qbevent)break;evnt(816);}while(r); do{ if(!qbevent)break;evnt(817);}while(r); do{ if(!qbevent)break;evnt(819);}while(r); do{ if(!qbevent)break;evnt(820);}while(r); do{ if(!qbevent)break;evnt(821);}while(r); do{ if(!qbevent)break;evnt(823);}while(r); do{ if(!qbevent)break;evnt(825);}while(r); do{ if(!qbevent)break;evnt(827);}while(r); do{ if(!qbevent)break;evnt(830);}while(r); do{ if(!qbevent)break;evnt(832);}while(r); do{ if (__ARRAY_LONG_REVERTMAYMUSTHAVE[2]&2){ error(10); }else{ if (__ARRAY_LONG_REVERTMAYMUSTHAVE[2]&1){ error(10); }else{ __ARRAY_LONG_REVERTMAYMUSTHAVE[4]= 1 ; __ARRAY_LONG_REVERTMAYMUSTHAVE[5]=( 10000 )-__ARRAY_LONG_REVERTMAYMUSTHAVE[4]+1; __ARRAY_LONG_REVERTMAYMUSTHAVE[6]=1; if (__ARRAY_LONG_REVERTMAYMUSTHAVE[2]&4){ __ARRAY_LONG_REVERTMAYMUSTHAVE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_REVERTMAYMUSTHAVE[5]*4); memset((void*)(__ARRAY_LONG_REVERTMAYMUSTHAVE[0]),0,__ARRAY_LONG_REVERTMAYMUSTHAVE[5]*4); }else{ __ARRAY_LONG_REVERTMAYMUSTHAVE[0]=(ptrszint)calloc(__ARRAY_LONG_REVERTMAYMUSTHAVE[5]*4,1); if (!__ARRAY_LONG_REVERTMAYMUSTHAVE[0]) error(257); } __ARRAY_LONG_REVERTMAYMUSTHAVE[2]|=1; } } if(!qbevent)break;evnt(834);}while(r); do{ if(!qbevent)break;evnt(835);}while(r); do{ if(!qbevent)break;evnt(837);}while(r); do{ if(!qbevent)break;evnt(839);}while(r); do{ if(!qbevent)break;evnt(842);}while(r); do{ if (__ARRAY_STRING_INCNAME[2]&2){ error(10); }else{ if (__ARRAY_STRING_INCNAME[2]&1){ error(10); }else{ __ARRAY_STRING_INCNAME[4]= 0 ; __ARRAY_STRING_INCNAME[5]=( 100 )-__ARRAY_STRING_INCNAME[4]+1; __ARRAY_STRING_INCNAME[6]=1; __ARRAY_STRING_INCNAME[0]=(ptrszint)malloc(__ARRAY_STRING_INCNAME[5]*8); if (!__ARRAY_STRING_INCNAME[0]) error(257); __ARRAY_STRING_INCNAME[2]|=1; tmp_long=__ARRAY_STRING_INCNAME[5]; if (__ARRAY_STRING_INCNAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_INCNAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_INCNAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(843);}while(r); do{ if (__ARRAY_LONG_INCLINENUMBER[2]&2){ error(10); }else{ if (__ARRAY_LONG_INCLINENUMBER[2]&1){ error(10); }else{ __ARRAY_LONG_INCLINENUMBER[4]= 0 ; __ARRAY_LONG_INCLINENUMBER[5]=( 100 )-__ARRAY_LONG_INCLINENUMBER[4]+1; __ARRAY_LONG_INCLINENUMBER[6]=1; if (__ARRAY_LONG_INCLINENUMBER[2]&4){ __ARRAY_LONG_INCLINENUMBER[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_INCLINENUMBER[5]*4); memset((void*)(__ARRAY_LONG_INCLINENUMBER[0]),0,__ARRAY_LONG_INCLINENUMBER[5]*4); }else{ __ARRAY_LONG_INCLINENUMBER[0]=(ptrszint)calloc(__ARRAY_LONG_INCLINENUMBER[5]*4,1); if (!__ARRAY_LONG_INCLINENUMBER[0]) error(257); } __ARRAY_LONG_INCLINENUMBER[2]|=1; } } if(!qbevent)break;evnt(844);}while(r); do{ if(!qbevent)break;evnt(845);}while(r); do{ if(!qbevent)break;evnt(848);}while(r); do{ qbs_set(__STRING_FIX046,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("__",2),qbs_new_txt_len("ASCII",5)),qbs_new_txt_len("_",1)),qbs_new_txt_len("CHR",3)),qbs_new_txt_len("_",1)),qbs_new_txt_len("046",3)),qbs_new_txt_len("__",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(849);}while(r); do{ if(!qbevent)break;evnt(851);}while(r); do{ if(!qbevent)break;evnt(852);}while(r); do{ if(!qbevent)break;evnt(854);}while(r); do{ if(!qbevent)break;evnt(856);}while(r); do{ if(!qbevent)break;evnt(857);}while(r); do{ if(!qbevent)break;evnt(860);}while(r); do{ if (__ARRAY_LONG_ALPHANUMERIC[2]&2){ error(10); }else{ if (__ARRAY_LONG_ALPHANUMERIC[2]&1){ error(10); }else{ __ARRAY_LONG_ALPHANUMERIC[4]= 0 ; __ARRAY_LONG_ALPHANUMERIC[5]=( 255 )-__ARRAY_LONG_ALPHANUMERIC[4]+1; __ARRAY_LONG_ALPHANUMERIC[6]=1; if (__ARRAY_LONG_ALPHANUMERIC[2]&4){ __ARRAY_LONG_ALPHANUMERIC[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_ALPHANUMERIC[5]*4); memset((void*)(__ARRAY_LONG_ALPHANUMERIC[0]),0,__ARRAY_LONG_ALPHANUMERIC[5]*4); }else{ __ARRAY_LONG_ALPHANUMERIC[0]=(ptrszint)calloc(__ARRAY_LONG_ALPHANUMERIC[5]*4,1); if (!__ARRAY_LONG_ALPHANUMERIC[0]) error(257); } __ARRAY_LONG_ALPHANUMERIC[2]|=1; } } if(!qbevent)break;evnt(862);}while(r); S_651:; fornext_value56= 48 ; fornext_finalvalue56= 57 ; fornext_step56= 1 ; if (fornext_step56<0) fornext_step_negative56=1; else fornext_step_negative56=0; if (new_error) goto fornext_error56; goto fornext_entrylabel56; while(1){ fornext_value56=fornext_step56+(*__LONG_I); fornext_entrylabel56: *__LONG_I=fornext_value56; if (fornext_step_negative56){ if (fornext_value56fornext_finalvalue56) break; } fornext_error56:; if(qbevent){evnt(863);if(r)goto S_651;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(864);}while(r); } fornext_exit_55:; S_654:; fornext_value58= 65 ; fornext_finalvalue58= 90 ; fornext_step58= 1 ; if (fornext_step58<0) fornext_step_negative58=1; else fornext_step_negative58=0; if (new_error) goto fornext_error58; goto fornext_entrylabel58; while(1){ fornext_value58=fornext_step58+(*__LONG_I); fornext_entrylabel58: *__LONG_I=fornext_value58; if (fornext_step_negative58){ if (fornext_value58fornext_finalvalue58) break; } fornext_error58:; if(qbevent){evnt(866);if(r)goto S_654;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(867);}while(r); } fornext_exit_57:; S_657:; fornext_value60= 97 ; fornext_finalvalue60= 122 ; fornext_step60= 1 ; if (fornext_step60<0) fornext_step_negative60=1; else fornext_step_negative60=0; if (new_error) goto fornext_error60; goto fornext_entrylabel60; while(1){ fornext_value60=fornext_step60+(*__LONG_I); fornext_entrylabel60: *__LONG_I=fornext_value60; if (fornext_step_negative60){ if (fornext_value60fornext_finalvalue60) break; } fornext_error60:; if(qbevent){evnt(869);if(r)goto S_657;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(870);}while(r); } fornext_exit_59:; do{ tmp_long=array_check(( 95 )-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(873);}while(r); do{ if (__ARRAY_LONG_ISALPHA[2]&2){ error(10); }else{ if (__ARRAY_LONG_ISALPHA[2]&1){ error(10); }else{ __ARRAY_LONG_ISALPHA[4]= 0 ; __ARRAY_LONG_ISALPHA[5]=( 255 )-__ARRAY_LONG_ISALPHA[4]+1; __ARRAY_LONG_ISALPHA[6]=1; if (__ARRAY_LONG_ISALPHA[2]&4){ __ARRAY_LONG_ISALPHA[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_ISALPHA[5]*4); memset((void*)(__ARRAY_LONG_ISALPHA[0]),0,__ARRAY_LONG_ISALPHA[5]*4); }else{ __ARRAY_LONG_ISALPHA[0]=(ptrszint)calloc(__ARRAY_LONG_ISALPHA[5]*4,1); if (!__ARRAY_LONG_ISALPHA[0]) error(257); } __ARRAY_LONG_ISALPHA[2]|=1; } } if(!qbevent)break;evnt(875);}while(r); S_662:; fornext_value62= 65 ; fornext_finalvalue62= 90 ; fornext_step62= 1 ; if (fornext_step62<0) fornext_step_negative62=1; else fornext_step_negative62=0; if (new_error) goto fornext_error62; goto fornext_entrylabel62; while(1){ fornext_value62=fornext_step62+(*__LONG_I); fornext_entrylabel62: *__LONG_I=fornext_value62; if (fornext_step_negative62){ if (fornext_value62fornext_finalvalue62) break; } fornext_error62:; if(qbevent){evnt(876);if(r)goto S_662;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_ISALPHA[4],__ARRAY_LONG_ISALPHA[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ISALPHA[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(877);}while(r); } fornext_exit_61:; S_665:; fornext_value64= 97 ; fornext_finalvalue64= 122 ; fornext_step64= 1 ; if (fornext_step64<0) fornext_step_negative64=1; else fornext_step_negative64=0; if (new_error) goto fornext_error64; goto fornext_entrylabel64; while(1){ fornext_value64=fornext_step64+(*__LONG_I); fornext_entrylabel64: *__LONG_I=fornext_value64; if (fornext_step_negative64){ if (fornext_value64fornext_finalvalue64) break; } fornext_error64:; if(qbevent){evnt(879);if(r)goto S_665;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_ISALPHA[4],__ARRAY_LONG_ISALPHA[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ISALPHA[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(880);}while(r); } fornext_exit_63:; do{ tmp_long=array_check(( 95 )-__ARRAY_LONG_ISALPHA[4],__ARRAY_LONG_ISALPHA[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ISALPHA[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(883);}while(r); do{ if (__ARRAY_LONG_ISNUMERIC[2]&2){ error(10); }else{ if (__ARRAY_LONG_ISNUMERIC[2]&1){ error(10); }else{ __ARRAY_LONG_ISNUMERIC[4]= 0 ; __ARRAY_LONG_ISNUMERIC[5]=( 255 )-__ARRAY_LONG_ISNUMERIC[4]+1; __ARRAY_LONG_ISNUMERIC[6]=1; if (__ARRAY_LONG_ISNUMERIC[2]&4){ __ARRAY_LONG_ISNUMERIC[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_ISNUMERIC[5]*4); memset((void*)(__ARRAY_LONG_ISNUMERIC[0]),0,__ARRAY_LONG_ISNUMERIC[5]*4); }else{ __ARRAY_LONG_ISNUMERIC[0]=(ptrszint)calloc(__ARRAY_LONG_ISNUMERIC[5]*4,1); if (!__ARRAY_LONG_ISNUMERIC[0]) error(257); } __ARRAY_LONG_ISNUMERIC[2]|=1; } } if(!qbevent)break;evnt(885);}while(r); S_670:; fornext_value66= 48 ; fornext_finalvalue66= 57 ; fornext_step66= 1 ; if (fornext_step66<0) fornext_step_negative66=1; else fornext_step_negative66=0; if (new_error) goto fornext_error66; goto fornext_entrylabel66; while(1){ fornext_value66=fornext_step66+(*__LONG_I); fornext_entrylabel66: *__LONG_I=fornext_value66; if (fornext_step_negative66){ if (fornext_value66fornext_finalvalue66) break; } fornext_error66:; if(qbevent){evnt(886);if(r)goto S_670;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_ISNUMERIC[4],__ARRAY_LONG_ISNUMERIC[5]); if (!new_error) ((int32*)(__ARRAY_LONG_ISNUMERIC[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(887);}while(r); } fornext_exit_65:; do{ if (__ARRAY_LONG_LFSINGLECHAR[2]&2){ error(10); }else{ if (__ARRAY_LONG_LFSINGLECHAR[2]&1){ error(10); }else{ __ARRAY_LONG_LFSINGLECHAR[4]= 0 ; __ARRAY_LONG_LFSINGLECHAR[5]=( 255 )-__ARRAY_LONG_LFSINGLECHAR[4]+1; __ARRAY_LONG_LFSINGLECHAR[6]=1; if (__ARRAY_LONG_LFSINGLECHAR[2]&4){ __ARRAY_LONG_LFSINGLECHAR[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_LFSINGLECHAR[5]*4); memset((void*)(__ARRAY_LONG_LFSINGLECHAR[0]),0,__ARRAY_LONG_LFSINGLECHAR[5]*4); }else{ __ARRAY_LONG_LFSINGLECHAR[0]=(ptrszint)calloc(__ARRAY_LONG_LFSINGLECHAR[5]*4,1); if (!__ARRAY_LONG_LFSINGLECHAR[0]) error(257); } __ARRAY_LONG_LFSINGLECHAR[2]|=1; } } if(!qbevent)break;evnt(891);}while(r); do{ tmp_long=array_check(( 40 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(892);}while(r); do{ tmp_long=array_check(( 41 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(893);}while(r); do{ tmp_long=array_check(( 42 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(894);}while(r); do{ tmp_long=array_check(( 43 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(895);}while(r); do{ tmp_long=array_check(( 45 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(896);}while(r); do{ tmp_long=array_check(( 47 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(897);}while(r); do{ tmp_long=array_check(( 60 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(898);}while(r); do{ tmp_long=array_check(( 61 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(899);}while(r); do{ tmp_long=array_check(( 62 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(900);}while(r); do{ tmp_long=array_check(( 92 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(901);}while(r); do{ tmp_long=array_check(( 94 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(902);}while(r); do{ tmp_long=array_check(( 44 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(904);}while(r); do{ tmp_long=array_check(( 46 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(905);}while(r); do{ tmp_long=array_check(( 58 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(906);}while(r); do{ tmp_long=array_check(( 59 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(907);}while(r); do{ tmp_long=array_check(( 35 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(909);}while(r); do{ tmp_long=array_check(( 36 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(910);}while(r); do{ tmp_long=array_check(( 63 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(911);}while(r); do{ tmp_long=array_check(( 95 )-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(912);}while(r); do{ if(!qbevent)break;evnt(923);}while(r); do{ if(!qbevent)break;evnt(925);}while(r); do{ if(!qbevent)break;evnt(926);}while(r); do{ if(!qbevent)break;evnt(928);}while(r); do{ if(!qbevent)break;evnt(930);}while(r); do{ if(!qbevent)break;evnt(931);}while(r); do{ if(!qbevent)break;evnt(932);}while(r); do{ if(!qbevent)break;evnt(933);}while(r); do{ if(!qbevent)break;evnt(936);}while(r); do{ *__LONG_CONSTMAX= 100 ; if(!qbevent)break;evnt(937);}while(r); do{ if(!qbevent)break;evnt(938);}while(r); do{ *__LONG_CONSTLAST= -1 ; if(!qbevent)break;evnt(939);}while(r); do{ if (__ARRAY_STRING_CONSTNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CONSTNAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_CONSTNAME[2]&1){ tmp_long=__ARRAY_STRING_CONSTNAME[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_CONSTNAME[0]))[tmp_long]); free((void*)(__ARRAY_STRING_CONSTNAME[0])); } __ARRAY_STRING_CONSTNAME[4]= 0 ; __ARRAY_STRING_CONSTNAME[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTNAME[4]+1; __ARRAY_STRING_CONSTNAME[6]=1; __ARRAY_STRING_CONSTNAME[0]=(ptrszint)malloc(__ARRAY_STRING_CONSTNAME[5]*8); if (!__ARRAY_STRING_CONSTNAME[0]) error(257); __ARRAY_STRING_CONSTNAME[2]|=1; tmp_long=__ARRAY_STRING_CONSTNAME[5]; if (__ARRAY_STRING_CONSTNAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTNAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTNAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(940);}while(r); do{ if (__ARRAY_STRING_CONSTCNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CONSTCNAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_CONSTCNAME[2]&1){ tmp_long=__ARRAY_STRING_CONSTCNAME[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_CONSTCNAME[0]))[tmp_long]); free((void*)(__ARRAY_STRING_CONSTCNAME[0])); } __ARRAY_STRING_CONSTCNAME[4]= 0 ; __ARRAY_STRING_CONSTCNAME[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTCNAME[4]+1; __ARRAY_STRING_CONSTCNAME[6]=1; __ARRAY_STRING_CONSTCNAME[0]=(ptrszint)malloc(__ARRAY_STRING_CONSTCNAME[5]*8); if (!__ARRAY_STRING_CONSTCNAME[0]) error(257); __ARRAY_STRING_CONSTCNAME[2]|=1; tmp_long=__ARRAY_STRING_CONSTCNAME[5]; if (__ARRAY_STRING_CONSTCNAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTCNAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTCNAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(941);}while(r); do{ if (__ARRAY_STRING_CONSTNAMESYMBOL[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CONSTNAMESYMBOL)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_CONSTNAMESYMBOL[2]&1){ tmp_long=__ARRAY_STRING_CONSTNAMESYMBOL[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_CONSTNAMESYMBOL[0]))[tmp_long]); free((void*)(__ARRAY_STRING_CONSTNAMESYMBOL[0])); } __ARRAY_STRING_CONSTNAMESYMBOL[4]= 0 ; __ARRAY_STRING_CONSTNAMESYMBOL[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTNAMESYMBOL[4]+1; __ARRAY_STRING_CONSTNAMESYMBOL[6]=1; __ARRAY_STRING_CONSTNAMESYMBOL[0]=(ptrszint)malloc(__ARRAY_STRING_CONSTNAMESYMBOL[5]*8); if (!__ARRAY_STRING_CONSTNAMESYMBOL[0]) error(257); __ARRAY_STRING_CONSTNAMESYMBOL[2]|=1; tmp_long=__ARRAY_STRING_CONSTNAMESYMBOL[5]; if (__ARRAY_STRING_CONSTNAMESYMBOL[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTNAMESYMBOL[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTNAMESYMBOL[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(942);}while(r); do{ if (__ARRAY_LONG_CONSTTYPE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_CONSTTYPE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_CONSTTYPE[2]&1){ if (__ARRAY_LONG_CONSTTYPE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTTYPE[0])); }else{ free((void*)(__ARRAY_LONG_CONSTTYPE[0])); } } __ARRAY_LONG_CONSTTYPE[4]= 0 ; __ARRAY_LONG_CONSTTYPE[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTTYPE[4]+1; __ARRAY_LONG_CONSTTYPE[6]=1; if (__ARRAY_LONG_CONSTTYPE[2]&4){ __ARRAY_LONG_CONSTTYPE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_CONSTTYPE[5]*4); memset((void*)(__ARRAY_LONG_CONSTTYPE[0]),0,__ARRAY_LONG_CONSTTYPE[5]*4); }else{ __ARRAY_LONG_CONSTTYPE[0]=(ptrszint)calloc(__ARRAY_LONG_CONSTTYPE[5]*4,1); if (!__ARRAY_LONG_CONSTTYPE[0]) error(257); } __ARRAY_LONG_CONSTTYPE[2]|=1; } if(!qbevent)break;evnt(946);}while(r); do{ if (__ARRAY_INTEGER64_CONSTINTEGER[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER64_CONSTINTEGER)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER64_CONSTINTEGER[2]&1){ if (__ARRAY_INTEGER64_CONSTINTEGER[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER64_CONSTINTEGER[0])); }else{ free((void*)(__ARRAY_INTEGER64_CONSTINTEGER[0])); } } __ARRAY_INTEGER64_CONSTINTEGER[4]= 0 ; __ARRAY_INTEGER64_CONSTINTEGER[5]=(*__LONG_CONSTMAX)-__ARRAY_INTEGER64_CONSTINTEGER[4]+1; __ARRAY_INTEGER64_CONSTINTEGER[6]=1; if (__ARRAY_INTEGER64_CONSTINTEGER[2]&4){ __ARRAY_INTEGER64_CONSTINTEGER[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER64_CONSTINTEGER[5]*8); memset((void*)(__ARRAY_INTEGER64_CONSTINTEGER[0]),0,__ARRAY_INTEGER64_CONSTINTEGER[5]*8); }else{ __ARRAY_INTEGER64_CONSTINTEGER[0]=(ptrszint)calloc(__ARRAY_INTEGER64_CONSTINTEGER[5]*8,1); if (!__ARRAY_INTEGER64_CONSTINTEGER[0]) error(257); } __ARRAY_INTEGER64_CONSTINTEGER[2]|=1; } if(!qbevent)break;evnt(948);}while(r); do{ if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UINTEGER64_CONSTUINTEGER)[8])->id=(++mem_lock_id); if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&1){ if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0])); }else{ free((void*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0])); } } __ARRAY_UINTEGER64_CONSTUINTEGER[4]= 0 ; __ARRAY_UINTEGER64_CONSTUINTEGER[5]=(*__LONG_CONSTMAX)-__ARRAY_UINTEGER64_CONSTUINTEGER[4]+1; __ARRAY_UINTEGER64_CONSTUINTEGER[6]=1; if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&4){ __ARRAY_UINTEGER64_CONSTUINTEGER[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UINTEGER64_CONSTUINTEGER[5]*8); memset((void*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]),0,__ARRAY_UINTEGER64_CONSTUINTEGER[5]*8); }else{ __ARRAY_UINTEGER64_CONSTUINTEGER[0]=(ptrszint)calloc(__ARRAY_UINTEGER64_CONSTUINTEGER[5]*8,1); if (!__ARRAY_UINTEGER64_CONSTUINTEGER[0]) error(257); } __ARRAY_UINTEGER64_CONSTUINTEGER[2]|=1; } if(!qbevent)break;evnt(949);}while(r); do{ if (__ARRAY_FLOAT_CONSTFLOAT[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_FLOAT_CONSTFLOAT)[8])->id=(++mem_lock_id); if (__ARRAY_FLOAT_CONSTFLOAT[2]&1){ if (__ARRAY_FLOAT_CONSTFLOAT[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_FLOAT_CONSTFLOAT[0])); }else{ free((void*)(__ARRAY_FLOAT_CONSTFLOAT[0])); } } __ARRAY_FLOAT_CONSTFLOAT[4]= 0 ; __ARRAY_FLOAT_CONSTFLOAT[5]=(*__LONG_CONSTMAX)-__ARRAY_FLOAT_CONSTFLOAT[4]+1; __ARRAY_FLOAT_CONSTFLOAT[6]=1; if (__ARRAY_FLOAT_CONSTFLOAT[2]&4){ __ARRAY_FLOAT_CONSTFLOAT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_FLOAT_CONSTFLOAT[5]*32); memset((void*)(__ARRAY_FLOAT_CONSTFLOAT[0]),0,__ARRAY_FLOAT_CONSTFLOAT[5]*32); }else{ __ARRAY_FLOAT_CONSTFLOAT[0]=(ptrszint)calloc(__ARRAY_FLOAT_CONSTFLOAT[5]*32,1); if (!__ARRAY_FLOAT_CONSTFLOAT[0]) error(257); } __ARRAY_FLOAT_CONSTFLOAT[2]|=1; } if(!qbevent)break;evnt(950);}while(r); do{ if (__ARRAY_STRING_CONSTSTRING[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CONSTSTRING)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_CONSTSTRING[2]&1){ tmp_long=__ARRAY_STRING_CONSTSTRING[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_CONSTSTRING[0]))[tmp_long]); free((void*)(__ARRAY_STRING_CONSTSTRING[0])); } __ARRAY_STRING_CONSTSTRING[4]= 0 ; __ARRAY_STRING_CONSTSTRING[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTSTRING[4]+1; __ARRAY_STRING_CONSTSTRING[6]=1; __ARRAY_STRING_CONSTSTRING[0]=(ptrszint)malloc(__ARRAY_STRING_CONSTSTRING[5]*8); if (!__ARRAY_STRING_CONSTSTRING[0]) error(257); __ARRAY_STRING_CONSTSTRING[2]|=1; tmp_long=__ARRAY_STRING_CONSTSTRING[5]; if (__ARRAY_STRING_CONSTSTRING[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTSTRING[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_CONSTSTRING[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(951);}while(r); do{ if (__ARRAY_LONG_CONSTSUBFUNC[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_CONSTSUBFUNC)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_CONSTSUBFUNC[2]&1){ if (__ARRAY_LONG_CONSTSUBFUNC[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTSUBFUNC[0])); }else{ free((void*)(__ARRAY_LONG_CONSTSUBFUNC[0])); } } __ARRAY_LONG_CONSTSUBFUNC[4]= 0 ; __ARRAY_LONG_CONSTSUBFUNC[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTSUBFUNC[4]+1; __ARRAY_LONG_CONSTSUBFUNC[6]=1; if (__ARRAY_LONG_CONSTSUBFUNC[2]&4){ __ARRAY_LONG_CONSTSUBFUNC[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_CONSTSUBFUNC[5]*4); memset((void*)(__ARRAY_LONG_CONSTSUBFUNC[0]),0,__ARRAY_LONG_CONSTSUBFUNC[5]*4); }else{ __ARRAY_LONG_CONSTSUBFUNC[0]=(ptrszint)calloc(__ARRAY_LONG_CONSTSUBFUNC[5]*4,1); if (!__ARRAY_LONG_CONSTSUBFUNC[0]) error(257); } __ARRAY_LONG_CONSTSUBFUNC[2]|=1; } if(!qbevent)break;evnt(952);}while(r); do{ if (__ARRAY_LONG_CONSTDEFINED[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_CONSTDEFINED)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_CONSTDEFINED[2]&1){ if (__ARRAY_LONG_CONSTDEFINED[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTDEFINED[0])); }else{ free((void*)(__ARRAY_LONG_CONSTDEFINED[0])); } } __ARRAY_LONG_CONSTDEFINED[4]= 0 ; __ARRAY_LONG_CONSTDEFINED[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTDEFINED[4]+1; __ARRAY_LONG_CONSTDEFINED[6]=1; if (__ARRAY_LONG_CONSTDEFINED[2]&4){ __ARRAY_LONG_CONSTDEFINED[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_CONSTDEFINED[5]*4); memset((void*)(__ARRAY_LONG_CONSTDEFINED[0]),0,__ARRAY_LONG_CONSTDEFINED[5]*4); }else{ __ARRAY_LONG_CONSTDEFINED[0]=(ptrszint)calloc(__ARRAY_LONG_CONSTDEFINED[5]*4,1); if (!__ARRAY_LONG_CONSTDEFINED[0]) error(257); } __ARRAY_LONG_CONSTDEFINED[2]|=1; } if(!qbevent)break;evnt(953);}while(r); do{ if(!qbevent)break;evnt(957);}while(r); do{ if (__ARRAY_STRING256_UDTXNAME[2]&2){ error(10); }else{ if (__ARRAY_STRING256_UDTXNAME[2]&1){ error(10); }else{ __ARRAY_STRING256_UDTXNAME[4]= 0 ; __ARRAY_STRING256_UDTXNAME[5]=( 1000 )-__ARRAY_STRING256_UDTXNAME[4]+1; __ARRAY_STRING256_UDTXNAME[6]=1; if (__ARRAY_STRING256_UDTXNAME[2]&4){ __ARRAY_STRING256_UDTXNAME[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING256_UDTXNAME[5]*256); memset((void*)(__ARRAY_STRING256_UDTXNAME[0]),0,__ARRAY_STRING256_UDTXNAME[5]*256); }else{ __ARRAY_STRING256_UDTXNAME[0]=(ptrszint)calloc(__ARRAY_STRING256_UDTXNAME[5]*256,1); if (!__ARRAY_STRING256_UDTXNAME[0]) error(257); } __ARRAY_STRING256_UDTXNAME[2]|=1; } } if(!qbevent)break;evnt(958);}while(r); do{ if (__ARRAY_STRING256_UDTXCNAME[2]&2){ error(10); }else{ if (__ARRAY_STRING256_UDTXCNAME[2]&1){ error(10); }else{ __ARRAY_STRING256_UDTXCNAME[4]= 0 ; __ARRAY_STRING256_UDTXCNAME[5]=( 1000 )-__ARRAY_STRING256_UDTXCNAME[4]+1; __ARRAY_STRING256_UDTXCNAME[6]=1; if (__ARRAY_STRING256_UDTXCNAME[2]&4){ __ARRAY_STRING256_UDTXCNAME[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING256_UDTXCNAME[5]*256); memset((void*)(__ARRAY_STRING256_UDTXCNAME[0]),0,__ARRAY_STRING256_UDTXCNAME[5]*256); }else{ __ARRAY_STRING256_UDTXCNAME[0]=(ptrszint)calloc(__ARRAY_STRING256_UDTXCNAME[5]*256,1); if (!__ARRAY_STRING256_UDTXCNAME[0]) error(257); } __ARRAY_STRING256_UDTXCNAME[2]|=1; } } if(!qbevent)break;evnt(959);}while(r); do{ if (__ARRAY_LONG_UDTXSIZE[2]&2){ error(10); }else{ if (__ARRAY_LONG_UDTXSIZE[2]&1){ error(10); }else{ __ARRAY_LONG_UDTXSIZE[4]= 0 ; __ARRAY_LONG_UDTXSIZE[5]=( 1000 )-__ARRAY_LONG_UDTXSIZE[4]+1; __ARRAY_LONG_UDTXSIZE[6]=1; if (__ARRAY_LONG_UDTXSIZE[2]&4){ __ARRAY_LONG_UDTXSIZE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_UDTXSIZE[5]*4); memset((void*)(__ARRAY_LONG_UDTXSIZE[0]),0,__ARRAY_LONG_UDTXSIZE[5]*4); }else{ __ARRAY_LONG_UDTXSIZE[0]=(ptrszint)calloc(__ARRAY_LONG_UDTXSIZE[5]*4,1); if (!__ARRAY_LONG_UDTXSIZE[0]) error(257); } __ARRAY_LONG_UDTXSIZE[2]|=1; } } if(!qbevent)break;evnt(960);}while(r); do{ if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&1){ error(10); }else{ __ARRAY_INTEGER_UDTXBYTEALIGN[4]= 0 ; __ARRAY_INTEGER_UDTXBYTEALIGN[5]=( 1000 )-__ARRAY_INTEGER_UDTXBYTEALIGN[4]+1; __ARRAY_INTEGER_UDTXBYTEALIGN[6]=1; if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&4){ __ARRAY_INTEGER_UDTXBYTEALIGN[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_UDTXBYTEALIGN[5]*2); memset((void*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]),0,__ARRAY_INTEGER_UDTXBYTEALIGN[5]*2); }else{ __ARRAY_INTEGER_UDTXBYTEALIGN[0]=(ptrszint)calloc(__ARRAY_INTEGER_UDTXBYTEALIGN[5]*2,1); if (!__ARRAY_INTEGER_UDTXBYTEALIGN[0]) error(257); } __ARRAY_INTEGER_UDTXBYTEALIGN[2]|=1; } } if(!qbevent)break;evnt(961);}while(r); do{ if (__ARRAY_LONG_UDTXNEXT[2]&2){ error(10); }else{ if (__ARRAY_LONG_UDTXNEXT[2]&1){ error(10); }else{ __ARRAY_LONG_UDTXNEXT[4]= 0 ; __ARRAY_LONG_UDTXNEXT[5]=( 1000 )-__ARRAY_LONG_UDTXNEXT[4]+1; __ARRAY_LONG_UDTXNEXT[6]=1; if (__ARRAY_LONG_UDTXNEXT[2]&4){ __ARRAY_LONG_UDTXNEXT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_UDTXNEXT[5]*4); memset((void*)(__ARRAY_LONG_UDTXNEXT[0]),0,__ARRAY_LONG_UDTXNEXT[5]*4); }else{ __ARRAY_LONG_UDTXNEXT[0]=(ptrszint)calloc(__ARRAY_LONG_UDTXNEXT[5]*4,1); if (!__ARRAY_LONG_UDTXNEXT[0]) error(257); } __ARRAY_LONG_UDTXNEXT[2]|=1; } } if(!qbevent)break;evnt(962);}while(r); do{ if(!qbevent)break;evnt(964);}while(r); do{ if (__ARRAY_STRING256_UDTENAME[2]&2){ error(10); }else{ if (__ARRAY_STRING256_UDTENAME[2]&1){ error(10); }else{ __ARRAY_STRING256_UDTENAME[4]= 0 ; __ARRAY_STRING256_UDTENAME[5]=( 1000 )-__ARRAY_STRING256_UDTENAME[4]+1; __ARRAY_STRING256_UDTENAME[6]=1; if (__ARRAY_STRING256_UDTENAME[2]&4){ __ARRAY_STRING256_UDTENAME[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING256_UDTENAME[5]*256); memset((void*)(__ARRAY_STRING256_UDTENAME[0]),0,__ARRAY_STRING256_UDTENAME[5]*256); }else{ __ARRAY_STRING256_UDTENAME[0]=(ptrszint)calloc(__ARRAY_STRING256_UDTENAME[5]*256,1); if (!__ARRAY_STRING256_UDTENAME[0]) error(257); } __ARRAY_STRING256_UDTENAME[2]|=1; } } if(!qbevent)break;evnt(965);}while(r); do{ if (__ARRAY_STRING256_UDTECNAME[2]&2){ error(10); }else{ if (__ARRAY_STRING256_UDTECNAME[2]&1){ error(10); }else{ __ARRAY_STRING256_UDTECNAME[4]= 0 ; __ARRAY_STRING256_UDTECNAME[5]=( 1000 )-__ARRAY_STRING256_UDTECNAME[4]+1; __ARRAY_STRING256_UDTECNAME[6]=1; if (__ARRAY_STRING256_UDTECNAME[2]&4){ __ARRAY_STRING256_UDTECNAME[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING256_UDTECNAME[5]*256); memset((void*)(__ARRAY_STRING256_UDTECNAME[0]),0,__ARRAY_STRING256_UDTECNAME[5]*256); }else{ __ARRAY_STRING256_UDTECNAME[0]=(ptrszint)calloc(__ARRAY_STRING256_UDTECNAME[5]*256,1); if (!__ARRAY_STRING256_UDTECNAME[0]) error(257); } __ARRAY_STRING256_UDTECNAME[2]|=1; } } if(!qbevent)break;evnt(966);}while(r); do{ if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&1){ error(10); }else{ __ARRAY_INTEGER_UDTEBYTEALIGN[4]= 0 ; __ARRAY_INTEGER_UDTEBYTEALIGN[5]=( 1000 )-__ARRAY_INTEGER_UDTEBYTEALIGN[4]+1; __ARRAY_INTEGER_UDTEBYTEALIGN[6]=1; if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&4){ __ARRAY_INTEGER_UDTEBYTEALIGN[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_UDTEBYTEALIGN[5]*2); memset((void*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]),0,__ARRAY_INTEGER_UDTEBYTEALIGN[5]*2); }else{ __ARRAY_INTEGER_UDTEBYTEALIGN[0]=(ptrszint)calloc(__ARRAY_INTEGER_UDTEBYTEALIGN[5]*2,1); if (!__ARRAY_INTEGER_UDTEBYTEALIGN[0]) error(257); } __ARRAY_INTEGER_UDTEBYTEALIGN[2]|=1; } } if(!qbevent)break;evnt(967);}while(r); do{ if (__ARRAY_LONG_UDTESIZE[2]&2){ error(10); }else{ if (__ARRAY_LONG_UDTESIZE[2]&1){ error(10); }else{ __ARRAY_LONG_UDTESIZE[4]= 0 ; __ARRAY_LONG_UDTESIZE[5]=( 1000 )-__ARRAY_LONG_UDTESIZE[4]+1; __ARRAY_LONG_UDTESIZE[6]=1; if (__ARRAY_LONG_UDTESIZE[2]&4){ __ARRAY_LONG_UDTESIZE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_UDTESIZE[5]*4); memset((void*)(__ARRAY_LONG_UDTESIZE[0]),0,__ARRAY_LONG_UDTESIZE[5]*4); }else{ __ARRAY_LONG_UDTESIZE[0]=(ptrszint)calloc(__ARRAY_LONG_UDTESIZE[5]*4,1); if (!__ARRAY_LONG_UDTESIZE[0]) error(257); } __ARRAY_LONG_UDTESIZE[2]|=1; } } if(!qbevent)break;evnt(968);}while(r); do{ if (__ARRAY_LONG_UDTETYPE[2]&2){ error(10); }else{ if (__ARRAY_LONG_UDTETYPE[2]&1){ error(10); }else{ __ARRAY_LONG_UDTETYPE[4]= 0 ; __ARRAY_LONG_UDTETYPE[5]=( 1000 )-__ARRAY_LONG_UDTETYPE[4]+1; __ARRAY_LONG_UDTETYPE[6]=1; if (__ARRAY_LONG_UDTETYPE[2]&4){ __ARRAY_LONG_UDTETYPE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_UDTETYPE[5]*4); memset((void*)(__ARRAY_LONG_UDTETYPE[0]),0,__ARRAY_LONG_UDTETYPE[5]*4); }else{ __ARRAY_LONG_UDTETYPE[0]=(ptrszint)calloc(__ARRAY_LONG_UDTETYPE[5]*4,1); if (!__ARRAY_LONG_UDTETYPE[0]) error(257); } __ARRAY_LONG_UDTETYPE[2]|=1; } } if(!qbevent)break;evnt(969);}while(r); do{ if (__ARRAY_LONG_UDTETYPESIZE[2]&2){ error(10); }else{ if (__ARRAY_LONG_UDTETYPESIZE[2]&1){ error(10); }else{ __ARRAY_LONG_UDTETYPESIZE[4]= 0 ; __ARRAY_LONG_UDTETYPESIZE[5]=( 1000 )-__ARRAY_LONG_UDTETYPESIZE[4]+1; __ARRAY_LONG_UDTETYPESIZE[6]=1; if (__ARRAY_LONG_UDTETYPESIZE[2]&4){ __ARRAY_LONG_UDTETYPESIZE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_UDTETYPESIZE[5]*4); memset((void*)(__ARRAY_LONG_UDTETYPESIZE[0]),0,__ARRAY_LONG_UDTETYPESIZE[5]*4); }else{ __ARRAY_LONG_UDTETYPESIZE[0]=(ptrszint)calloc(__ARRAY_LONG_UDTETYPESIZE[5]*4,1); if (!__ARRAY_LONG_UDTETYPESIZE[0]) error(257); } __ARRAY_LONG_UDTETYPESIZE[2]|=1; } } if(!qbevent)break;evnt(970);}while(r); do{ if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&2){ error(10); }else{ if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&1){ error(10); }else{ __ARRAY_LONG_UDTEARRAYELEMENTS[4]= 0 ; __ARRAY_LONG_UDTEARRAYELEMENTS[5]=( 1000 )-__ARRAY_LONG_UDTEARRAYELEMENTS[4]+1; __ARRAY_LONG_UDTEARRAYELEMENTS[6]=1; if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&4){ __ARRAY_LONG_UDTEARRAYELEMENTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_UDTEARRAYELEMENTS[5]*4); memset((void*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]),0,__ARRAY_LONG_UDTEARRAYELEMENTS[5]*4); }else{ __ARRAY_LONG_UDTEARRAYELEMENTS[0]=(ptrszint)calloc(__ARRAY_LONG_UDTEARRAYELEMENTS[5]*4,1); if (!__ARRAY_LONG_UDTEARRAYELEMENTS[0]) error(257); } __ARRAY_LONG_UDTEARRAYELEMENTS[2]|=1; } } if(!qbevent)break;evnt(971);}while(r); do{ if (__ARRAY_LONG_UDTENEXT[2]&2){ error(10); }else{ if (__ARRAY_LONG_UDTENEXT[2]&1){ error(10); }else{ __ARRAY_LONG_UDTENEXT[4]= 0 ; __ARRAY_LONG_UDTENEXT[5]=( 1000 )-__ARRAY_LONG_UDTENEXT[4]+1; __ARRAY_LONG_UDTENEXT[6]=1; if (__ARRAY_LONG_UDTENEXT[2]&4){ __ARRAY_LONG_UDTENEXT[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_UDTENEXT[5]*4); memset((void*)(__ARRAY_LONG_UDTENEXT[0]),0,__ARRAY_LONG_UDTENEXT[5]*4); }else{ __ARRAY_LONG_UDTENEXT[0]=(ptrszint)calloc(__ARRAY_LONG_UDTENEXT[5]*4,1); if (!__ARRAY_LONG_UDTENEXT[0]) error(257); } __ARRAY_LONG_UDTENEXT[2]|=1; } } if(!qbevent)break;evnt(972);}while(r); do{ if(!qbevent)break;evnt(1020);}while(r); do{ if(!qbevent)break;evnt(1022);}while(r); do{ if(!qbevent)break;evnt(1023);}while(r); do{ *__LONG_IDS_MAX= 1024 ; if(!qbevent)break;evnt(1024);}while(r); do{ if (__ARRAY_UDT_IDS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDS)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_IDS[2]&1){ if (__ARRAY_UDT_IDS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDS[0])); }else{ free((void*)(__ARRAY_UDT_IDS[0])); } } __ARRAY_UDT_IDS[4]= 1 ; __ARRAY_UDT_IDS[5]=(*__LONG_IDS_MAX)-__ARRAY_UDT_IDS[4]+1; __ARRAY_UDT_IDS[6]=1; if (__ARRAY_UDT_IDS[2]&4){ __ARRAY_UDT_IDS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_IDS[5]*22880/8+1); memset((void*)(__ARRAY_UDT_IDS[0]),0,__ARRAY_UDT_IDS[5]*22880/8+1); }else{ __ARRAY_UDT_IDS[0]=(ptrszint)calloc(__ARRAY_UDT_IDS[5]*22880/8+1,1); if (!__ARRAY_UDT_IDS[0]) error(257); } __ARRAY_UDT_IDS[2]|=1; } if(!qbevent)break;evnt(1025);}while(r); do{ if (__ARRAY_INTEGER_CMEMLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_CMEMLIST)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_CMEMLIST[2]&1){ if (__ARRAY_INTEGER_CMEMLIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_CMEMLIST[0])); }else{ free((void*)(__ARRAY_INTEGER_CMEMLIST[0])); } } __ARRAY_INTEGER_CMEMLIST[4]= 1 ; __ARRAY_INTEGER_CMEMLIST[5]=(*__LONG_IDS_MAX+ 1 )-__ARRAY_INTEGER_CMEMLIST[4]+1; __ARRAY_INTEGER_CMEMLIST[6]=1; if (__ARRAY_INTEGER_CMEMLIST[2]&4){ __ARRAY_INTEGER_CMEMLIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_CMEMLIST[5]*2); memset((void*)(__ARRAY_INTEGER_CMEMLIST[0]),0,__ARRAY_INTEGER_CMEMLIST[5]*2); }else{ __ARRAY_INTEGER_CMEMLIST[0]=(ptrszint)calloc(__ARRAY_INTEGER_CMEMLIST[5]*2,1); if (!__ARRAY_INTEGER_CMEMLIST[0]) error(257); } __ARRAY_INTEGER_CMEMLIST[2]|=1; } if(!qbevent)break;evnt(1026);}while(r); do{ if (__ARRAY_STRING100_SFCMEMARGS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING100_SFCMEMARGS)[8])->id=(++mem_lock_id); if (__ARRAY_STRING100_SFCMEMARGS[2]&1){ if (__ARRAY_STRING100_SFCMEMARGS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0])); }else{ free((void*)(__ARRAY_STRING100_SFCMEMARGS[0])); } } __ARRAY_STRING100_SFCMEMARGS[4]= 1 ; __ARRAY_STRING100_SFCMEMARGS[5]=(*__LONG_IDS_MAX+ 1 )-__ARRAY_STRING100_SFCMEMARGS[4]+1; __ARRAY_STRING100_SFCMEMARGS[6]=1; if (__ARRAY_STRING100_SFCMEMARGS[2]&4){ __ARRAY_STRING100_SFCMEMARGS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING100_SFCMEMARGS[5]*100); memset((void*)(__ARRAY_STRING100_SFCMEMARGS[0]),0,__ARRAY_STRING100_SFCMEMARGS[5]*100); }else{ __ARRAY_STRING100_SFCMEMARGS[0]=(ptrszint)calloc(__ARRAY_STRING100_SFCMEMARGS[5]*100,1); if (!__ARRAY_STRING100_SFCMEMARGS[0]) error(257); } __ARRAY_STRING100_SFCMEMARGS[2]|=1; } if(!qbevent)break;evnt(1027);}while(r); do{ if (__ARRAY_INTEGER_ARRAYELEMENTSLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_ARRAYELEMENTSLIST)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_ARRAYELEMENTSLIST[2]&1){ if (__ARRAY_INTEGER_ARRAYELEMENTSLIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0])); }else{ free((void*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0])); } } __ARRAY_INTEGER_ARRAYELEMENTSLIST[4]= 1 ; __ARRAY_INTEGER_ARRAYELEMENTSLIST[5]=(*__LONG_IDS_MAX+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4]+1; __ARRAY_INTEGER_ARRAYELEMENTSLIST[6]=1; if (__ARRAY_INTEGER_ARRAYELEMENTSLIST[2]&4){ __ARRAY_INTEGER_ARRAYELEMENTSLIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]*2); memset((void*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]),0,__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]*2); }else{ __ARRAY_INTEGER_ARRAYELEMENTSLIST[0]=(ptrszint)calloc(__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]*2,1); if (!__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]) error(257); } __ARRAY_INTEGER_ARRAYELEMENTSLIST[2]|=1; } if(!qbevent)break;evnt(1028);}while(r); do{ if(!qbevent)break;evnt(1032);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(256)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1033);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(0)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1034);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(520)),8,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1035);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(528)),8,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1036);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1037);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(810)),400,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1038);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(1210)),400,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1039);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(1610)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1040);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(1866)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1041);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2122)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1042);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2382)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1043);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2644)),100,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1044);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2744)),100,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1045);}while(r); do{ if(!qbevent)break;evnt(1047);}while(r); do{ if(!qbevent)break;evnt(1048);}while(r); do{ if(!qbevent)break;evnt(1049);}while(r); do{ if(!qbevent)break;evnt(1050);}while(r); do{ if(!qbevent)break;evnt(1051);}while(r); do{ if(!qbevent)break;evnt(1052);}while(r); do{ if(!qbevent)break;evnt(1053);}while(r); do{ if(!qbevent)break;evnt(1054);}while(r); do{ if(!qbevent)break;evnt(1055);}while(r); do{ if(!qbevent)break;evnt(1056);}while(r); do{ if(!qbevent)break;evnt(1057);}while(r); do{ if(!qbevent)break;evnt(1059);}while(r); do{ if(!qbevent)break;evnt(1060);}while(r); do{ if(!qbevent)break;evnt(1061);}while(r); do{ if(!qbevent)break;evnt(1062);}while(r); do{ if(!qbevent)break;evnt(1063);}while(r); do{ if(!qbevent)break;evnt(1064);}while(r); do{ if(!qbevent)break;evnt(1065);}while(r); do{ if(!qbevent)break;evnt(1066);}while(r); do{ if(!qbevent)break;evnt(1067);}while(r); do{ if(!qbevent)break;evnt(1068);}while(r); do{ if(!qbevent)break;evnt(1069);}while(r); do{ if(!qbevent)break;evnt(1070);}while(r); do{ if(!qbevent)break;evnt(1071);}while(r); do{ if(!qbevent)break;evnt(1072);}while(r); do{ if(!qbevent)break;evnt(1073);}while(r); do{ if(!qbevent)break;evnt(1074);}while(r); do{ if(!qbevent)break;evnt(1075);}while(r); do{ if(!qbevent)break;evnt(1077);}while(r); do{ if(!qbevent)break;evnt(1078);}while(r); do{ if(!qbevent)break;evnt(1079);}while(r); do{ if(!qbevent)break;evnt(1080);}while(r); do{ if(!qbevent)break;evnt(1081);}while(r); do{ if(!qbevent)break;evnt(1082);}while(r); do{ if(!qbevent)break;evnt(1083);}while(r); do{ if(!qbevent)break;evnt(1087);}while(r); do{ if(!qbevent)break;evnt(1088);}while(r); do{ if(!qbevent)break;evnt(1092);}while(r); do{ if(!qbevent)break;evnt(1093);}while(r); do{ if(!qbevent)break;evnt(1094);}while(r); do{ if(!qbevent)break;evnt(1095);}while(r); do{ if(!qbevent)break;evnt(1096);}while(r); do{ if(!qbevent)break;evnt(1097);}while(r); do{ if(!qbevent)break;evnt(1098);}while(r); do{ if(!qbevent)break;evnt(1099);}while(r); do{ if(!qbevent)break;evnt(1100);}while(r); do{ if(!qbevent)break;evnt(1104);}while(r); do{ if(!qbevent)break;evnt(1105);}while(r); do{ if(!qbevent)break;evnt(1106);}while(r); do{ if(!qbevent)break;evnt(1107);}while(r); do{ if(!qbevent)break;evnt(1109);}while(r); do{ if(!qbevent)break;evnt(1111);}while(r); do{ if(!qbevent)break;evnt(1112);}while(r); do{ if(!qbevent)break;evnt(1113);}while(r); do{ if(!qbevent)break;evnt(1115);}while(r); do{ if(!qbevent)break;evnt(1116);}while(r); do{ if(!qbevent)break;evnt(1118);}while(r); do{ if(!qbevent)break;evnt(1119);}while(r); do{ if(!qbevent)break;evnt(1120);}while(r); do{ if(!qbevent)break;evnt(1122);}while(r); do{ if(!qbevent)break;evnt(1123);}while(r); do{ if(!qbevent)break;evnt(1124);}while(r); do{ if(!qbevent)break;evnt(1127);}while(r); do{ if(!qbevent)break;evnt(1131);}while(r); do{ if(!qbevent)break;evnt(1132);}while(r); do{ if(!qbevent)break;evnt(1133);}while(r); do{ if(!qbevent)break;evnt(1134);}while(r); do{ if (__ARRAY_INTEGER64_BITMASK[2]&2){ error(10); }else{ if (__ARRAY_INTEGER64_BITMASK[2]&1){ error(10); }else{ __ARRAY_INTEGER64_BITMASK[4]= 1 ; __ARRAY_INTEGER64_BITMASK[5]=( 56 )-__ARRAY_INTEGER64_BITMASK[4]+1; __ARRAY_INTEGER64_BITMASK[6]=1; if (__ARRAY_INTEGER64_BITMASK[2]&4){ __ARRAY_INTEGER64_BITMASK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER64_BITMASK[5]*8); memset((void*)(__ARRAY_INTEGER64_BITMASK[0]),0,__ARRAY_INTEGER64_BITMASK[5]*8); }else{ __ARRAY_INTEGER64_BITMASK[0]=(ptrszint)calloc(__ARRAY_INTEGER64_BITMASK[5]*8,1); if (!__ARRAY_INTEGER64_BITMASK[0]) error(257); } __ARRAY_INTEGER64_BITMASK[2]|=1; } } if(!qbevent)break;evnt(1139);}while(r); do{ if (__ARRAY_INTEGER64_BITMASKINV[2]&2){ error(10); }else{ if (__ARRAY_INTEGER64_BITMASKINV[2]&1){ error(10); }else{ __ARRAY_INTEGER64_BITMASKINV[4]= 1 ; __ARRAY_INTEGER64_BITMASKINV[5]=( 56 )-__ARRAY_INTEGER64_BITMASKINV[4]+1; __ARRAY_INTEGER64_BITMASKINV[6]=1; if (__ARRAY_INTEGER64_BITMASKINV[2]&4){ __ARRAY_INTEGER64_BITMASKINV[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER64_BITMASKINV[5]*8); memset((void*)(__ARRAY_INTEGER64_BITMASKINV[0]),0,__ARRAY_INTEGER64_BITMASKINV[5]*8); }else{ __ARRAY_INTEGER64_BITMASKINV[0]=(ptrszint)calloc(__ARRAY_INTEGER64_BITMASKINV[5]*8,1); if (!__ARRAY_INTEGER64_BITMASKINV[0]) error(257); } __ARRAY_INTEGER64_BITMASKINV[2]|=1; } } if(!qbevent)break;evnt(1140);}while(r); do{ if (__ARRAY_STRING_DEFINEEXTAZ[2]&2){ error(10); }else{ if (__ARRAY_STRING_DEFINEEXTAZ[2]&1){ error(10); }else{ __ARRAY_STRING_DEFINEEXTAZ[4]= 1 ; __ARRAY_STRING_DEFINEEXTAZ[5]=( 27 )-__ARRAY_STRING_DEFINEEXTAZ[4]+1; __ARRAY_STRING_DEFINEEXTAZ[6]=1; __ARRAY_STRING_DEFINEEXTAZ[0]=(ptrszint)malloc(__ARRAY_STRING_DEFINEEXTAZ[5]*8); if (!__ARRAY_STRING_DEFINEEXTAZ[0]) error(257); __ARRAY_STRING_DEFINEEXTAZ[2]|=1; tmp_long=__ARRAY_STRING_DEFINEEXTAZ[5]; if (__ARRAY_STRING_DEFINEEXTAZ[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(1142);}while(r); do{ if (__ARRAY_STRING_DEFINEAZ[2]&2){ error(10); }else{ if (__ARRAY_STRING_DEFINEAZ[2]&1){ error(10); }else{ __ARRAY_STRING_DEFINEAZ[4]= 1 ; __ARRAY_STRING_DEFINEAZ[5]=( 27 )-__ARRAY_STRING_DEFINEAZ[4]+1; __ARRAY_STRING_DEFINEAZ[6]=1; __ARRAY_STRING_DEFINEAZ[0]=(ptrszint)malloc(__ARRAY_STRING_DEFINEAZ[5]*8); if (!__ARRAY_STRING_DEFINEAZ[0]) error(257); __ARRAY_STRING_DEFINEAZ[2]|=1; tmp_long=__ARRAY_STRING_DEFINEAZ[5]; if (__ARRAY_STRING_DEFINEAZ[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(1143);}while(r); do{ *__LONG_ISSTRING= 1073741824 ; if(!qbevent)break;evnt(1145);}while(r); do{ *__LONG_ISFLOAT= 536870912 ; if(!qbevent)break;evnt(1146);}while(r); do{ *__LONG_ISUNSIGNED= 268435456 ; if(!qbevent)break;evnt(1147);}while(r); do{ *__LONG_ISPOINTER= 134217728 ; if(!qbevent)break;evnt(1148);}while(r); do{ *__LONG_ISFIXEDLENGTH= 67108864 ; if(!qbevent)break;evnt(1149);}while(r); do{ *__LONG_ISINCONVENTIONALMEMORY= 33554432 ; if(!qbevent)break;evnt(1150);}while(r); do{ *__LONG_ISOFFSETINBITS= 16777216 ; if(!qbevent)break;evnt(1151);}while(r); do{ *__LONG_ISARRAY= 8388608 ; if(!qbevent)break;evnt(1152);}while(r); do{ *__LONG_ISREFERENCE= 4194304 ; if(!qbevent)break;evnt(1153);}while(r); do{ *__LONG_ISUDT= 2097152 ; if(!qbevent)break;evnt(1154);}while(r); do{ *__LONG_ISOFFSET= 1048576 ; if(!qbevent)break;evnt(1155);}while(r); do{ *__LONG_STRINGTYPE=*__LONG_ISSTRING+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1157);}while(r); do{ *__LONG_BITTYPE= 1 +*__LONG_ISPOINTER+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(1158);}while(r); do{ *__LONG_UBITTYPE= 1 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(1159);}while(r); do{ *__LONG_BYTETYPE= 8 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(1160);}while(r); do{ *__LONG_UBYTETYPE= 8 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(1161);}while(r); do{ *__LONG_INTEGERTYPE= 16 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(1162);}while(r); do{ *__LONG_UINTEGERTYPE= 16 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(1163);}while(r); do{ *__LONG_LONGTYPE= 32 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(1164);}while(r); do{ *__LONG_ULONGTYPE= 32 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(1165);}while(r); do{ *__LONG_INTEGER64TYPE= 64 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(1166);}while(r); do{ *__LONG_UINTEGER64TYPE= 64 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(1167);}while(r); do{ *__LONG_SINGLETYPE= 32 +*__LONG_ISFLOAT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1168);}while(r); do{ *__LONG_DOUBLETYPE= 64 +*__LONG_ISFLOAT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1169);}while(r); do{ *__LONG_FLOATTYPE= 256 +*__LONG_ISFLOAT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1170);}while(r); do{ *__LONG_OFFSETTYPE= 64 +*__LONG_ISOFFSET+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1171);}while(r); S_849:; if ((-(*__LONG_OS_BITS== 32 ))||new_error){ if(qbevent){evnt(1171);if(r)goto S_849;} do{ *__LONG_OFFSETTYPE= 32 +*__LONG_ISOFFSET+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1171);}while(r); } do{ *__LONG_UOFFSETTYPE= 64 +*__LONG_ISOFFSET+*__LONG_ISUNSIGNED+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1172);}while(r); S_853:; if ((-(*__LONG_OS_BITS== 32 ))||new_error){ if(qbevent){evnt(1172);if(r)goto S_853;} do{ *__LONG_UOFFSETTYPE= 32 +*__LONG_ISOFFSET+*__LONG_ISUNSIGNED+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1172);}while(r); } do{ *__LONG_UDTTYPE=*__LONG_ISUDT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(1173);}while(r); do{ if(!qbevent)break;evnt(1180);}while(r); do{ if(!qbevent)break;evnt(1186);}while(r); do{ if (__ARRAY_INTEGER_CONTROLTYPE[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_CONTROLTYPE[2]&1){ error(10); }else{ __ARRAY_INTEGER_CONTROLTYPE[4]= 0 ; __ARRAY_INTEGER_CONTROLTYPE[5]=( 1000 )-__ARRAY_INTEGER_CONTROLTYPE[4]+1; __ARRAY_INTEGER_CONTROLTYPE[6]=1; if (__ARRAY_INTEGER_CONTROLTYPE[2]&4){ __ARRAY_INTEGER_CONTROLTYPE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_CONTROLTYPE[5]*2); memset((void*)(__ARRAY_INTEGER_CONTROLTYPE[0]),0,__ARRAY_INTEGER_CONTROLTYPE[5]*2); }else{ __ARRAY_INTEGER_CONTROLTYPE[0]=(ptrszint)calloc(__ARRAY_INTEGER_CONTROLTYPE[5]*2,1); if (!__ARRAY_INTEGER_CONTROLTYPE[0]) error(257); } __ARRAY_INTEGER_CONTROLTYPE[2]|=1; } } if(!qbevent)break;evnt(1187);}while(r); do{ if (__ARRAY_LONG_CONTROLID[2]&2){ error(10); }else{ if (__ARRAY_LONG_CONTROLID[2]&1){ error(10); }else{ __ARRAY_LONG_CONTROLID[4]= 0 ; __ARRAY_LONG_CONTROLID[5]=( 1000 )-__ARRAY_LONG_CONTROLID[4]+1; __ARRAY_LONG_CONTROLID[6]=1; if (__ARRAY_LONG_CONTROLID[2]&4){ __ARRAY_LONG_CONTROLID[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_CONTROLID[5]*4); memset((void*)(__ARRAY_LONG_CONTROLID[0]),0,__ARRAY_LONG_CONTROLID[5]*4); }else{ __ARRAY_LONG_CONTROLID[0]=(ptrszint)calloc(__ARRAY_LONG_CONTROLID[5]*4,1); if (!__ARRAY_LONG_CONTROLID[0]) error(257); } __ARRAY_LONG_CONTROLID[2]|=1; } } if(!qbevent)break;evnt(1203);}while(r); do{ if (__ARRAY_LONG_CONTROLVALUE[2]&2){ error(10); }else{ if (__ARRAY_LONG_CONTROLVALUE[2]&1){ error(10); }else{ __ARRAY_LONG_CONTROLVALUE[4]= 0 ; __ARRAY_LONG_CONTROLVALUE[5]=( 1000 )-__ARRAY_LONG_CONTROLVALUE[4]+1; __ARRAY_LONG_CONTROLVALUE[6]=1; if (__ARRAY_LONG_CONTROLVALUE[2]&4){ __ARRAY_LONG_CONTROLVALUE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_CONTROLVALUE[5]*4); memset((void*)(__ARRAY_LONG_CONTROLVALUE[0]),0,__ARRAY_LONG_CONTROLVALUE[5]*4); }else{ __ARRAY_LONG_CONTROLVALUE[0]=(ptrszint)calloc(__ARRAY_LONG_CONTROLVALUE[5]*4,1); if (!__ARRAY_LONG_CONTROLVALUE[0]) error(257); } __ARRAY_LONG_CONTROLVALUE[2]|=1; } } if(!qbevent)break;evnt(1204);}while(r); do{ if (__ARRAY_INTEGER_CONTROLSTATE[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_CONTROLSTATE[2]&1){ error(10); }else{ __ARRAY_INTEGER_CONTROLSTATE[4]= 0 ; __ARRAY_INTEGER_CONTROLSTATE[5]=( 1000 )-__ARRAY_INTEGER_CONTROLSTATE[4]+1; __ARRAY_INTEGER_CONTROLSTATE[6]=1; if (__ARRAY_INTEGER_CONTROLSTATE[2]&4){ __ARRAY_INTEGER_CONTROLSTATE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_CONTROLSTATE[5]*2); memset((void*)(__ARRAY_INTEGER_CONTROLSTATE[0]),0,__ARRAY_INTEGER_CONTROLSTATE[5]*2); }else{ __ARRAY_INTEGER_CONTROLSTATE[0]=(ptrszint)calloc(__ARRAY_INTEGER_CONTROLSTATE[5]*2,1); if (!__ARRAY_INTEGER_CONTROLSTATE[0]) error(257); } __ARRAY_INTEGER_CONTROLSTATE[2]|=1; } } if(!qbevent)break;evnt(1205);}while(r); do{ if (__ARRAY_LONG_CONTROLREF[2]&2){ error(10); }else{ if (__ARRAY_LONG_CONTROLREF[2]&1){ error(10); }else{ __ARRAY_LONG_CONTROLREF[4]= 0 ; __ARRAY_LONG_CONTROLREF[5]=( 1000 )-__ARRAY_LONG_CONTROLREF[4]+1; __ARRAY_LONG_CONTROLREF[6]=1; if (__ARRAY_LONG_CONTROLREF[2]&4){ __ARRAY_LONG_CONTROLREF[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_CONTROLREF[5]*4); memset((void*)(__ARRAY_LONG_CONTROLREF[0]),0,__ARRAY_LONG_CONTROLREF[5]*4); }else{ __ARRAY_LONG_CONTROLREF[0]=(ptrszint)calloc(__ARRAY_LONG_CONTROLREF[5]*4,1); if (!__ARRAY_LONG_CONTROLREF[0]) error(257); } __ARRAY_LONG_CONTROLREF[2]|=1; } } if(!qbevent)break;evnt(1206);}while(r); do{ error_goto_line=3; if(!qbevent)break;evnt(1212);}while(r); do{ *__INTEGER64_I2= 1 ; if(!qbevent)break;evnt(1214);}while(r); S_866:; fornext_value68= 1 ; fornext_finalvalue68= 56 ; fornext_step68= 1 ; if (fornext_step68<0) fornext_step_negative68=1; else fornext_step_negative68=0; if (new_error) goto fornext_error68; goto fornext_entrylabel68; while(1){ fornext_value68=fornext_step68+(*__INTEGER64_I); fornext_entrylabel68: *__INTEGER64_I=fornext_value68; if (fornext_step_negative68){ if (fornext_value68fornext_finalvalue68) break; } fornext_error68:; if(qbevent){evnt(1215);if(r)goto S_866;} do{ tmp_long=array_check((*__INTEGER64_I)-__ARRAY_INTEGER64_BITMASK[4],__ARRAY_INTEGER64_BITMASK[5]); if (!new_error) ((int64*)(__ARRAY_INTEGER64_BITMASK[0]))[tmp_long]=*__INTEGER64_I2; if(!qbevent)break;evnt(1216);}while(r); do{ tmp_long=array_check((*__INTEGER64_I)-__ARRAY_INTEGER64_BITMASKINV[4],__ARRAY_INTEGER64_BITMASKINV[5]); if (!new_error) ((int64*)(__ARRAY_INTEGER64_BITMASKINV[0]))[tmp_long]=~(*__INTEGER64_I2); if(!qbevent)break;evnt(1217);}while(r); do{ *__INTEGER64_I2=qbr(*__INTEGER64_I2+(pow2( 2 ,*__INTEGER64_I))); if(!qbevent)break;evnt(1218);}while(r); } fornext_exit_67:; do{ if(!qbevent)break;evnt(1221);}while(r); do{ qbs_set(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("qbs_cleanup(qbs_tmp_base,",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1223);}while(r); do{ if (__ARRAY_LONG_SFIDLIST[2]&2){ error(10); }else{ if (__ARRAY_LONG_SFIDLIST[2]&1){ error(10); }else{ __ARRAY_LONG_SFIDLIST[4]= 0 ; __ARRAY_LONG_SFIDLIST[5]=( 1000 )-__ARRAY_LONG_SFIDLIST[4]+1; __ARRAY_LONG_SFIDLIST[6]=1; if (__ARRAY_LONG_SFIDLIST[2]&4){ __ARRAY_LONG_SFIDLIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_SFIDLIST[5]*4); memset((void*)(__ARRAY_LONG_SFIDLIST[0]),0,__ARRAY_LONG_SFIDLIST[5]*4); }else{ __ARRAY_LONG_SFIDLIST[0]=(ptrszint)calloc(__ARRAY_LONG_SFIDLIST[5]*4,1); if (!__ARRAY_LONG_SFIDLIST[0]) error(257); } __ARRAY_LONG_SFIDLIST[2]|=1; } } if(!qbevent)break;evnt(1225);}while(r); do{ if (__ARRAY_INTEGER_SFARGLIST[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_SFARGLIST[2]&1){ error(10); }else{ __ARRAY_INTEGER_SFARGLIST[4]= 0 ; __ARRAY_INTEGER_SFARGLIST[5]=( 1000 )-__ARRAY_INTEGER_SFARGLIST[4]+1; __ARRAY_INTEGER_SFARGLIST[6]=1; if (__ARRAY_INTEGER_SFARGLIST[2]&4){ __ARRAY_INTEGER_SFARGLIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_SFARGLIST[5]*2); memset((void*)(__ARRAY_INTEGER_SFARGLIST[0]),0,__ARRAY_INTEGER_SFARGLIST[5]*2); }else{ __ARRAY_INTEGER_SFARGLIST[0]=(ptrszint)calloc(__ARRAY_INTEGER_SFARGLIST[5]*2,1); if (!__ARRAY_INTEGER_SFARGLIST[0]) error(257); } __ARRAY_INTEGER_SFARGLIST[2]|=1; } } if(!qbevent)break;evnt(1226);}while(r); do{ if (__ARRAY_INTEGER_SFELELIST[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_SFELELIST[2]&1){ error(10); }else{ __ARRAY_INTEGER_SFELELIST[4]= 0 ; __ARRAY_INTEGER_SFELELIST[5]=( 1000 )-__ARRAY_INTEGER_SFELELIST[4]+1; __ARRAY_INTEGER_SFELELIST[6]=1; if (__ARRAY_INTEGER_SFELELIST[2]&4){ __ARRAY_INTEGER_SFELELIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_SFELELIST[5]*2); memset((void*)(__ARRAY_INTEGER_SFELELIST[0]),0,__ARRAY_INTEGER_SFELELIST[5]*2); }else{ __ARRAY_INTEGER_SFELELIST[0]=(ptrszint)calloc(__ARRAY_INTEGER_SFELELIST[5]*2,1); if (!__ARRAY_INTEGER_SFELELIST[0]) error(257); } __ARRAY_INTEGER_SFELELIST[2]|=1; } } if(!qbevent)break;evnt(1227);}while(r); do{ SUB_GL_SCAN_HEADER(); if(!qbevent)break;evnt(1244);}while(r); do{ qbs_set(__STRING_A,qbs_ltrim(qbs_rtrim(__STRING_COMMAND2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1255);}while(r); do{ qbs_set(__STRING_A2,qbs_lcase(qbs_left(__STRING_A, 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1256);}while(r); S_879:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("-c",2))))||new_error){ if(qbevent){evnt(1257);if(r)goto S_879;} do{ qbs_set(__STRING_COMMAND2,qbs_ltrim(qbs_right(__STRING_A,__STRING_A->len- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1257);}while(r); do{ goto LABEL_NOIDE; if(!qbevent)break;evnt(1257);}while(r); } do{ *__LONG_IDEMODE= 1 ; if(!qbevent)break;evnt(1260);}while(r); do{ qbs_set(__STRING_SENDC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1261);}while(r); S_885:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_COMMAND2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1262);if(r)goto S_885;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 1 ),__STRING_COMMAND2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1262);}while(r); } LABEL_SENDCOMMAND:; if(qbevent){evnt(1263);r=0;} do{ qbs_set(__STRING_IDECOMMAND,__STRING_SENDC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1264);}while(r); do{ *__LONG_C=FUNC_IDE(&(pass70= 0 )); if(!qbevent)break;evnt(1265);}while(r); do{ *__LONG_IDEERROR= 0 ; if(!qbevent)break;evnt(1266);}while(r); S_891:; if ((-(*__LONG_C== 0 ))||new_error){ if(qbevent){evnt(1267);if(r)goto S_891;} do{ *__LONG_IDEMODE= 0 ; if(!qbevent)break;evnt(1267);}while(r); do{ goto LABEL_NOIDE; if(!qbevent)break;evnt(1267);}while(r); } do{ qbs_set(__STRING_C,__STRING_IDERETURN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1268);}while(r); S_896:; if ((-(*__LONG_C== 2 ))||new_error){ if(qbevent){evnt(1270);if(r)goto S_896;} do{ *__LONG_IDEERRORLINE= 0 ; if(!qbevent)break;evnt(1271);}while(r); do{ *__LONG_IDEPASS= 1 ; if(!qbevent)break;evnt(1272);}while(r); do{ goto LABEL_FULLRECOMPILE; if(!qbevent)break;evnt(1273);}while(r); LABEL_IDERET1:; if(qbevent){evnt(1274);r=0;} do{ qbs_set(__STRING_WHOLELINE,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1275);}while(r); do{ goto LABEL_IDEPREPASS; if(!qbevent)break;evnt(1276);}while(r); LABEL_IDERET2:; if(qbevent){evnt(1277);r=0;} do{ qbs_set(__STRING_SENDC,func_chr( 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1278);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1279);}while(r); } S_905:; if ((-(*__LONG_C== 4 ))||new_error){ if(qbevent){evnt(1282);if(r)goto S_905;} S_906:; if ((-(*__LONG_IDEPASS== 1 ))||new_error){ if(qbevent){evnt(1283);if(r)goto S_906;} do{ qbs_set(__STRING_WHOLELINE,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1284);}while(r); do{ goto LABEL_IDEPREPASS; if(!qbevent)break;evnt(1285);}while(r); } do{ qbs_set(__STRING_A3,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1289);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(1290);}while(r); do{ goto LABEL_IDE4; if(!qbevent)break;evnt(1291);}while(r); LABEL_IDERET4:; if(qbevent){evnt(1292);r=0;} do{ qbs_set(__STRING_SENDC,func_chr( 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1293);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1294);}while(r); } S_916:; if ((-(*__LONG_C== 5 ))||new_error){ if(qbevent){evnt(1297);if(r)goto S_916;} S_917:; if ((-(*__LONG_IDEPASS== 1 ))||new_error){ if(qbevent){evnt(1298);if(r)goto S_917;} do{ *__LONG_IDEPASS= 2 ; if(!qbevent)break;evnt(1300);}while(r); do{ goto LABEL_IDE3; if(!qbevent)break;evnt(1301);}while(r); LABEL_IDERET3:; if(qbevent){evnt(1302);r=0;} do{ qbs_set(__STRING_SENDC,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1303);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1304);}while(r); } do{ goto LABEL_IDE5; if(!qbevent)break;evnt(1308);}while(r); LABEL_IDERET5:; if(qbevent){evnt(1309);r=0;} do{ qbs_set(__STRING_SENDC,func_chr( 6 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1310);}while(r); do{ *__LONG_IDECOMPILED= 0 ; if(!qbevent)break;evnt(1311);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1312);}while(r); } S_928:; if ((-(*__LONG_C== 9 ))||new_error){ if(qbevent){evnt(1315);if(r)goto S_928;} S_929:; if ((-(*__LONG_IDECOMPILED== 0 ))||new_error){ if(qbevent){evnt(1317);if(r)goto S_929;} do{ qbs_set(__STRING_FILE,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1318);}while(r); do{ qbs_set(__STRING_F,__STRING_FILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1321);}while(r); do{ *__LONG_I= 1 ; if(!qbevent)break;evnt(1322);}while(r); LABEL_NEXTEXEINDEX:; if(qbevent){evnt(1323);r=0;} S_933:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_FILE,__STRING_EXTENSION))))||new_error){ if(qbevent){evnt(1324);if(r)goto S_933;} do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(1325);}while(r); do{ error_goto_line=4; if(!qbevent)break;evnt(1326);}while(r); do{ sub_kill(qbs_add(__STRING_FILE,__STRING_EXTENSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1327);}while(r); do{ error_goto_line=5; if(!qbevent)break;evnt(1328);}while(r); S_938:; if ((-(*__LONG_E== 1 ))||new_error){ if(qbevent){evnt(1329);if(r)goto S_938;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(1330);}while(r); do{ qbs_set(__STRING_FILE,qbs_add(qbs_add(qbs_add(__STRING_F,qbs_new_txt_len("(",1)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1331);}while(r); do{ goto LABEL_NEXTEXEINDEX; if(!qbevent)break;evnt(1332);}while(r); } } S_944:; if ((-(*__LONG_I!= 1 ))||new_error){ if(qbevent){evnt(1337);if(r)goto S_944;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 12 ),__STRING_FILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1338);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1339);}while(r); } do{ *__LONG_IDEERRORLINE= 0 ; if(!qbevent)break;evnt(1342);}while(r); do{ goto LABEL_IDE6; if(!qbevent)break;evnt(1343);}while(r); LABEL_IDERET6:; if(qbevent){evnt(1344);r=0;} do{ *__LONG_IDECOMPILED= 1 ; if(!qbevent)break;evnt(1345);}while(r); } S_952:; if ((-(*__LONG_IDERUNMODE== 2 ))||new_error){ if(qbevent){evnt(1348);if(r)goto S_952;} do{ qbs_set(__STRING_SENDC,func_chr( 11 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1349);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1350);}while(r); } do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(1354);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(1354);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip71; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip71: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1354);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(1354);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip72; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip72: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1354);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 1 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(1354);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip73; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip73: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1354);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(1356);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Starting program...",19)); if (new_error) goto skip74; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip74: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1356);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(1357);}while(r); S_966:; if ((-(*__LONG_IDERUNMODE== 1 ))||new_error){ if(qbevent){evnt(1361);if(r)goto S_966;} S_967:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(1362);if(r)goto S_967;} do{ sub_shell3(FUNC_IDEZFILENAME(qbs_add(qbs_add(qbs_add(func_chr( 34 ),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 ))),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1362);}while(r); } S_970:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(1363);if(r)goto S_970;} do{ sub_shell3(FUNC_IDEZFILENAME(qbs_add(qbs_add(qbs_new_txt_len("./",2),__STRING_FILE),__STRING_EXTENSION)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1363);}while(r); } }else{ S_974:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(1365);if(r)goto S_974;} do{ sub_shell(FUNC_IDEZFILENAME(qbs_add(qbs_add(qbs_add(func_chr( 34 ),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 ))),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1365);}while(r); } S_977:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(1366);if(r)goto S_977;} do{ sub_shell(FUNC_IDEZFILENAME(qbs_add(qbs_add(qbs_new_txt_len("./",2),__STRING_FILE),__STRING_EXTENSION)),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1366);}while(r); } } do{ qbs_set(__STRING_SENDC,func_chr( 6 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1369);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1370);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Invalid IDE message",19)); if (new_error) goto skip75; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip75: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1373);}while(r); do{ sub_end(); if(!qbevent)break;evnt(1373);}while(r); LABEL_IDEERROR:; if(qbevent){evnt(1375);r=0;} do{ qbs_set(__STRING_SENDC,qbs_add(qbs_add(func_chr( 8 ),__STRING_IDEMESSAGE),l2string(*__LONG_IDEERRORLINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1376);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1377);}while(r); LABEL_NOIDE:; if(qbevent){evnt(1380);r=0;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("QB64 COMPILER V",15),__STRING_VERSION)); if (new_error) goto skip76; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip76: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1381);}while(r); S_989:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_COMMAND2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1383);if(r)goto S_989;} do{ qbs_print(qbs_new_txt_len("COMPILE (.bas)>",15),0); qbs_input_variabletypes[1]=ISSTRING+512; qbs_input_variableoffsets[1]=__STRING_F; qbs_input(1,0); if (stop_program) end(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1384);}while(r); }else{ do{ qbs_set(__STRING_F,__STRING_COMMAND2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1386);}while(r); } do{ qbs_set(__STRING_F,qbs_ltrim(qbs_rtrim(__STRING_F))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1389);}while(r); S_995:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_FILEHASEXTENSION(__STRING_F)== 0 )))||new_error){ if(qbevent){evnt(1391);if(r)goto S_995;} do{ qbs_set(__STRING_F,qbs_add(__STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1391);}while(r); } do{ qbs_set(__STRING_SOURCEFILE,__STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1393);}while(r); do{ qbs_set(__STRING_F,FUNC_REMOVEFILEEXTENSION(__STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1395);}while(r); S_1000:; fornext_value78=__STRING_F->len; fornext_finalvalue78= 1 ; fornext_step78= -1 ; if (fornext_step78<0) fornext_step_negative78=1; else fornext_step_negative78=0; if (new_error) goto fornext_error78; goto fornext_entrylabel78; while(1){ fornext_value78=fornext_step78+(*__LONG_X); fornext_entrylabel78: *__LONG_X=fornext_value78; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative78){ if (fornext_value78fornext_finalvalue78) break; } fornext_error78:; if(qbevent){evnt(1397);if(r)goto S_1000;} do{ qbs_set(__STRING_A,func_mid(__STRING_F,*__LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1398);}while(r); S_1002:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A,qbs_new_txt_len("/",1)))|(qbs_equal(__STRING_A,qbs_new_txt_len("\\",1)))))||new_error){ if(qbevent){evnt(1399);if(r)goto S_1002;} do{ qbs_set(__STRING_F,qbs_right(__STRING_F,__STRING_F->len-*__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1400);}while(r); do{ goto fornext_exit_77; if(!qbevent)break;evnt(1401);}while(r); } } fornext_exit_77:; do{ qbs_set(__STRING_FILE,__STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1404);}while(r); LABEL_FULLRECOMPILE:; if(qbevent){evnt(1409);r=0;} S_1008:; fornext_value82= 1 ; fornext_finalvalue82=func_ubound(__ARRAY_LONG_DEPENDENCY,1,1); fornext_step82= 1 ; if (fornext_step82<0) fornext_step_negative82=1; else fornext_step_negative82=0; if (new_error) goto fornext_error82; goto fornext_entrylabel82; while(1){ fornext_value82=fornext_step82+(*__LONG_I); fornext_entrylabel82: *__LONG_I=fornext_value82; if (fornext_step_negative82){ if (fornext_value82fornext_finalvalue82) break; } fornext_error82:; if(qbevent){evnt(1413);if(r)goto S_1008;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1413);}while(r); } fornext_exit_81:; do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(1415);}while(r); S_1012:; fornext_value84= 1 ; fornext_finalvalue84= 255 ; fornext_step84= 1 ; if (fornext_step84<0) fornext_step_negative84=1; else fornext_step_negative84=0; if (new_error) goto fornext_error84; goto fornext_entrylabel84; while(1){ fornext_value84=fornext_step84+(*__LONG_CLOSEALL); fornext_entrylabel84: *__LONG_CLOSEALL=fornext_value84; if (fornext_step_negative84){ if (fornext_value84fornext_finalvalue84) break; } fornext_error84:; if(qbevent){evnt(1417);if(r)goto S_1012;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(1417);}while(r); } fornext_exit_83:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 2 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1419);}while(r); S_1016:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(1421);if(r)goto S_1016;} do{ sub_close( 9 ,1); if(!qbevent)break;evnt(1421);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("debug.txt",9)), 4 ,NULL,NULL, 9 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1421);}while(r); } S_1020:; fornext_value86= 1 ; fornext_finalvalue86=*__LONG_IDS_MAX+ 1 ; fornext_step86= 1 ; if (fornext_step86<0) fornext_step_negative86=1; else fornext_step_negative86=0; if (new_error) goto fornext_error86; goto fornext_entrylabel86; while(1){ fornext_value86=fornext_step86+(*__LONG_I); fornext_entrylabel86: *__LONG_I=fornext_value86; if (fornext_step_negative86){ if (fornext_value86fornext_finalvalue86) break; } fornext_error86:; if(qbevent){evnt(1424);if(r)goto S_1020;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1425);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1426);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[tmp_long*100],100,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(1427);}while(r); } fornext_exit_85:; do{ *__LONG_LASTUNRESOLVED= -1 ; if(!qbevent)break;evnt(1434);}while(r); do{ *__INTEGER_SFLISTN= -1 ; if(!qbevent)break;evnt(1435);}while(r); do{ qbs_set(__STRING_SUBNAMELABELS,__STRING1_SP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1437);}while(r); LABEL_RECOMPILE:; if(qbevent){evnt(1439);r=0;} do{ *__LONG_USEGL= 0 ; if(!qbevent)break;evnt(1441);}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(1443);}while(r); do{ SUB_HASHCLEAR(); if(!qbevent)break;evnt(1445);}while(r); do{ *__LONG_F= 4 + 8 ; if(!qbevent)break;evnt(1449);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_UNSIGNED",9),__LONG_F,&(pass87= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1450);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_BIT",4),__LONG_F,&(pass88= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1451);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_BYTE",5),__LONG_F,&(pass89= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1452);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("INTEGER",7),__LONG_F,&(pass90= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1453);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LONG",4),__LONG_F,&(pass91= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1454);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_INTEGER64",10),__LONG_F,&(pass92= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1455);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_OFFSET",7),__LONG_F,&(pass93= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1456);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SINGLE",6),__LONG_F,&(pass94= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1457);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DOUBLE",6),__LONG_F,&(pass95= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1458);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_FLOAT",6),__LONG_F,&(pass96= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1459);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STRING",6),__LONG_F,&(pass97= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1460);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ANY",3),__LONG_F,&(pass98= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1461);}while(r); do{ *__LONG_F= 16 + 8 ; if(!qbevent)break;evnt(1463);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("NOT",3),__LONG_F,&(pass99= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1464);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("IMP",3),__LONG_F,&(pass100= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1465);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("EQV",3),__LONG_F,&(pass101= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1466);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("AND",3),__LONG_F,&(pass102= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1467);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("OR",2),__LONG_F,&(pass103= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1468);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("XOR",3),__LONG_F,&(pass104= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1469);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("MOD",3),__LONG_F,&(pass105= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1470);}while(r); do{ *__LONG_F= 8 + 32 ; if(!qbevent)break;evnt(1472);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LIST",4),__LONG_F,&(pass106= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1473);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("BASE",4),__LONG_F,&(pass107= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1474);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("AS",2),__LONG_F,&(pass108= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1475);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("IS",2),__LONG_F,&(pass109= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1476);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("OFF",3),__LONG_F,&(pass110= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1477);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ON",2),__LONG_F,&(pass111= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1478);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STOP",4),__LONG_F,&(pass112= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1479);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("TO",2),__LONG_F,&(pass113= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1480);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("USING",5),__LONG_F,&(pass114= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1481);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PRESET",6),__LONG_F,&(pass115= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1483);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PSET",4),__LONG_F,&(pass116= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1484);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("FOR",3),__LONG_F,&(pass117= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1486);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("OUTPUT",6),__LONG_F,&(pass118= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1487);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RANDOM",6),__LONG_F,&(pass119= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1488);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("BINARY",6),__LONG_F,&(pass120= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1489);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("APPEND",6),__LONG_F,&(pass121= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1490);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SHARED",6),__LONG_F,&(pass122= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1491);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ACCESS",6),__LONG_F,&(pass123= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1492);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LOCK",4),__LONG_F,&(pass124= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1493);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("READ",4),__LONG_F,&(pass125= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1494);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("WRITE",5),__LONG_F,&(pass126= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1495);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STEP",4),__LONG_F,&(pass127= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1497);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LPRINT",6),__LONG_F,&(pass128= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1499);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PRINT",5),__LONG_F,&(pass129= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1501);}while(r); do{ *__LONG_F= 8 + 8192 + 16384 ; if(!qbevent)break;evnt(1503);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("COMMON",6),__LONG_F,&(pass130= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1507);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("CALL",4),__LONG_F,&(pass131= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1508);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("CASE",4),&(pass132=*__LONG_F- 8192 ),&(pass133= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1509);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("COM",3),__LONG_F,&(pass134= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1510);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("CONST",5),__LONG_F,&(pass135= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1511);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DATA",4),__LONG_F,&(pass136= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1513);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DECLARE",7),__LONG_F,&(pass137= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1514);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEF",3),__LONG_F,&(pass138= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1515);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFDBL",6),__LONG_F,&(pass139= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1516);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFINT",6),__LONG_F,&(pass140= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1517);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFLNG",6),__LONG_F,&(pass141= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1518);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFSNG",6),__LONG_F,&(pass142= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1519);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFSTR",6),__LONG_F,&(pass143= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1520);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DIM",3),__LONG_F,&(pass144= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1521);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DO",2),&(pass145=*__LONG_F- 8192 ),&(pass146= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1522);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ERROR",5),&(pass147=*__LONG_F- 8192 ),&(pass148= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1524);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ELSE",4),__LONG_F,&(pass149= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1525);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ELSEIF",6),__LONG_F,&(pass150= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1526);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("EXIT",4),&(pass151=*__LONG_F- 8192 ),&(pass152= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1527);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("FIELD",5),&(pass153=*__LONG_F- 8192 ),&(pass154= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1529);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("FUNCTION",8),__LONG_F,&(pass155= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1530);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("GOSUB",5),__LONG_F,&(pass156= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1532);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("GOTO",4),__LONG_F,&(pass157= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1533);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("INPUT",5),&(pass158=*__LONG_F- 8192 - 16384 ),&(pass159= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1536);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("IF",2),__LONG_F,&(pass160= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1537);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("KEY",3),&(pass161=*__LONG_F- 8192 - 16384 ),&(pass162= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1539);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LET",3),&(pass163=*__LONG_F- 8192 ),&(pass164= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1541);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LOOP",4),&(pass165=*__LONG_F- 8192 ),&(pass166= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1542);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LEN",3),&(pass167=*__LONG_F- 8192 ),&(pass168= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1543);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("NEXT",4),&(pass169=*__LONG_F- 8192 ),&(pass170= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1546);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PLAY",4),&(pass171=*__LONG_F- 8192 - 16384 ),&(pass172= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1549);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PEN",3),&(pass173=*__LONG_F- 8192 - 16384 ),&(pass174= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1550);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("REDIM",5),__LONG_F,&(pass175= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1553);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("REM",3),__LONG_F,&(pass176= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1554);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RESTORE",7),&(pass177=*__LONG_F- 8192 ),&(pass178= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1555);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RESUME",6),&(pass179=*__LONG_F- 8192 ),&(pass180= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1556);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RETURN",6),&(pass181=*__LONG_F- 8192 ),&(pass182= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1557);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RUN",3),&(pass183=*__LONG_F- 8192 ),&(pass184= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1558);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STATIC",6),__LONG_F,&(pass185= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1560);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STRIG",5),__LONG_F,&(pass186= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1561);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SEG",3),__LONG_F,&(pass187= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1562);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SELECT",6),&(pass188=*__LONG_F- 8192 - 16384 ),&(pass189= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1563);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SUB",3),__LONG_F,&(pass190= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1564);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SCREEN",6),&(pass191=*__LONG_F- 8192 - 16384 ),&(pass192= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1565);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("THEN",4),__LONG_F,&(pass193= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1567);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("TIMER",5),&(pass194=*__LONG_F- 8192 - 16384 ),&(pass195= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1568);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("TYPE",4),&(pass196=*__LONG_F- 8192 ),&(pass197= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1569);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("UNTIL",5),__LONG_F,&(pass198= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1571);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("UEVENT",6),__LONG_F,&(pass199= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1572);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("WEND",4),__LONG_F,&(pass200= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1575);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("WHILE",5),__LONG_F,&(pass201= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1576);}while(r); do{ *__LONG_CONSOLE= 0 ; if(!qbevent)break;evnt(1588);}while(r); do{ *__LONG_SCREENHIDE= 0 ; if(!qbevent)break;evnt(1589);}while(r); do{ *__LONG_RESOLVESTATICFUNCTIONS= 0 ; if(!qbevent)break;evnt(1590);}while(r); do{ *__LONG_DYNAMICLIBRARY= 0 ; if(!qbevent)break;evnt(1591);}while(r); do{ *__INTEGER_DIMSFARRAY= 0 ; if(!qbevent)break;evnt(1592);}while(r); do{ *__LONG_DIMSTATIC= 0 ; if(!qbevent)break;evnt(1593);}while(r); do{ *__LONG_ALLOWLOCALNAME= 0 ; if(!qbevent)break;evnt(1594);}while(r); do{ qbs_set(__STRING_POSSIBLESUBNAMELABELS,__STRING1_SP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1595);}while(r); do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(1596);}while(r); do{ *__INTEGER_DIMSHARED= 0 ; if(!qbevent)break;evnt(1597);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(1597);}while(r); do{ *__INTEGER_DIMOPTION= 0 ; if(!qbevent)break;evnt(1597);}while(r); do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(1597);}while(r); do{ *__LONG_COMMONOPTION= 0 ; if(!qbevent)break;evnt(1597);}while(r); do{ qbs_set(__STRING_MYLIB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1598);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1598);}while(r); do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(1599);}while(r); do{ *__LONG_NLABELS= 0 ; if(!qbevent)break;evnt(1600);}while(r); do{ *__LONG_DYNSCOPE= 0 ; if(!qbevent)break;evnt(1601);}while(r); do{ *__LONG_ELSEFOLLOWUP= 0 ; if(!qbevent)break;evnt(1602);}while(r); do{ *__LONG_ONTIMERID= 0 ; if(!qbevent)break;evnt(1603);}while(r); do{ *__LONG_ONKEYID= 0 ; if(!qbevent)break;evnt(1603);}while(r); do{ *__LONG_ONSTRIGID= 0 ; if(!qbevent)break;evnt(1603);}while(r); do{ qbs_set(__STRING_COMMONARRAYLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1604);}while(r); do{ *__LONG_COMMONARRAYLISTN= 0 ; if(!qbevent)break;evnt(1604);}while(r); do{ qbs_set(__STRING_STATICARRAYLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1605);}while(r); do{ *__LONG_STATICARRAYLISTN= 0 ; if(!qbevent)break;evnt(1605);}while(r); do{ *__LONG_FOOINDWEL= 0 ; if(!qbevent)break;evnt(1606);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1607);}while(r); do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(1608);}while(r); do{ *__LONG_NOCHECKS= 0 ; if(!qbevent)break;evnt(1609);}while(r); do{ *__LONG_INCLEVEL= 0 ; if(!qbevent)break;evnt(1610);}while(r); do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1611);}while(r); do{ *__LONG_NEXTRUNLINEINDEX= 1 ; if(!qbevent)break;evnt(1612);}while(r); do{ *__LONG_LASTTYPE= 0 ; if(!qbevent)break;evnt(1613);}while(r); do{ *__LONG_LASTTYPEELEMENT= 0 ; if(!qbevent)break;evnt(1614);}while(r); do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(1615);}while(r); do{ *__LONG_CONSTLAST= -1 ; if(!qbevent)break;evnt(1616);}while(r); do{ *__INTEGER_DEFDATAHANDLE= 18 ; if(!qbevent)break;evnt(1618);}while(r); do{ *__INTEGER_CLOSEDMAIN= 0 ; if(!qbevent)break;evnt(1619);}while(r); do{ *__INTEGER_ADDMETASTATIC= 0 ; if(!qbevent)break;evnt(1620);}while(r); do{ *__INTEGER_ADDMETADYNAMIC= 0 ; if(!qbevent)break;evnt(1621);}while(r); do{ *__INTEGER_DYNAMICMODE= 0 ; if(!qbevent)break;evnt(1622);}while(r); do{ *__INTEGER_OPTIONBASE= 0 ; if(!qbevent)break;evnt(1623);}while(r); do{ *__LONG_DATAOFFSET= 0 ; if(!qbevent)break;evnt(1624);}while(r); do{ *__LONG_STATEMENTN= 0 ; if(!qbevent)break;evnt(1625);}while(r); do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(1626);}while(r); do{ *__INTEGER_QBERRORCODE= 0 ; if(!qbevent)break;evnt(1626);}while(r); do{ *__INTEGER_QBERRORLINE= 0 ; if(!qbevent)break;evnt(1626);}while(r); S_1178:; fornext_value203= 1 ; fornext_finalvalue203= 27 ; fornext_step203= 1 ; if (fornext_step203<0) fornext_step_negative203=1; else fornext_step_negative203=0; if (new_error) goto fornext_error203; goto fornext_entrylabel203; while(1){ fornext_value203=fornext_step203+(*__LONG_I); fornext_entrylabel203: *__LONG_I=fornext_value203; if (fornext_step_negative203){ if (fornext_value203fornext_finalvalue203) break; } fornext_error203:; if(qbevent){evnt(1627);if(r)goto S_1178;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[tmp_long])),qbs_new_txt_len("SINGLE",6)); if(!qbevent)break;evnt(1627);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[tmp_long])),qbs_new_txt_len("!",1)); if(!qbevent)break;evnt(1627);}while(r); } fornext_exit_202:; do{ *__INTEGER_CONTROLLEVEL= 0 ; if(!qbevent)break;evnt(1628);}while(r); do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1629);}while(r); do{ *__INTEGER_FINDANOTHERID= 0 ; if(!qbevent)break;evnt(1629);}while(r); do{ *__LONG_FINDIDINTERNAL= 0 ; if(!qbevent)break;evnt(1629);}while(r); do{ *__LONG_CURRENTID= 0 ; if(!qbevent)break;evnt(1629);}while(r); do{ *__LONG_LINENUMBER= 0 ; if(!qbevent)break;evnt(1630);}while(r); do{ qbs_set(__STRING_WHOLELINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1631);}while(r); do{ qbs_set(__STRING_LINEFRAGMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1632);}while(r); do{ *__LONG_IDN= 0 ; if(!qbevent)break;evnt(1633);}while(r); do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(1634);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(1635);}while(r); do{ *__LONG_SUBFUNCN= 0 ; if(!qbevent)break;evnt(1636);}while(r); do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1637);}while(r); do{ *__LONG_PTRSZ=*__LONG_OS_BITS/ 8 ; if(!qbevent)break;evnt(1660);}while(r); do{ *__LONG_LASTTYPE=*__LONG_LASTTYPE+ 1 ; if(!qbevent)break;evnt(1662);}while(r); do{ *__LONG_I=*__LONG_LASTTYPE; if(!qbevent)break;evnt(1662);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("_MEM",4)); if(!qbevent)break;evnt(1663);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("_MEM",4)); if(!qbevent)break;evnt(1664);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[tmp_long]=((*__LONG_PTRSZ* 4 )+(( 4 )* 1 )+(( 8 )* 1 ))* 8 ; if(!qbevent)break;evnt(1665);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1666);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1667);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1667);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("OFFSET",6)); if(!qbevent)break;evnt(1668);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("OFFSET",6)); if(!qbevent)break;evnt(1669);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1670);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(1671);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=*__LONG_PTRSZ* 8 ; if(!qbevent)break;evnt(1671);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1672);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1673);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1674);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1675);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1675);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("SIZE",4)); if(!qbevent)break;evnt(1676);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("SIZE",4)); if(!qbevent)break;evnt(1677);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1678);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(1679);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=*__LONG_PTRSZ* 8 ; if(!qbevent)break;evnt(1679);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1680);}while(r); do{ tmp_long=array_check((*__LONG_I3)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1681);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1682);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1683);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1683);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("$_LOCK_ID",9)); if(!qbevent)break;evnt(1684);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("$_LOCK_ID",9)); if(!qbevent)break;evnt(1685);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1686);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(1687);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]= 64 ; if(!qbevent)break;evnt(1687);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1688);}while(r); do{ tmp_long=array_check((*__LONG_I3)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1689);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1690);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1691);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1691);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("$_LOCK_OFFSET",13)); if(!qbevent)break;evnt(1692);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("$_LOCK_OFFSET",13)); if(!qbevent)break;evnt(1693);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1694);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(1695);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=*__LONG_PTRSZ* 8 ; if(!qbevent)break;evnt(1695);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1696);}while(r); do{ tmp_long=array_check((*__LONG_I3)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1697);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1698);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1699);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1699);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("TYPE",4)); if(!qbevent)break;evnt(1700);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("TYPE",4)); if(!qbevent)break;evnt(1701);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1702);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_LONGTYPE; if(!qbevent)break;evnt(1703);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]= 32 ; if(!qbevent)break;evnt(1703);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1704);}while(r); do{ tmp_long=array_check((*__LONG_I3)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1705);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1706);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1707);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1707);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("ELEMENTSIZE",11)); if(!qbevent)break;evnt(1708);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[tmp_long*256],256,1),qbs_new_txt_len("ELEMENTSIZE",11)); if(!qbevent)break;evnt(1709);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1710);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(1711);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=*__LONG_PTRSZ* 8 ; if(!qbevent)break;evnt(1711);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1712);}while(r); do{ tmp_long=array_check((*__LONG_I3)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1713);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1714);}while(r); S_1262:; fornext_value205= 1 ; fornext_finalvalue205= 255 ; fornext_step205= 1 ; if (fornext_step205<0) fornext_step_negative205=1; else fornext_step_negative205=0; if (new_error) goto fornext_error205; goto fornext_entrylabel205; while(1){ fornext_value205=fornext_step205+(*__LONG_CLOSEALL); fornext_entrylabel205: *__LONG_CLOSEALL=fornext_value205; if (fornext_step_negative205){ if (fornext_value205fornext_finalvalue205) break; } fornext_error205:; if(qbevent){evnt(1729);if(r)goto S_1262;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(1729);}while(r); } fornext_exit_204:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 2 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1730);}while(r); S_1266:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(1733);if(r)goto S_1266;} do{ sub_close( 9 ,1); if(!qbevent)break;evnt(1733);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("debug.txt",9)), 5 ,NULL,NULL, 9 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1733);}while(r); } S_1270:; if ((-(*__LONG_IDEMODE== 0 ))||new_error){ if(qbevent){evnt(1735);if(r)goto S_1270;} do{ *__INTEGER_QBERRORHAPPENED= -1 ; if(!qbevent)break;evnt(1736);}while(r); do{ sub_open(__STRING_SOURCEFILE, 3 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1737);}while(r); LABEL_QBERRORHAPPENED1:; if(qbevent){evnt(1738);r=0;} S_1273:; if ((-(*__INTEGER_QBERRORHAPPENED== 1 ))||new_error){ if(qbevent){evnt(1739);if(r)goto S_1273;} do{ qbs_print(nothingstring,1); skip206: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1740);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("CANNOT LOCATE SOURCE FILE:",26),__STRING_SOURCEFILE)); if (new_error) goto skip207; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip207: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1741);}while(r); S_1276:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(1742);if(r)goto S_1276;} do{ if(qbevent){evnt(1742);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(1742);}while(r); } do{ if(qbevent){evnt(1743);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(1743);}while(r); }else{ do{ sub_close( 1 ,1); if(!qbevent)break;evnt(1745);}while(r); } do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(1747);}while(r); } do{ SUB_REGINTERNAL(); if(!qbevent)break;evnt(1750);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 4 ,NULL,NULL, 18 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1753);}while(r); S_1287:; if ((*__LONG_CLOUD)||new_error){ if(qbevent){evnt(1754);if(r)goto S_1287;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip208; sub_file_print(tmp_fileno,qbs_new_txt_len("int32 cloud_app=1;",18), 0 , 0 , 1 ); if (new_error) goto skip208; skip208: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(1754);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip209; sub_file_print(tmp_fileno,qbs_new_txt_len("int32 cloud_app=0;",18), 0 , 0 , 1 ); if (new_error) goto skip209; skip209: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(1754);}while(r); } S_1292:; if ((*__LONG_IDERECOMPILE)||new_error){ if(qbevent){evnt(1756);if(r)goto S_1292;} do{ *__LONG_IDERECOMPILE= 0 ; if(!qbevent)break;evnt(1757);}while(r); do{ *__LONG_IDEPASS= 1 ; if(!qbevent)break;evnt(1758);}while(r); do{ qbs_set(__STRING_SENDC,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1759);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1760);}while(r); } S_1298:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(1763);if(r)goto S_1298;} do{ goto LABEL_IDERET1; if(!qbevent)break;evnt(1763);}while(r); } do{ SUB_LINEINPUT3LOAD(__STRING_SOURCEFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1765);}while(r); S_1302:; do{ if(qbevent){evnt(1767);if(r)goto S_1302;} do{ qbs_set(__STRING_WHOLELINE,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1768);}while(r); S_1304:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_WHOLELINE,func_chr( 13 ))))||new_error){ if(qbevent){evnt(1769);if(r)goto S_1304;} do{ goto dl_exit_210; if(!qbevent)break;evnt(1769);}while(r); } LABEL_IDEPREPASS:; if(qbevent){evnt(1770);r=0;} do{ *__LONG_PREPASS= 1 ; if(!qbevent)break;evnt(1772);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1773);}while(r); do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(1774);}while(r); do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER+ 1 ; if(!qbevent)break;evnt(1776);}while(r); S_1311:; if ((qbs_cleanup(qbs_tmp_base,__STRING_WHOLELINE->len))||new_error){ if(qbevent){evnt(1777);if(r)goto S_1311;} do{ qbs_set(__STRING_WHOLELINE,FUNC_LINEFORMAT(__STRING_WHOLELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1779);}while(r); S_1313:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(1780);if(r)goto S_1313;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1780);}while(r); } do{ qbs_set(__STRING_CWHOLELINE,__STRING_WHOLELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1782);}while(r); do{ qbs_set(__STRING_WHOLELINE,FUNC_ELEUCASE(__STRING_WHOLELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1783);}while(r); do{ *__INTEGER_ADDMETADYNAMIC= 0 ; if(!qbevent)break;evnt(1786);}while(r); do{ *__INTEGER_ADDMETASTATIC= 0 ; if(!qbevent)break;evnt(1786);}while(r); do{ *__LONG_WHOLELINEN=FUNC_NUMELEMENTS(__STRING_WHOLELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1787);}while(r); S_1321:; if ((*__LONG_WHOLELINEN)||new_error){ if(qbevent){evnt(1789);if(r)goto S_1321;} do{ *__LONG_WHOLELINEI= 1 ; if(!qbevent)break;evnt(1791);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_WHOLELINE,&(pass212= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1794);}while(r); S_1324:; if ((qbs_cleanup(qbs_tmp_base,(((-(qbs_asc(__STRING_E)>= 48 ))&(-(qbs_asc(__STRING_E)<= 59 ))))|(-(qbs_asc(__STRING_E)== 46 ))))||new_error){ if(qbevent){evnt(1795);if(r)goto S_1324;} do{ *__LONG_WHOLELINEI= 2 ; if(!qbevent)break;evnt(1795);}while(r); do{ goto LABEL_PPSKPL; if(!qbevent)break;evnt(1795);}while(r); } S_1328:; if ((-(*__LONG_WHOLELINEN>= 2 ))||new_error){ if(qbevent){evnt(1798);if(r)goto S_1328;} do{ *__LONG_X2=func_instr(NULL,__STRING_WHOLELINE,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len(":",1)),__STRING1_SP),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1799);}while(r); do{ *__LONG_X3=*__LONG_X2+ 2 ; if(!qbevent)break;evnt(1799);}while(r); S_1331:; if ((-(*__LONG_X2== 0 ))||new_error){ if(qbevent){evnt(1800);if(r)goto S_1331;} S_1332:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(__STRING_WHOLELINE, 2 )),(qbs_add(__STRING1_SP,qbs_new_txt_len(":",1))))))||new_error){ if(qbevent){evnt(1801);if(r)goto S_1332;} do{ *__LONG_X2=__STRING_WHOLELINE->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1801);}while(r); do{ *__LONG_X3=*__LONG_X2+ 1 ; if(!qbevent)break;evnt(1801);}while(r); } } S_1337:; if ((*__LONG_X2)||new_error){ if(qbevent){evnt(1804);if(r)goto S_1337;} do{ qbs_set(__STRING_E,qbs_left(__STRING_WHOLELINE,*__LONG_X2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1805);}while(r); S_1339:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VALIDLABEL(__STRING_E)))||new_error){ if(qbevent){evnt(1806);if(r)goto S_1339;} do{ qbs_set(__STRING_WHOLELINE,qbs_right(__STRING_WHOLELINE,__STRING_WHOLELINE->len-*__LONG_X3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1807);}while(r); do{ qbs_set(__STRING_CWHOLELINE,qbs_right(__STRING_CWHOLELINE,__STRING_WHOLELINE->len-*__LONG_X3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1808);}while(r); do{ *__LONG_WHOLELINEN=FUNC_NUMELEMENTS(__STRING_WHOLELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1809);}while(r); do{ goto LABEL_PPSKPL; if(!qbevent)break;evnt(1810);}while(r); } } } LABEL_PPSKPL:; if(qbevent){evnt(1815);r=0;} S_1347:; if ((-(*__LONG_WHOLELINEI<=*__LONG_WHOLELINEN))||new_error){ if(qbevent){evnt(1816);if(r)goto S_1347;} do{ qbs_set(__STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1818);}while(r); do{ qbs_set(__STRING_CA,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1819);}while(r); LABEL_PPBLDA:; if(qbevent){evnt(1820);r=0;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_WHOLELINE,__LONG_WHOLELINEI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1821);}while(r); do{ qbs_set(__STRING_CE,FUNC_GETELEMENT(__STRING_CWHOLELINE,__LONG_WHOLELINEI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1822);}while(r); S_1352:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len(":",1)))|(qbs_equal(__STRING_E,qbs_new_txt_len("ELSE",4)))|(qbs_equal(__STRING_E,qbs_new_txt_len("THEN",4)))|(qbs_equal(__STRING_E,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(1823);if(r)goto S_1352;} S_1353:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(1824);if(r)goto S_1353;} S_1354:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(1825);if(r)goto S_1354;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip217; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("PP[",3),__STRING_A),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip217; skip217: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(1825);}while(r); } do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1826);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass218= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1827);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass219= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1828);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass220= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1829);}while(r); S_1361:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(1833);if(r)goto S_1361;} S_1362:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(1835);if(r)goto S_1362;} S_1363:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("DECLARE",7)))))||new_error){ if(qbevent){evnt(1836);if(r)goto S_1363;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END DECLARE",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1836);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1836);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(1837);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1838);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 2 ; if(!qbevent)break;evnt(1841);}while(r); S_1371:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SUB",3)))|(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FUNCTION",8)))))||new_error){ if(qbevent){evnt(1843);if(r)goto S_1371;} do{ *__LONG_SUBFUNCN=*__LONG_SUBFUNCN- 1 ; if(!qbevent)break;evnt(1843);}while(r); do{ goto LABEL_DECLARESUBFUNC; if(!qbevent)break;evnt(1843);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SUB/FUNCTION definition or END DECLARE (#2)",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1845);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1845);}while(r); } S_1378:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(1849);if(r)goto S_1378;} do{ *__LONG_I=*__LONG_DEFININGTYPE; if(!qbevent)break;evnt(1850);}while(r); S_1380:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(1852);if(r)goto S_1380;} S_1381:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(1853);if(r)goto S_1381;} S_1382:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("TYPE",4)))))||new_error){ if(qbevent){evnt(1854);if(r)goto S_1382;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END TYPE",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1854);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1854);}while(r); } S_1386:; if ((-(((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]== 0 ))||new_error){ if(qbevent){evnt(1855);if(r)goto S_1386;} do{ qbs_set(__STRING_A,qbs_new_txt_len("No elements defined in TYPE",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1855);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1855);}while(r); } do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(1856);}while(r); do{ qbs_set(__STRING_SIZ,FUNC_STR2(&(pass221=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1859);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip222; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("char *g_tmp_udt_",16),qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[(array_check((*__LONG_I)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]))*256],256,1))),qbs_new_txt_len("=(char*)malloc(",15)),__STRING_SIZ),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip222; skip222: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(1860);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1863);}while(r); } } do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1867);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1868);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1869);}while(r); S_1399:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(1871);if(r)goto S_1399;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variablename AS type or END TYPE",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1871);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1871);}while(r); } do{ qbs_set(__STRING_N,__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1872);}while(r); do{ *__LONG_II= 2 ; if(!qbevent)break;evnt(1874);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1876);}while(r); S_1406:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_II>=*__LONG_N))|(qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_II),qbs_new_txt_len("AS",2)))))||new_error){ if(qbevent){evnt(1878);if(r)goto S_1406;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variablename AS type or END TYPE",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1878);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1878);}while(r); } do{ qbs_set(__STRING_T,FUNC_GETELEMENTS(__STRING_A,&(pass223=*__LONG_II+ 1 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1879);}while(r); do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1881);}while(r); S_1412:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(1882);if(r)goto S_1412;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1882);}while(r); } S_1415:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(1883);if(r)goto S_1415;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1883);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1883);}while(r); } do{ *__LONG_TYPSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(1884);}while(r); S_1420:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_N)== 0 )))||new_error){ if(qbevent){evnt(1886);if(r)goto S_1420;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1886);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1886);}while(r); } do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[tmp_long*256],256,1),__STRING_N); if(!qbevent)break;evnt(1887);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[tmp_long*256],256,1),FUNC_GETELEMENT(__STRING_CA,&(pass224= 1 ))); if(!qbevent)break;evnt(1889);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_TYP; if(!qbevent)break;evnt(1890);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[tmp_long]=*__LONG_TYPSIZE; if(!qbevent)break;evnt(1891);}while(r); do{ qbs_set(__STRING_HASHNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1893);}while(r); do{ *__LONG_HASHCHKFLAGS= 8 + 512 ; if(!qbevent)break;evnt(1896);}while(r); do{ *__LONG_HASHRES=FUNC_HASHFIND(__STRING_HASHNAME,__LONG_HASHCHKFLAGS,__LONG_HASHRESFLAGS,__LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1897);}while(r); S_1431:; while((*__LONG_HASHRES)||new_error){ if(qbevent){evnt(1898);if(r)goto S_1431;} S_1432:; if ((*__LONG_HASHRESFLAGS& 512 )||new_error){ if(qbevent){evnt(1899);if(r)goto S_1432;} S_1433:; if ((-(*__LONG_HASHRESREF==*__LONG_I))||new_error){ if(qbevent){evnt(1900);if(r)goto S_1433;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1900);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1900);}while(r); } } S_1438:; if ((*__LONG_HASHRESFLAGS& 8 )||new_error){ if(qbevent){evnt(1902);if(r)goto S_1438;} S_1439:; if ((*__LONG_HASHRESFLAGS&( 4 + 32 + 16 + 8192 ))||new_error){ if(qbevent){evnt(1903);if(r)goto S_1439;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1903);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1903);}while(r); } } S_1444:; if ((-(*__LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(1905);if(r)goto S_1444;} do{ *__LONG_HASHRES=FUNC_HASHFINDCONT(__LONG_HASHRESFLAGS,__LONG_HASHRESREF); if(!qbevent)break;evnt(1905);}while(r); }else{ do{ *__LONG_HASHRES= 0 ; if(!qbevent)break;evnt(1905);}while(r); } } dl_exit_225:; do{ SUB_HASHADD(__STRING_HASHNAME,&(pass226= 512 ),__LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1908);}while(r); S_1451:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(1911);if(r)goto S_1451;} do{ *__LONG_U=*__LONG_TYP& 511 ; if(!qbevent)break;evnt(1912);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(1913);}while(r); S_1454:; if ((((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[array_check((*__LONG_U)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5])])||new_error){ if(qbevent){evnt(1914);if(r)goto S_1454;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1914);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1914);}while(r); } }else{ S_1459:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(1916);if(r)goto S_1459;} S_1460:; if ((-((*__LONG_TYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(1917);if(r)goto S_1460;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected STRING *",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1917);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1917);}while(r); } do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=*__LONG_TYPSIZE* 8 ; if(!qbevent)break;evnt(1918);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1919);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1919);}while(r); }else{ do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=*__LONG_TYP& 511 ; if(!qbevent)break;evnt(1921);}while(r); S_1469:; if ((-((*__LONG_TYP&*__LONG_ISOFFSETINBITS)== 0 ))||new_error){ if(qbevent){evnt(1922);if(r)goto S_1469;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1922);}while(r); do{ tmp_long=array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1922);}while(r); } } } S_1475:; if ((((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5])])||new_error){ if(qbevent){evnt(1927);if(r)goto S_1475;} S_1476:; if ((((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]% 8 )||new_error){ if(qbevent){evnt(1928);if(r)goto S_1476;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[tmp_long]=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]+( 8 -(((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]% 8 )); if(!qbevent)break;evnt(1929);}while(r); } } do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[tmp_long]=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]+((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]; if(!qbevent)break;evnt(1932);}while(r); S_1481:; if ((-(((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]== 0 ))||new_error){ if(qbevent){evnt(1935);if(r)goto S_1481;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1936);}while(r); }else{ do{ tmp_long=array_check((*__LONG_I2- 1 )-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTENEXT[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(1938);}while(r); } do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1943);}while(r); } S_1488:; if ((*__LONG_DEFININGTYPE&(-(*__LONG_N>= 1 )))||new_error){ if(qbevent){evnt(1947);if(r)goto S_1488;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END TYPE",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1947);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1947);}while(r); } S_1492:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(1949);if(r)goto S_1492;} S_1493:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("TYPE",4))))||new_error){ if(qbevent){evnt(1950);if(r)goto S_1493;} S_1494:; if ((-(*__LONG_N!= 2 ))||new_error){ if(qbevent){evnt(1951);if(r)goto S_1494;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected TYPE typename",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1951);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1951);}while(r); } do{ *__LONG_LASTTYPE=*__LONG_LASTTYPE+ 1 ; if(!qbevent)break;evnt(1952);}while(r); do{ *__LONG_DEFININGTYPE=*__LONG_LASTTYPE; if(!qbevent)break;evnt(1953);}while(r); do{ *__LONG_I=*__LONG_DEFININGTYPE; if(!qbevent)break;evnt(1954);}while(r); S_1501:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_SECONDELEMENT)== 0 )))||new_error){ if(qbevent){evnt(1955);if(r)goto S_1501;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1955);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1955);}while(r); } do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[tmp_long*256],256,1),__STRING_SECONDELEMENT); if(!qbevent)break;evnt(1956);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[tmp_long*256],256,1),FUNC_GETELEMENT(__STRING_CA,&(pass227= 2 ))); if(!qbevent)break;evnt(1957);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1958);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1959);}while(r); do{ qbs_set(__STRING_HASHNAME,__STRING_SECONDELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1961);}while(r); do{ *__LONG_HASHFLAGS= 256 ; if(!qbevent)break;evnt(1962);}while(r); do{ *__LONG_HASHCHKFLAGS= 8 + 64 + 128 + 256 ; if(!qbevent)break;evnt(1964);}while(r); do{ *__LONG_HASHRES=FUNC_HASHFIND(__STRING_HASHNAME,__LONG_HASHCHKFLAGS,__LONG_HASHRESFLAGS,__LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1965);}while(r); S_1513:; while((*__LONG_HASHRES)||new_error){ if(qbevent){evnt(1966);if(r)goto S_1513;} do{ *__LONG_ALLOW= 0 ; if(!qbevent)break;evnt(1967);}while(r); S_1515:; if ((*__LONG_HASHRESFLAGS&( 64 + 128 ))||new_error){ if(qbevent){evnt(1968);if(r)goto S_1515;} do{ *__LONG_ALLOW= 1 ; if(!qbevent)break;evnt(1969);}while(r); } S_1518:; if ((*__LONG_HASHRESFLAGS& 8 )||new_error){ if(qbevent){evnt(1971);if(r)goto S_1518;} S_1519:; if ((-((*__LONG_HASHRESFLAGS&( 4 + 16 + 32 + 16384 ))== 0 ))||new_error){ if(qbevent){evnt(1972);if(r)goto S_1519;} do{ *__LONG_ALLOW= 1 ; if(!qbevent)break;evnt(1972);}while(r); } } S_1523:; if ((-(*__LONG_ALLOW== 0 ))||new_error){ if(qbevent){evnt(1974);if(r)goto S_1523;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1974);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1974);}while(r); } S_1527:; if ((-(*__LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(1975);if(r)goto S_1527;} do{ *__LONG_HASHRES=FUNC_HASHFINDCONT(__LONG_HASHRESFLAGS,__LONG_HASHRESREF); if(!qbevent)break;evnt(1975);}while(r); }else{ do{ *__LONG_HASHRES= 0 ; if(!qbevent)break;evnt(1975);}while(r); } } dl_exit_228:; do{ SUB_HASHADD(__STRING_HASHNAME,__LONG_HASHFLAGS,__LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1979);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1981);}while(r); } } S_1537:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N>= 1 ))&(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CONST",5)))))||new_error){ if(qbevent){evnt(1992);if(r)goto S_1537;} do{ *__LONG_I2=func_instr(NULL,__STRING_A,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len(".",1)),__STRING1_SP),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2002);}while(r); S_1539:; if ((*__LONG_I2)||new_error){ if(qbevent){evnt(2003);if(r)goto S_1539;} S_1540:; do{ if(qbevent){evnt(2004);if(r)goto S_1540;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_I2- 1 ),__STRING_FIX046),qbs_right(__STRING_A,__STRING_A->len-*__LONG_I2- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2005);}while(r); do{ qbs_set(__STRING_CA,qbs_add(qbs_add(qbs_left(__STRING_CA,*__LONG_I2- 1 ),__STRING_FIX046),qbs_right(__STRING_CA,__STRING_CA->len-*__LONG_I2- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2006);}while(r); do{ *__LONG_I2=func_instr(NULL,__STRING_A,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len(".",1)),__STRING1_SP),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2007);}while(r); S_1544:; }while((!(-(*__LONG_I2== 0 )))&&(!new_error)); dl_exit_229:; if(qbevent){evnt(2008);if(r)goto S_1544;} do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2009);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass232= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2010);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass233= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2010);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass234= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2010);}while(r); } S_1550:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(2021);if(r)goto S_1550;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CONST name = value/expression",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2021);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2021);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(2022);}while(r); LABEL_CONSTDEFPENDINGPP:; if(qbevent){evnt(2023);r=0;} do{ *__LONG_PENDING= 0 ; if(!qbevent)break;evnt(2024);}while(r); do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2026);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2026);}while(r); do{ *__LONG_TYPEOVERRIDE= 0 ; if(!qbevent)break;evnt(2028);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2029);}while(r); S_1560:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2030);if(r)goto S_1560;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2030);}while(r); } S_1563:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2031);if(r)goto S_1563;} do{ *__LONG_TYPEOVERRIDE=FUNC_TYPNAME2TYP(__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2032);}while(r); S_1565:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2033);if(r)goto S_1565;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2033);}while(r); } S_1568:; if ((*__LONG_TYPEOVERRIDE&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(2034);if(r)goto S_1568;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2034);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2034);}while(r); } S_1572:; if ((-(*__LONG_TYPEOVERRIDE== 0 ))||new_error){ if(qbevent){evnt(2035);if(r)goto S_1572;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2035);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2035);}while(r); } } S_1577:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(2038);if(r)goto S_1577;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2038);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2038);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2039);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2042);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(2043);}while(r); S_1584:; fornext_value236=*__LONG_I; fornext_finalvalue236=*__LONG_N; fornext_step236= 1 ; if (fornext_step236<0) fornext_step_negative236=1; else fornext_step_negative236=0; if (new_error) goto fornext_error236; goto fornext_entrylabel236; while(1){ fornext_value236=fornext_step236+(*__LONG_I2); fornext_entrylabel236: *__LONG_I2=fornext_value236; if (fornext_step_negative236){ if (fornext_value236fornext_finalvalue236) break; } fornext_error236:; if(qbevent){evnt(2044);if(r)goto S_1584;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2045);}while(r); S_1586:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2046);if(r)goto S_1586;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(2046);}while(r); } S_1589:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2047);if(r)goto S_1589;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(2047);}while(r); } S_1592:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(2048);if(r)goto S_1592;} do{ *__LONG_PENDING= 1 ; if(!qbevent)break;evnt(2049);}while(r); do{ *__LONG_I=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(2050);}while(r); S_1595:; if ((-(*__LONG_I>(*__LONG_N- 2 )))||new_error){ if(qbevent){evnt(2051);if(r)goto S_1595;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CONST ... , name = value/expression",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2051);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2051);}while(r); } do{ goto fornext_exit_235; if(!qbevent)break;evnt(2052);}while(r); } S_1601:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(2054);if(r)goto S_1601;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2054);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2054);}while(r); } } fornext_exit_235:; do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2057);}while(r); S_1608:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2058);if(r)goto S_1608;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2058);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATECONST(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2060);}while(r); S_1612:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2061);if(r)goto S_1612;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2061);}while(r); } S_1615:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(2063);if(r)goto S_1615;} S_1616:; if ((*__LONG_TYPEOVERRIDE)||new_error){ if(qbevent){evnt(2065);if(r)goto S_1616;} S_1617:; if ((-((*__LONG_TYPEOVERRIDE&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(2066);if(r)goto S_1617;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2066);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2066);}while(r); } } }else{ S_1623:; if ((*__LONG_TYPEOVERRIDE)||new_error){ if(qbevent){evnt(2071);if(r)goto S_1623;} S_1624:; if ((*__LONG_TYPEOVERRIDE&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(2072);if(r)goto S_1624;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2072);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2072);}while(r); } } S_1629:; if ((*__LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(2075);if(r)goto S_1629;} do{ *__FLOAT_CONSTVAL=string2f(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2076);}while(r); do{ *__INTEGER64_CONSTVAL=qbr(*__FLOAT_CONSTVAL); if(!qbevent)break;evnt(2077);}while(r); do{ *__UINTEGER64_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2078);}while(r); }else{ S_1634:; if ((((*__LONG_T&*__LONG_ISUNSIGNED))&(-((*__LONG_T& 511 )== 64 )))||new_error){ if(qbevent){evnt(2080);if(r)goto S_1634;} do{ *__UINTEGER64_CONSTVAL=string2ui64(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2081);}while(r); do{ *__INTEGER64_CONSTVAL=*__UINTEGER64_CONSTVAL; if(!qbevent)break;evnt(2082);}while(r); do{ *__FLOAT_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2083);}while(r); }else{ do{ *__INTEGER64_CONSTVAL=string2i64(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2085);}while(r); do{ *__FLOAT_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2086);}while(r); do{ *__UINTEGER64_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2087);}while(r); } } S_1644:; if ((*__LONG_TYPEOVERRIDE)||new_error){ if(qbevent){evnt(2092);if(r)goto S_1644;} do{ *__LONG_T=*__LONG_TYPEOVERRIDE; if(!qbevent)break;evnt(2094);}while(r); } } do{ *__LONG_CONSTLAST=*__LONG_CONSTLAST+ 1 ; if(!qbevent)break;evnt(2099);}while(r); S_1649:; if ((-(*__LONG_CONSTLAST>*__LONG_CONSTMAX))||new_error){ if(qbevent){evnt(2100);if(r)goto S_1649;} do{ *__LONG_CONSTMAX=*__LONG_CONSTMAX* 2 ; if(!qbevent)break;evnt(2101);}while(r); do{ if (__ARRAY_STRING_CONSTNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CONSTNAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTNAME[2]&1){ preserved_elements=__ARRAY_STRING_CONSTNAME[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTNAME[4]= 0 ; __ARRAY_STRING_CONSTNAME[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTNAME[4]+1; __ARRAY_STRING_CONSTNAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTNAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTCNAME[2]&1){ preserved_elements=__ARRAY_STRING_CONSTCNAME[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTCNAME[4]= 0 ; __ARRAY_STRING_CONSTCNAME[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTCNAME[4]+1; __ARRAY_STRING_CONSTCNAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTCNAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTNAMESYMBOL[2]&1){ preserved_elements=__ARRAY_STRING_CONSTNAMESYMBOL[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTNAMESYMBOL[4]= 0 ; __ARRAY_STRING_CONSTNAMESYMBOL[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTNAMESYMBOL[4]+1; __ARRAY_STRING_CONSTNAMESYMBOL[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTNAMESYMBOL[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_CONSTTYPE[2]&1){ preserved_elements=__ARRAY_LONG_CONSTTYPE[5]; } else preserved_elements=0; __ARRAY_LONG_CONSTTYPE[4]= 0 ; __ARRAY_LONG_CONSTTYPE[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTTYPE[4]+1; __ARRAY_LONG_CONSTTYPE[6]=1; if (__ARRAY_LONG_CONSTTYPE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_CONSTTYPE[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTTYPE[0])); tmp_long=__ARRAY_LONG_CONSTTYPE[5]; __ARRAY_LONG_CONSTTYPE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_CONSTTYPE[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER64_CONSTINTEGER[2]&1){ preserved_elements=__ARRAY_INTEGER64_CONSTINTEGER[5]; } else preserved_elements=0; __ARRAY_INTEGER64_CONSTINTEGER[4]= 0 ; __ARRAY_INTEGER64_CONSTINTEGER[5]=(*__LONG_CONSTMAX)-__ARRAY_INTEGER64_CONSTINTEGER[4]+1; __ARRAY_INTEGER64_CONSTINTEGER[6]=1; if (__ARRAY_INTEGER64_CONSTINTEGER[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER64_CONSTINTEGER[0]),preserved_elements*8); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER64_CONSTINTEGER[0])); tmp_long=__ARRAY_INTEGER64_CONSTINTEGER[5]; __ARRAY_INTEGER64_CONSTINTEGER[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*8); memcpy((void*)(__ARRAY_INTEGER64_CONSTINTEGER[0]),redim_preserve_cmem_buffer,preserved_elements*8); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&1){ preserved_elements=__ARRAY_UINTEGER64_CONSTUINTEGER[5]; } else preserved_elements=0; __ARRAY_UINTEGER64_CONSTUINTEGER[4]= 0 ; __ARRAY_UINTEGER64_CONSTUINTEGER[5]=(*__LONG_CONSTMAX)-__ARRAY_UINTEGER64_CONSTUINTEGER[4]+1; __ARRAY_UINTEGER64_CONSTUINTEGER[6]=1; if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]),preserved_elements*8); cmem_dynamic_free((uint8*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0])); tmp_long=__ARRAY_UINTEGER64_CONSTUINTEGER[5]; __ARRAY_UINTEGER64_CONSTUINTEGER[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*8); memcpy((void*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]),redim_preserve_cmem_buffer,preserved_elements*8); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_FLOAT_CONSTFLOAT[2]&1){ preserved_elements=__ARRAY_FLOAT_CONSTFLOAT[5]; } else preserved_elements=0; __ARRAY_FLOAT_CONSTFLOAT[4]= 0 ; __ARRAY_FLOAT_CONSTFLOAT[5]=(*__LONG_CONSTMAX)-__ARRAY_FLOAT_CONSTFLOAT[4]+1; __ARRAY_FLOAT_CONSTFLOAT[6]=1; if (__ARRAY_FLOAT_CONSTFLOAT[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_FLOAT_CONSTFLOAT[0]),preserved_elements*32); cmem_dynamic_free((uint8*)(__ARRAY_FLOAT_CONSTFLOAT[0])); tmp_long=__ARRAY_FLOAT_CONSTFLOAT[5]; __ARRAY_FLOAT_CONSTFLOAT[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*32); memcpy((void*)(__ARRAY_FLOAT_CONSTFLOAT[0]),redim_preserve_cmem_buffer,preserved_elements*32); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTSTRING[2]&1){ preserved_elements=__ARRAY_STRING_CONSTSTRING[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTSTRING[4]= 0 ; __ARRAY_STRING_CONSTSTRING[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTSTRING[4]+1; __ARRAY_STRING_CONSTSTRING[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTSTRING[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_CONSTSUBFUNC[2]&1){ preserved_elements=__ARRAY_LONG_CONSTSUBFUNC[5]; } else preserved_elements=0; __ARRAY_LONG_CONSTSUBFUNC[4]= 0 ; __ARRAY_LONG_CONSTSUBFUNC[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTSUBFUNC[4]+1; __ARRAY_LONG_CONSTSUBFUNC[6]=1; if (__ARRAY_LONG_CONSTSUBFUNC[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_CONSTSUBFUNC[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTSUBFUNC[0])); tmp_long=__ARRAY_LONG_CONSTSUBFUNC[5]; __ARRAY_LONG_CONSTSUBFUNC[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_CONSTSUBFUNC[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_CONSTDEFINED[2]&1){ preserved_elements=__ARRAY_LONG_CONSTDEFINED[5]; } else preserved_elements=0; __ARRAY_LONG_CONSTDEFINED[4]= 0 ; __ARRAY_LONG_CONSTDEFINED[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTDEFINED[4]+1; __ARRAY_LONG_CONSTDEFINED[6]=1; if (__ARRAY_LONG_CONSTDEFINED[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_CONSTDEFINED[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTDEFINED[0])); tmp_long=__ARRAY_LONG_CONSTDEFINED[5]; __ARRAY_LONG_CONSTDEFINED[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_CONSTDEFINED[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementslen-*__LONG_I2- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2239);}while(r); do{ qbs_set(__STRING_CA,qbs_add(qbs_add(qbs_left(__STRING_CA,*__LONG_I2- 1 ),__STRING_FIX046),qbs_right(__STRING_CA,__STRING_CA->len-*__LONG_I2- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2240);}while(r); do{ *__LONG_I2=func_instr(NULL,__STRING_A,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len(".",1)),__STRING1_SP),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2241);}while(r); S_1786:; }while((!(-(*__LONG_I2== 0 )))&&(!new_error)); dl_exit_241:; if(qbevent){evnt(2242);if(r)goto S_1786;} do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2243);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass244= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2244);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass245= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2244);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass246= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2244);}while(r); } do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,&(pass247= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2247);}while(r); do{ qbs_set(__STRING_SYMBOL,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2248);}while(r); S_1794:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2249);if(r)goto S_1794;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2249);}while(r); } S_1797:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_SF== 2 ))&(qbs_notequal(__STRING_SYMBOL,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(2250);if(r)goto S_1797;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type symbols after a SUB name are invalid",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2250);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2250);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2253);}while(r); S_1802:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(2253);if(r)goto S_1802;} do{ qbs_set(__STRING_A,qbs_left(__STRING_A,__STRING_A->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2253);}while(r); do{ qbs_set(__STRING_CA,qbs_left(__STRING_CA,__STRING_CA->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2253);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(2253);}while(r); } do{ qbs_set(__STRING_ALIASNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2256);}while(r); S_1808:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(2257);if(r)goto S_1808;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass250= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2258);}while(r); S_1810:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("ALIAS",5))))||new_error){ if(qbevent){evnt(2259);if(r)goto S_1810;} S_1811:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2260);if(r)goto S_1811;} do{ qbs_set(__STRING_A,qbs_new_txt_len("ALIAS can only be used with DECLARE LIBRARY",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2260);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2260);}while(r); } S_1815:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(2261);if(r)goto S_1815;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ALIAS name-in-library",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2261);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2261);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,&(pass251= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2262);}while(r); S_1820:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_E, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(2264);if(r)goto S_1820;} do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2265);}while(r); do{ *__LONG_X=func_instr(NULL,__STRING_E,func_chr( 34 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2266);}while(r); S_1823:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(2266);if(r)goto S_1823;} do{ qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Expected ",9),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2266);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2266);}while(r); } do{ qbs_set(__STRING_E,qbs_left(__STRING_E,*__LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2267);}while(r); } S_1829:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_E,__STRING_FIX046,0)))||new_error){ if(qbevent){evnt(2270);if(r)goto S_1829;} do{ *__LONG_X=func_instr(NULL,__STRING_E,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2271);}while(r); do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_left(__STRING_E,*__LONG_X- 1 ),qbs_new_txt_len(".",1)),qbs_right(__STRING_E,__STRING_E->len-*__LONG_X+ 1 -__STRING_FIX046->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2271);}while(r); } dl_exit_253:; S_1833:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(2274);if(r)goto S_1833;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ALIAS name-in-library",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2274);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2274);}while(r); } S_1837:; fornext_value258= 1 ; fornext_finalvalue258=__STRING_E->len; fornext_step258= 1 ; if (fornext_step258<0) fornext_step_negative258=1; else fornext_step_negative258=0; if (new_error) goto fornext_error258; goto fornext_entrylabel258; while(1){ fornext_value258=fornext_step258+(*__LONG_X); fornext_entrylabel258: *__LONG_X=fornext_value258; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative258){ if (fornext_value258fornext_finalvalue258) break; } fornext_error258:; if(qbevent){evnt(2275);if(r)goto S_1837;} do{ *__LONG_A=qbs_asc(__STRING_E,*__LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2276);}while(r); S_1839:; if (((-(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((*__LONG_A)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]== 0 ))&(-(*__LONG_A!= 46 ))&(-(*__LONG_A!= 58 )))||new_error){ if(qbevent){evnt(2277);if(r)goto S_1839;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ALIAS name-in-library",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2277);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2277);}while(r); } } fornext_exit_257:; do{ qbs_set(__STRING_ALIASNAME,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2279);}while(r); S_1845:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(2281);if(r)goto S_1845;} do{ qbs_set(__STRING_A,FUNC_GETELEMENTS(__STRING_A,&(pass260= 1 ),&(pass261= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2281);}while(r); } S_1848:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(2282);if(r)goto S_1848;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_A,&(pass262= 1 ),&(pass263= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_A,&(pass264= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2282);}while(r); } S_1851:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(2283);if(r)goto S_1851;} do{ qbs_set(__STRING_CA,FUNC_GETELEMENTS(__STRING_CA,&(pass265= 1 ),&(pass266= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2283);}while(r); } S_1854:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(2284);if(r)goto S_1854;} do{ qbs_set(__STRING_CA,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_CA,&(pass267= 1 ),&(pass268= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass269= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2284);}while(r); } do{ *__LONG_N=*__LONG_N- 2 ; if(!qbevent)break;evnt(2285);}while(r); } } S_1860:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2289);if(r)goto S_1860;} S_1861:; if ((*__LONG_INDIRECTLIBRARY)||new_error){ if(qbevent){evnt(2290);if(r)goto S_1861;} do{ qbs_set(__STRING_ALIASNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2291);}while(r); } } do{ *__LONG_PARAMS= 0 ; if(!qbevent)break;evnt(2295);}while(r); do{ qbs_set(__STRING_PARAMS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2296);}while(r); do{ qbs_set(__STRING_PARAMSIZE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2297);}while(r); do{ qbs_set(__STRING_NELE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2298);}while(r); do{ qbs_set(__STRING_NELEREQ,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2299);}while(r); S_1870:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(2300);if(r)goto S_1870;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass270= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2301);}while(r); S_1872:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2302);if(r)goto S_1872;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2302);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2302);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2303);}while(r); S_1877:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2304);if(r)goto S_1877;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2304);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2304);}while(r); } S_1881:; if ((-(*__LONG_N< 4 ))||new_error){ if(qbevent){evnt(2305);if(r)goto S_1881;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2305);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2305);}while(r); } S_1885:; if ((-(*__LONG_N== 4 ))||new_error){ if(qbevent){evnt(2306);if(r)goto S_1885;} do{ goto LABEL_NOSFPARAMS; if(!qbevent)break;evnt(2306);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(2307);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2308);}while(r); S_1890:; fornext_value272= 4 ; fornext_finalvalue272=*__LONG_N- 1 ; fornext_step272= 1 ; if (fornext_step272<0) fornext_step_negative272=1; else fornext_step_negative272=0; if (new_error) goto fornext_error272; goto fornext_entrylabel272; while(1){ fornext_value272=fornext_step272+(*__LONG_I); fornext_entrylabel272: *__LONG_I=fornext_value272; if (fornext_step_negative272){ if (fornext_value272fornext_finalvalue272) break; } fornext_error272:; if(qbevent){evnt(2309);if(r)goto S_1890;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2310);}while(r); S_1892:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2311);if(r)goto S_1892;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(2311);}while(r); } S_1895:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2312);if(r)goto S_1895;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(2312);}while(r); } S_1898:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(2313);if(r)goto S_1898;} S_1899:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(2314);if(r)goto S_1899;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2314);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2314);}while(r); } LABEL_GETLASTPARAM:; if(qbevent){evnt(2315);r=0;} S_1903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2316);if(r)goto S_1903;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2316);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2316);}while(r); } do{ qbs_set(__STRING_A2,qbs_left(__STRING_A2,__STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2317);}while(r); do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2319);}while(r); do{ *__LONG_ARRAY= 0 ; if(!qbevent)break;evnt(2320);}while(r); do{ qbs_set(__STRING_T2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2321);}while(r); do{ *__LONG_I2= 1 ; if(!qbevent)break;evnt(2323);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2324);}while(r); do{ *__LONG_I2=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(2324);}while(r); do{ *__LONG_BYVALUE= 0 ; if(!qbevent)break;evnt(2326);}while(r); S_1915:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("BYVAL",5))))||new_error){ if(qbevent){evnt(2327);if(r)goto S_1915;} S_1916:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2328);if(r)goto S_1916;} do{ qbs_set(__STRING_A,qbs_new_txt_len("BYVAL can currently only be used with DECLARE LIBRARY",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2328);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2328);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2329);}while(r); do{ *__LONG_I2=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(2329);}while(r); do{ *__LONG_BYVALUE= 1 ; if(!qbevent)break;evnt(2329);}while(r); } do{ qbs_set(__STRING_N2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2332);}while(r); do{ qbs_set(__STRING_SYMBOL2,FUNC_REMOVESYMBOL(__STRING_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2333);}while(r); S_1926:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_N2)== 0 )))||new_error){ if(qbevent){evnt(2334);if(r)goto S_1926;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2334);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2334);}while(r); } S_1930:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2336);if(r)goto S_1930;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2336);}while(r); } do{ *__LONG_M= 0 ; if(!qbevent)break;evnt(2337);}while(r); S_1934:; fornext_value275=*__LONG_I2; fornext_finalvalue275=*__LONG_N2; fornext_step275= 1 ; if (fornext_step275<0) fornext_step_negative275=1; else fornext_step_negative275=0; if (new_error) goto fornext_error275; goto fornext_entrylabel275; while(1){ fornext_value275=fornext_step275+(*__LONG_I2); fornext_entrylabel275: *__LONG_I2=fornext_value275; if (fornext_step_negative275){ if (fornext_value275fornext_finalvalue275) break; } fornext_error275:; if(qbevent){evnt(2338);if(r)goto S_1934;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2339);}while(r); S_1936:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2340);if(r)goto S_1936;} S_1937:; if ((-(*__LONG_M!= 0 ))||new_error){ if(qbevent){evnt(2341);if(r)goto S_1937;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2341);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2341);}while(r); } do{ *__LONG_M= 1 ; if(!qbevent)break;evnt(2342);}while(r); do{ *__LONG_ARRAY= 1 ; if(!qbevent)break;evnt(2343);}while(r); do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2344);}while(r); } S_1945:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2346);if(r)goto S_1945;} S_1946:; if ((-(*__LONG_M!= 1 ))||new_error){ if(qbevent){evnt(2347);if(r)goto S_1946;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2347);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2347);}while(r); } do{ *__LONG_M= 2 ; if(!qbevent)break;evnt(2348);}while(r); do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2349);}while(r); } S_1953:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(2351);if(r)goto S_1953;} S_1954:; if (((-(*__LONG_M!= 0 ))&(-(*__LONG_M!= 2 )))||new_error){ if(qbevent){evnt(2352);if(r)goto S_1954;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2352);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2352);}while(r); } do{ *__LONG_M= 3 ; if(!qbevent)break;evnt(2353);}while(r); do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2354);}while(r); } S_1961:; if ((-(*__LONG_M== 1 ))||new_error){ if(qbevent){evnt(2356);if(r)goto S_1961;} do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2356);}while(r); } S_1964:; if ((-(*__LONG_M!= 3 ))||new_error){ if(qbevent){evnt(2357);if(r)goto S_1964;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2357);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2357);}while(r); } S_1968:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2358);if(r)goto S_1968;} do{ qbs_set(__STRING_T2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2358);}while(r); }else{ do{ qbs_set(__STRING_T2,qbs_add(qbs_add(__STRING_T2,qbs_new_txt_len(" ",1)),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2358);}while(r); } LABEL_GOTAA:; if(qbevent){evnt(2359);r=0;} } fornext_exit_274:; do{ *__LONG_PARAMS=*__LONG_PARAMS+ 1 ; if(!qbevent)break;evnt(2362);}while(r); S_1975:; if ((-(*__LONG_PARAMS> 100 ))||new_error){ if(qbevent){evnt(2362);if(r)goto S_1975;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB/FUNCTION exceeds 100 parameter limit",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2362);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2362);}while(r); } do{ *__LONG_ARGNELEREQ= 0 ; if(!qbevent)break;evnt(2364);}while(r); S_1980:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_SYMBOL2,qbs_new_txt_len("",0)))&(qbs_notequal(__STRING_T2,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(2366);if(r)goto S_1980;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2366);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2366);}while(r); } S_1984:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2367);if(r)goto S_1984;} do{ qbs_set(__STRING_T2,__STRING_SYMBOL2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2367);}while(r); } S_1987:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2368);if(r)goto S_1987;} S_1988:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N2, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(2369);if(r)goto S_1988;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(2369);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N2))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2369);}while(r); } do{ qbs_set(__STRING_T2,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[array_check((*__LONG_V)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2370);}while(r); } do{ *__LONG_PARAMSIZE= 0 ; if(!qbevent)break;evnt(2373);}while(r); S_1996:; if ((-(*__LONG_ARRAY== 1 ))||new_error){ if(qbevent){evnt(2374);if(r)goto S_1996;} do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2375);}while(r); S_1998:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2376);if(r)goto S_1998;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2376);}while(r); } S_2001:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(2377);if(r)goto S_2001;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Illegal SUB/FUNCTION parameter",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2377);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2377);}while(r); } S_2005:; if (((*__LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(2378);if(r)goto S_2005;} do{ *__LONG_PARAMSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(2378);}while(r); } do{ *__LONG_T=*__LONG_T+*__LONG_ISARRAY; if(!qbevent)break;evnt(2379);}while(r); S_2009:; fornext_value277= 0 ; fornext_finalvalue277=*__INTEGER_SFLISTN; fornext_step277= 1 ; if (fornext_step277<0) fornext_step_negative277=1; else fornext_step_negative277=0; if (new_error) goto fornext_error277; goto fornext_entrylabel277; while(1){ fornext_value277=fornext_step277+(*__LONG_I10); fornext_entrylabel277: *__LONG_I10=fornext_value277; if (fornext_step_negative277){ if (fornext_value277fornext_finalvalue277) break; } fornext_error277:; if(qbevent){evnt(2381);if(r)goto S_2009;} S_2010:; if ((-(((int32*)(__ARRAY_LONG_SFIDLIST[0]))[array_check((*__LONG_I10)-__ARRAY_LONG_SFIDLIST[4],__ARRAY_LONG_SFIDLIST[5])]==(*__LONG_IDN+ 1 )))||new_error){ if(qbevent){evnt(2382);if(r)goto S_2010;} S_2011:; if ((-(((int16*)(__ARRAY_INTEGER_SFARGLIST[0]))[array_check((*__LONG_I10)-__ARRAY_INTEGER_SFARGLIST[4],__ARRAY_INTEGER_SFARGLIST[5])]==*__LONG_PARAMS))||new_error){ if(qbevent){evnt(2383);if(r)goto S_2011;} do{ *__LONG_ARGNELEREQ=((int16*)(__ARRAY_INTEGER_SFELELIST[0]))[array_check((*__LONG_I10)-__ARRAY_INTEGER_SFELELIST[4],__ARRAY_INTEGER_SFELELIST[5])]; if(!qbevent)break;evnt(2384);}while(r); } } } fornext_exit_276:; }else{ do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2389);}while(r); S_2018:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2390);if(r)goto S_2018;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2390);}while(r); } S_2021:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(2391);if(r)goto S_2021;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Illegal SUB/FUNCTION parameter",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2391);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2391);}while(r); } S_2025:; if (((*__LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(2392);if(r)goto S_2025;} do{ *__LONG_PARAMSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(2392);}while(r); } S_2028:; if ((*__LONG_BYVALUE)||new_error){ if(qbevent){evnt(2394);if(r)goto S_2028;} S_2029:; if ((*__LONG_T&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(2395);if(r)goto S_2029;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(2395);}while(r); } } } do{ qbs_set(__STRING_NELEREQ,qbs_add(__STRING_NELEREQ,func_chr(*__LONG_ARGNELEREQ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2399);}while(r); do{ qbs_set(__STRING_NELE,qbs_add(__STRING_NELE,func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2402);}while(r); do{ qbs_set(__STRING_PARAMSIZE,qbs_add(__STRING_PARAMSIZE,l2string(*__LONG_PARAMSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2404);}while(r); do{ qbs_set(__STRING_PARAMS,qbs_add(__STRING_PARAMS,l2string(*__LONG_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2405);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2406);}while(r); }else{ do{ qbs_set(__STRING_A2,qbs_add(qbs_add(__STRING_A2,__STRING_E),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2408);}while(r); S_2041:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(2409);if(r)goto S_2041;} do{ goto LABEL_GETLASTPARAM; if(!qbevent)break;evnt(2409);}while(r); } } } fornext_exit_271:; } LABEL_NOSFPARAMS:; if(qbevent){evnt(2413);r=0;} S_2047:; if ((-(*__LONG_SF== 1 ))||new_error){ if(qbevent){evnt(2415);if(r)goto S_2047;} do{ SUB_CLEARID(); if(!qbevent)break;evnt(2417);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),__STRING_N); if(!qbevent)break;evnt(2418);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(2419);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_add(qbs_new_txt_len("FUNC_",5),qbs_ucase(__STRING_N))); if(!qbevent)break;evnt(2421);}while(r); S_2052:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2422);if(r)goto S_2052;} do{ *(int16*)(((char*)__UDT_ID)+(806))= 1 ; if(!qbevent)break;evnt(2423);}while(r); S_2054:; if ((-(*__LONG_INDIRECTLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2424);if(r)goto S_2054;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),__STRING_ALIASNAME); if(!qbevent)break;evnt(2424);}while(r); } } do{ *(int16*)(((char*)__UDT_ID)+(808))=*__LONG_PARAMS; if(!qbevent)break;evnt(2426);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),__STRING_PARAMS); if(!qbevent)break;evnt(2427);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1210)),400,1),__STRING_PARAMSIZE); if(!qbevent)break;evnt(2428);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2644)),100,1),__STRING_NELE); if(!qbevent)break;evnt(2429);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2744)),100,1),__STRING_NELEREQ); if(!qbevent)break;evnt(2430);}while(r); S_2063:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SYMBOL,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2431);if(r)goto S_2063;} do{ *(int32*)(((char*)__UDT_ID)+(2378))=FUNC_TYPNAME2TYP(__STRING_SYMBOL); if(!qbevent)break;evnt(2432);}while(r); S_2065:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2433);if(r)goto S_2065;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2433);}while(r); } }else{ S_2069:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(2435);if(r)goto S_2069;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(2435);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2435);}while(r); } do{ qbs_set(__STRING_SYMBOL,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[array_check((*__LONG_V)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2436);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=FUNC_TYPNAME2TYP(__STRING_SYMBOL); if(!qbevent)break;evnt(2437);}while(r); S_2076:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2438);if(r)goto S_2076;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2438);}while(r); } } S_2080:; if ((-(*(int32*)(((char*)__UDT_ID)+(2378))== 0 ))||new_error){ if(qbevent){evnt(2440);if(r)goto S_2080;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid FUNCTION return type",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2440);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2440);}while(r); } S_2084:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2442);if(r)goto S_2084;} do{ qbs_set(__STRING_CTYPE,FUNC_TYP2CTYP((int32*)(void*)( ((char*)(__UDT_ID)) + (2378) ),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2444);}while(r); S_2086:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2445);if(r)goto S_2086;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2445);}while(r); } S_2089:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CTYPE,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(2446);if(r)goto S_2089;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("char*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2446);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("( ",3),__STRING_CTYPE),qbs_new_txt_len(" )",3)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))); if(!qbevent)break;evnt(2447);}while(r); } do{ qbs_set(__STRING_S,qbs_left(__STRING_SYMBOL, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2451);}while(r); S_2095:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_S,qbs_new_txt_len("~",1)))&(qbs_notequal(__STRING_S,qbs_new_txt_len("`",1)))&(qbs_notequal(__STRING_S,qbs_new_txt_len("%",1)))&(qbs_notequal(__STRING_S,qbs_new_txt_len("&",1)))&(qbs_notequal(__STRING_S,qbs_new_txt_len("!",1)))&(qbs_notequal(__STRING_S,qbs_new_txt_len("#",1)))&(qbs_notequal(__STRING_S,qbs_new_txt_len("$",1)))))||new_error){ if(qbevent){evnt(2452);if(r)goto S_2095;} do{ qbs_set(__STRING_SYMBOL,FUNC_TYPE2SYMBOL(__STRING_SYMBOL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2453);}while(r); S_2097:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2454);if(r)goto S_2097;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2454);}while(r); } } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),__STRING_SYMBOL); if(!qbevent)break;evnt(2456);}while(r); S_2102:; if ((*(int32*)(((char*)__UDT_ID)+(2378))&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(2457);if(r)goto S_2102;} S_2103:; if ((-((*(int32*)(((char*)__UDT_ID)+(2378))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(2458);if(r)goto S_2103;} do{ *(int32*)(((char*)__UDT_ID)+(2378))=*(int32*)(((char*)__UDT_ID)+(2378))-*__LONG_ISPOINTER; if(!qbevent)break;evnt(2458);}while(r); } } do{ SUB_REGID(); if(!qbevent)break;evnt(2460);}while(r); S_2108:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2461);if(r)goto S_2108;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2461);}while(r); } }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(2464);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),__STRING_N); if(!qbevent)break;evnt(2465);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(2466);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_add(qbs_new_txt_len("SUB_",4),qbs_ucase(__STRING_N))); if(!qbevent)break;evnt(2467);}while(r); S_2116:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2468);if(r)goto S_2116;} do{ *(int16*)(((char*)__UDT_ID)+(806))= 1 ; if(!qbevent)break;evnt(2469);}while(r); S_2118:; if ((-(*__LONG_INDIRECTLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2470);if(r)goto S_2118;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),__STRING_ALIASNAME); if(!qbevent)break;evnt(2470);}while(r); } } do{ *(int16*)(((char*)__UDT_ID)+(808))=*__LONG_PARAMS; if(!qbevent)break;evnt(2472);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),__STRING_PARAMS); if(!qbevent)break;evnt(2473);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1210)),400,1),__STRING_PARAMSIZE); if(!qbevent)break;evnt(2474);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2644)),100,1),__STRING_NELE); if(!qbevent)break;evnt(2475);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2744)),100,1),__STRING_NELEREQ); if(!qbevent)break;evnt(2476);}while(r); S_2127:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_N),qbs_new_txt_len("_GL",3)))&(-(*__LONG_PARAMS== 0 ))&(-(*__LONG_USEGL== 0 ))))||new_error){ if(qbevent){evnt(2478);if(r)goto S_2127;} do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(2478);}while(r); do{ *__LONG_USEGL= 1 ; if(!qbevent)break;evnt(2478);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_GL",3)); if(!qbevent)break;evnt(2478);}while(r); do{ tmp_long=array_check(( 5 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(2478);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(2479);}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(2480);}while(r); S_2135:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2482);if(r)goto S_2135;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2482);}while(r); } } } LABEL_FINISHEDLINEPP:; if(qbevent){evnt(2489);r=0;} } do{ qbs_set(__STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2491);}while(r); do{ qbs_set(__STRING_CA,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2492);}while(r); }else{ S_2144:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2494);if(r)goto S_2144;} do{ qbs_set(__STRING_A,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2494);}while(r); do{ qbs_set(__STRING_CA,__STRING_CE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2494);}while(r); }else{ do{ qbs_set(__STRING_A,qbs_add(qbs_add(__STRING_A,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2494);}while(r); do{ qbs_set(__STRING_CA,qbs_add(qbs_add(__STRING_CA,__STRING1_SP),__STRING_CE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2494);}while(r); } } S_2152:; if ((-(*__LONG_WHOLELINEI<=*__LONG_WHOLELINEN))||new_error){ if(qbevent){evnt(2496);if(r)goto S_2152;} do{ *__LONG_WHOLELINEI=*__LONG_WHOLELINEI+ 1 ; if(!qbevent)break;evnt(2496);}while(r); do{ goto LABEL_PPBLDA; if(!qbevent)break;evnt(2496);}while(r); } } } } S_2159:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ADDMETAINCLUDE->len))||new_error){ if(qbevent){evnt(2506);if(r)goto S_2159;} S_2160:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(2507);if(r)goto S_2160;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip279; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("Pre-pass:INCLUDE$-ing file:'",28),__STRING_ADDMETAINCLUDE),qbs_new_txt_len("':On line",9)), 0 , 0 , 0 ); if (new_error) goto skip279; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_LINENUMBER)), 1 , 0 , 1 ); if (new_error) goto skip279; skip279: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2507);}while(r); } do{ qbs_set(__STRING_A,__STRING_ADDMETAINCLUDE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2508);}while(r); do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2508);}while(r); S_2165:; if ((-(*__LONG_INCLEVEL== 100 ))||new_error){ if(qbevent){evnt(2509);if(r)goto S_2165;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many indwelling INCLUDE files",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2509);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2509);}while(r); } do{ *__LONG_FH= 99 +*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(2511);}while(r); S_2170:; fornext_value281= 1 ; fornext_finalvalue281= 2 ; fornext_step281= 1 ; if (fornext_step281<0) fornext_step_negative281=1; else fornext_step_negative281=0; if (new_error) goto fornext_error281; goto fornext_entrylabel281; while(1){ fornext_value281=fornext_step281+(*__LONG_TRY); fornext_entrylabel281: *__LONG_TRY=fornext_value281; if (fornext_step_negative281){ if (fornext_value281fornext_finalvalue281) break; } fornext_error281:; if(qbevent){evnt(2512);if(r)goto S_2170;} S_2171:; if ((-(*__LONG_TRY== 1 ))||new_error){ if(qbevent){evnt(2513);if(r)goto S_2171;} S_2172:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(2514);if(r)goto S_2172;} S_2173:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2515);if(r)goto S_2173;} do{ qbs_set(__STRING_P,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2515);}while(r); }else{ do{ qbs_set(__STRING_P,FUNC_GETFILEPATH(__STRING_SOURCEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2515);}while(r); } }else{ do{ qbs_set(__STRING_P,FUNC_GETFILEPATH(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2517);}while(r); } do{ qbs_set(__STRING_F,qbs_add(__STRING_P,__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2519);}while(r); } S_2183:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(2521);if(r)goto S_2183;} do{ qbs_set(__STRING_F,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2521);}while(r); } do{ *__INTEGER_QBERRORHAPPENED= -3 ; if(!qbevent)break;evnt(2522);}while(r); do{ sub_open(__STRING_F, 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2523);}while(r); LABEL_QBERRORHAPPENED3:; if(qbevent){evnt(2524);r=0;} S_2188:; if ((-(*__INTEGER_QBERRORHAPPENED== -3 ))||new_error){ if(qbevent){evnt(2525);if(r)goto S_2188;} do{ goto fornext_exit_280; if(!qbevent)break;evnt(2525);}while(r); } do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(2526);}while(r); } fornext_exit_280:; S_2193:; if ((-(*__INTEGER_QBERRORHAPPENED!= -3 ))||new_error){ if(qbevent){evnt(2528);if(r)goto S_2193;} do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(2528);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("File ",5),__STRING_A),qbs_new_txt_len(" not found",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2528);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2528);}while(r); } do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(2529);}while(r); do{ tmp_long=array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[tmp_long])),__STRING_F); if(!qbevent)break;evnt(2529);}while(r); do{ tmp_long=array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5]); if (!new_error) ((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(2529);}while(r); } S_2202:; while((*__LONG_INCLEVEL)||new_error){ if(qbevent){evnt(2532);if(r)goto S_2202;} do{ *__LONG_FH= 99 +*__LONG_INCLEVEL; if(!qbevent)break;evnt(2534);}while(r); S_2204:; if ((-(func_eof(*__LONG_FH)== 0 ))||new_error){ if(qbevent){evnt(2536);if(r)goto S_2204;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip283; sub_file_line_input_string(tmp_fileno,__STRING_X); if (new_error) goto skip283; skip283: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2537);}while(r); do{ qbs_set(__STRING_WHOLELINE,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2538);}while(r); do{ tmp_long=array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5]); if (!new_error) ((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[tmp_long]=((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]+ 1 ; if(!qbevent)break;evnt(2539);}while(r); do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" in line ",9),FUNC_STR2((&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])))),qbs_new_txt_len(" of ",4)),((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])]))),qbs_new_txt_len(" included",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2541);}while(r); S_2209:; if ((-(*__LONG_INCLEVEL> 1 ))||new_error){ if(qbevent){evnt(2542);if(r)goto S_2209;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(" (through ",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2543);}while(r); S_2211:; fornext_value285= 1 ; fornext_finalvalue285=*__LONG_INCLEVEL- 1 ; fornext_step285= 1 ; if (fornext_step285<0) fornext_step_negative285=1; else fornext_step_negative285=0; if (new_error) goto fornext_error285; goto fornext_entrylabel285; while(1){ fornext_value285=fornext_step285+(*__LONG_X); fornext_entrylabel285: *__LONG_X=fornext_value285; if (fornext_step_negative285){ if (fornext_value285fornext_finalvalue285) break; } fornext_error285:; if(qbevent){evnt(2544);if(r)goto S_2211;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2545);}while(r); S_2213:; if ((-(*__LONG_X<(*__LONG_INCLEVEL- 1 )))||new_error){ if(qbevent){evnt(2546);if(r)goto S_2213;} S_2214:; if ((-(*__LONG_X==(*__LONG_INCLEVEL- 2 )))||new_error){ if(qbevent){evnt(2547);if(r)goto S_2214;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(" then ",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2548);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(", ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2550);}while(r); } } } fornext_exit_284:; do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2554);}while(r); } do{ qbs_set(__STRING_INCERROR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2556);}while(r); do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER- 1 ; if(!qbevent)break;evnt(2557);}while(r); S_2225:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(2559);if(r)goto S_2225;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip286; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("Pre-pass:Feeding INCLUDE$ line:[",32),__STRING_WHOLELINE),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip286; skip286: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2559);}while(r); } S_2228:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2560);if(r)goto S_2228;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 10 ),__STRING_WHOLELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2560);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(2560);}while(r); } do{ goto LABEL_IDEPREPASS; if(!qbevent)break;evnt(2561);}while(r); } do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(2564);}while(r); do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL- 1 ; if(!qbevent)break;evnt(2565);}while(r); } dl_exit_282:; S_2237:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2571);if(r)goto S_2237;} do{ goto LABEL_IDERET2; if(!qbevent)break;evnt(2571);}while(r); } }while(1); dl_exit_210:; S_2241:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(2573);if(r)goto S_2241;} do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(2573);}while(r); } S_2244:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2574);if(r)goto S_2244;} do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(2574);}while(r); } do{ *__LONG_LINEINPUT3INDEX= 1 ; if(!qbevent)break;evnt(2578);}while(r); LABEL_IDE3:; if(qbevent){evnt(2581);r=0;} do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2584);}while(r); do{ *__LONG_DATAOFFSET= 0 ; if(!qbevent)break;evnt(2587);}while(r); do{ *__LONG_INCLEVEL= 0 ; if(!qbevent)break;evnt(2588);}while(r); do{ *__LONG_SUBFUNCN= 0 ; if(!qbevent)break;evnt(2589);}while(r); S_2252:; fornext_value288= 0 ; fornext_finalvalue288=*__LONG_CONSTLAST; fornext_step288= 1 ; if (fornext_step288<0) fornext_step_negative288=1; else fornext_step_negative288=0; if (new_error) goto fornext_error288; goto fornext_entrylabel288; while(1){ fornext_value288=fornext_step288+(*__LONG_I); fornext_entrylabel288: *__LONG_I=fornext_value288; if (fornext_step_negative288){ if (fornext_value288fornext_finalvalue288) break; } fornext_error288:; if(qbevent){evnt(2591);if(r)goto S_2252;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_CONSTDEFINED[4],__ARRAY_LONG_CONSTDEFINED[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONSTDEFINED[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(2591);}while(r); } fornext_exit_287:; S_2255:; fornext_value290= 1 ; fornext_finalvalue290= 27 ; fornext_step290= 1 ; if (fornext_step290<0) fornext_step_negative290=1; else fornext_step_negative290=0; if (new_error) goto fornext_error290; goto fornext_entrylabel290; while(1){ fornext_value290=fornext_step290+(*__LONG_I); fornext_entrylabel290: *__LONG_I=fornext_value290; if (fornext_step_negative290){ if (fornext_value290fornext_finalvalue290) break; } fornext_error290:; if(qbevent){evnt(2593);if(r)goto S_2255;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[tmp_long])),qbs_new_txt_len("SINGLE",6)); if(!qbevent)break;evnt(2593);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[tmp_long])),qbs_new_txt_len("!",1)); if(!qbevent)break;evnt(2593);}while(r); } fornext_exit_289:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data.bin",8)), 4 ,NULL,NULL, 16 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2595);}while(r); do{ sub_close( 16 ,1); if(!qbevent)break;evnt(2595);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data.bin",8)), 2 ,NULL,NULL, 16 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2596);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("main.txt",8)), 4 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2599);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12)), 4 ,NULL,NULL, 13 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2600);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("regsf.txt",9)), 4 ,NULL,NULL, 17 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2602);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12)), 4 ,NULL,NULL, 19 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2604);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("runline.txt",11)), 4 ,NULL,NULL, 21 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2605);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainerr.txt",11)), 4 ,NULL,NULL, 14 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2607);}while(r); do{ *__LONG_ERRORLABELS= 0 ; if(!qbevent)break;evnt(2610);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 14 ; if (new_error) goto skip291; sub_file_print(tmp_fileno,qbs_new_txt_len("if (error_occurred){ error_occurred=0;",38), 0 , 0 , 1 ); if (new_error) goto skip291; skip291: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2611);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain.txt",9)), 4 ,NULL,NULL, 22 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2613);}while(r); do{ sub_close( 22 ,1); if(!qbevent)break;evnt(2613);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain.txt",12)), 4 ,NULL,NULL, 23 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2614);}while(r); do{ sub_close( 23 ,1); if(!qbevent)break;evnt(2614);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ontimer.txt",11)), 4 ,NULL,NULL, 24 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2617);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ontimerj.txt",12)), 4 ,NULL,NULL, 25 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2618);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onkey.txt",9)), 4 ,NULL,NULL, 27 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2622);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onkeyj.txt",10)), 4 ,NULL,NULL, 28 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2623);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onstrig.txt",11)), 4 ,NULL,NULL, 29 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2625);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onstrigj.txt",12)), 4 ,NULL,NULL, 30 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2626);}while(r); do{ *__LONG_GOSUBID= 1 ; if(!qbevent)break;evnt(2628);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ret0.txt",8)), 4 ,NULL,NULL, 15 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2636);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip292; sub_file_print(tmp_fileno,qbs_new_txt_len("if (next_return_point){",23), 0 , 0 , 1 ); if (new_error) goto skip292; skip292: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2637);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip293; sub_file_print(tmp_fileno,qbs_new_txt_len("next_return_point--;",20), 0 , 0 , 1 ); if (new_error) goto skip293; skip293: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2638);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip294; sub_file_print(tmp_fileno,qbs_new_txt_len("switch(return_point[next_return_point]){",40), 0 , 0 , 1 ); if (new_error) goto skip294; skip294: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2639);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip295; sub_file_print(tmp_fileno,qbs_new_txt_len("case 0:",7), 0 , 0 , 1 ); if (new_error) goto skip295; skip295: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2640);}while(r); S_2286:; if ((-(*__LONG_C_CORE== 0 ))||new_error){ if(qbevent){evnt(2642);if(r)goto S_2286;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip296; sub_file_print(tmp_fileno,qbs_new_txt_len("return NULL;",12), 0 , 0 , 1 ); if (new_error) goto skip296; skip296: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2642);}while(r); } S_2289:; if ((-(*__LONG_C_CORE== 1 ))||new_error){ if(qbevent){evnt(2643);if(r)goto S_2289;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip297; sub_file_print(tmp_fileno,qbs_new_txt_len("return;",7), 0 , 0 , 1 ); if (new_error) goto skip297; skip297: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2643);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip298; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip298; skip298: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2645);}while(r); do{ *__LONG_CONTINUELINE= 0 ; if(!qbevent)break;evnt(2647);}while(r); do{ *__LONG_ENDIFS= 0 ; if(!qbevent)break;evnt(2648);}while(r); do{ *__LONG_LINEELSEUSED= 0 ; if(!qbevent)break;evnt(2649);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(2650);}while(r); do{ *__LONG_LINENUMBER= 0 ; if(!qbevent)break;evnt(2651);}while(r); do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(2652);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip299; sub_file_print(tmp_fileno,qbs_new_txt_len("S_0:;",5), 0 , 0 , 1 ); if (new_error) goto skip299; skip299: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2654);}while(r); S_2300:; if ((*__LONG_USEGL)||new_error){ if(qbevent){evnt(2656);if(r)goto S_2300;} do{ SUB_GL_INCLUDE_CONTENT(); if(!qbevent)break;evnt(2656);}while(r); } S_2303:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2660);if(r)goto S_2303;} do{ goto LABEL_IDERET3; if(!qbevent)break;evnt(2660);}while(r); } S_2306:; do{ if(qbevent){evnt(2662);if(r)goto S_2306;} LABEL_IDE4:; if(qbevent){evnt(2663);r=0;} LABEL_INCLUDELINE:; if(qbevent){evnt(2664);r=0;} do{ *__LONG_PREPASS= 0 ; if(!qbevent)break;evnt(2665);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(2667);}while(r); S_2309:; if ((*__LONG_CONTINUELINEFROM)||new_error){ if(qbevent){evnt(2669);if(r)goto S_2309;} do{ *__LONG_START=*__LONG_CONTINUELINEFROM; if(!qbevent)break;evnt(2670);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(2671);}while(r); do{ goto LABEL_CONTLINE; if(!qbevent)break;evnt(2672);}while(r); } do{ *__LONG_IMPLIEDENDIF= 0 ; if(!qbevent)break;evnt(2677);}while(r); do{ *__LONG_THENGOTO= 0 ; if(!qbevent)break;evnt(2678);}while(r); do{ *__LONG_CONTINUELINE= 0 ; if(!qbevent)break;evnt(2679);}while(r); do{ *__LONG_ENDIFS= 0 ; if(!qbevent)break;evnt(2680);}while(r); do{ *__LONG_LINEELSEUSED= 0 ; if(!qbevent)break;evnt(2681);}while(r); do{ *__LONG_NEWIF= 0 ; if(!qbevent)break;evnt(2682);}while(r); S_2320:; if ((-(*__INTEGER_ADDMETADYNAMIC== 1 ))||new_error){ if(qbevent){evnt(2685);if(r)goto S_2320;} do{ *__INTEGER_ADDMETADYNAMIC= 0 ; if(!qbevent)break;evnt(2685);}while(r); do{ *__INTEGER_DYNAMICMODE= 1 ; if(!qbevent)break;evnt(2685);}while(r); } S_2324:; if ((-(*__INTEGER_ADDMETASTATIC== 1 ))||new_error){ if(qbevent){evnt(2686);if(r)goto S_2324;} do{ *__INTEGER_ADDMETASTATIC= 0 ; if(!qbevent)break;evnt(2686);}while(r); do{ *__INTEGER_DYNAMICMODE= 0 ; if(!qbevent)break;evnt(2686);}while(r); } S_2328:; if (((-(*__LONG_IDEMODE== 0 ))&(-(*__LONG_INCLEVEL== 0 )))||new_error){ if(qbevent){evnt(2689);if(r)goto S_2328;} do{ qbs_set(__STRING_A3,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2689);}while(r); } S_2331:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,func_chr( 13 ))))||new_error){ if(qbevent){evnt(2690);if(r)goto S_2331;} do{ goto dl_exit_300; if(!qbevent)break;evnt(2690);}while(r); } do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER+ 1 ; if(!qbevent)break;evnt(2691);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2693);}while(r); do{ *__LONG_LAYOUTOK= 1 ; if(!qbevent)break;evnt(2694);}while(r); S_2337:; if ((-(*__LONG_IDEMODE== 0 ))||new_error){ if(qbevent){evnt(2696);if(r)goto S_2337;} S_2338:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A3->len))||new_error){ if(qbevent){evnt(2697);if(r)goto S_2338;} do{ *__LONG_DOTLINECOUNT=*__LONG_DOTLINECOUNT+ 1 ; if(!qbevent)break;evnt(2698);}while(r); S_2340:; if ((-(*__LONG_DOTLINECOUNT>= 100 ))||new_error){ if(qbevent){evnt(2698);if(r)goto S_2340;} do{ *__LONG_DOTLINECOUNT= 0 ; if(!qbevent)break;evnt(2698);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(".",1)); if (new_error) goto skip302; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip302: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2698);}while(r); } } } do{ qbs_set(__STRING_A3,qbs_ltrim(qbs_rtrim(__STRING_A3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2702);}while(r); do{ qbs_set(__STRING_WHOLELINE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2703);}while(r); do{ qbs_set(__STRING_LAYOUTORIGINAL,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2705);}while(r); do{ qbs_set(__STRING_LAYOUTCOMMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2706);}while(r); do{ *__LONG_LHSCONTROLLEVEL=*__INTEGER_CONTROLLEVEL; if(!qbevent)break;evnt(2707);}while(r); do{ qbs_set(__STRING_LINEFRAGMENT,qbs_new_txt_len("[INFORMATION UNAVAILABLE]",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2709);}while(r); S_2352:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_A3->len== 0 )))||new_error){ if(qbevent){evnt(2710);if(r)goto S_2352;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2710);}while(r); } S_2355:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(2711);if(r)goto S_2355;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip304; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("########",8),__STRING_A3),qbs_new_txt_len("########",8)), 0 , 0 , 1 ); if (new_error) goto skip304; skip304: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2711);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(2713);}while(r); S_2359:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_A3)== 36 )))||new_error){ if(qbevent){evnt(2716);if(r)goto S_2359;} do{ qbs_set(__STRING_A3U,qbs_ucase(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2718);}while(r); S_2361:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3U,qbs_new_txt_len("$CHECKING:OFF",13))))||new_error){ if(qbevent){evnt(2720);if(r)goto S_2361;} S_2362:; if ((*__LONG_CLOUD)||new_error){ if(qbevent){evnt(2721);if(r)goto S_2362;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Feature not supported on QLOUD",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2721);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2721);}while(r); } do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("$CHECKING:OFF",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2722);}while(r); do{ *__LONG_NOCHECKS= 1 ; if(!qbevent)break;evnt(2723);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2724);}while(r); } S_2370:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3U,qbs_new_txt_len("$CHECKING:ON",12))))||new_error){ if(qbevent){evnt(2727);if(r)goto S_2370;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("$CHECKING:ON",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2728);}while(r); do{ *__LONG_NOCHECKS= 0 ; if(!qbevent)break;evnt(2729);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2730);}while(r); } S_2375:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3U,qbs_new_txt_len("$CONSOLE",8))))||new_error){ if(qbevent){evnt(2733);if(r)goto S_2375;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("$CONSOLE",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2734);}while(r); do{ *__LONG_CONSOLE= 1 ; if(!qbevent)break;evnt(2735);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2736);}while(r); } S_2380:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3U,qbs_new_txt_len("$SCREENHIDE",11))))||new_error){ if(qbevent){evnt(2739);if(r)goto S_2380;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("$SCREENHIDE",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2740);}while(r); do{ *__LONG_SCREENHIDE= 1 ; if(!qbevent)break;evnt(2741);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2742);}while(r); } S_2385:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3U,qbs_new_txt_len("$SCREENSHOW",11))))||new_error){ if(qbevent){evnt(2744);if(r)goto S_2385;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("$SCREENSHOW",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2745);}while(r); do{ *__LONG_SCREENHIDE= 0 ; if(!qbevent)break;evnt(2746);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2747);}while(r); } } do{ *__LONG_LINEDATAOFFSET=*__LONG_DATAOFFSET; if(!qbevent)break;evnt(2752);}while(r); do{ qbs_set(__STRING_ENTIRELINE,FUNC_LINEFORMAT(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2754);}while(r); S_2393:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_ENTIRELINE->len== 0 )))||new_error){ if(qbevent){evnt(2754);if(r)goto S_2393;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2754);}while(r); } S_2396:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2755);if(r)goto S_2396;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2755);}while(r); } do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2756);}while(r); do{ *__LONG_NEWIF= 0 ; if(!qbevent)break;evnt(2758);}while(r); do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(2762);}while(r); do{ *__LONG_I=func_instr(*__LONG_S,__STRING_U,qbs_add(qbs_add(qbs_new_txt_len("CASE",4),__STRING1_SP),qbs_new_txt_len("ELSE",4)),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2763);}while(r); S_2403:; while((*__LONG_I)||new_error){ if(qbevent){evnt(2764);if(r)goto S_2403;} do{ *__LONG_SKIP= 0 ; if(!qbevent)break;evnt(2765);}while(r); S_2405:; if ((-(*__LONG_I!= 1 ))||new_error){ if(qbevent){evnt(2766);if(r)goto S_2405;} S_2406:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(__STRING_U,*__LONG_I- 1 , 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(2767);if(r)goto S_2406;} do{ *__LONG_SKIP= 1 ; if(!qbevent)break;evnt(2767);}while(r); } } S_2410:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_I!=(__STRING_U->len- 8 ))))||new_error){ if(qbevent){evnt(2769);if(r)goto S_2410;} S_2411:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(__STRING_U,*__LONG_I+ 9 , 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(2770);if(r)goto S_2411;} do{ *__LONG_SKIP= 1 ; if(!qbevent)break;evnt(2770);}while(r); } } S_2415:; if ((-(*__LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(2772);if(r)goto S_2415;} do{ sub_mid(__STRING_ENTIRELINE,*__LONG_I,0,qbs_add(qbs_add(qbs_new_txt_len("CASE",4),__STRING1_SP),qbs_new_txt_len("C-EL",4)),0); if(!qbevent)break;evnt(2773);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2774);}while(r); } do{ *__LONG_S=*__LONG_I+ 9 ; if(!qbevent)break;evnt(2776);}while(r); do{ *__LONG_I=func_instr(*__LONG_S,__STRING_U,qbs_add(qbs_add(qbs_new_txt_len("CASE",4),__STRING1_SP),qbs_new_txt_len("ELSE",4)),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2777);}while(r); } dl_exit_306:; do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2780);}while(r); do{ *__LONG_A=qbs_asc(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2783);}while(r); S_2424:; if (((((-(*__LONG_A>= 48 ))&(-(*__LONG_A<= 57 ))))|(-(*__LONG_A== 46 )))||new_error){ if(qbevent){evnt(2784);if(r)goto S_2424;} do{ qbs_set(__STRING_LABEL,FUNC_GETELEMENT(__STRING_ENTIRELINE,&(pass308= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2785);}while(r); S_2426:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VALIDLABEL(__STRING_LABEL)))||new_error){ if(qbevent){evnt(2786);if(r)goto S_2426;} do{ *__LONG_V=FUNC_HASHFIND(__STRING_LABEL,&(pass309= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2788);}while(r); LABEL_ADDLABCHK100:; if(qbevent){evnt(2789);r=0;} S_2428:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(2790);if(r)goto S_2428;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(2791);}while(r); S_2430:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(2792);if(r)goto S_2430;} S_2431:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(2793);if(r)goto S_2431;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(2793);}while(r); } S_2434:; if ((-(*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278))== 1 ))||new_error){ if(qbevent){evnt(2794);if(r)goto S_2434;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Duplicate label",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2794);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2794);}while(r); } do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2796);}while(r); do{ goto LABEL_ADDLABAQ100; if(!qbevent)break;evnt(2797);}while(r); } S_2441:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(2799);if(r)goto S_2441;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(2799);}while(r); do{ goto LABEL_ADDLABCHK100; if(!qbevent)break;evnt(2799);}while(r); } } do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(2803);}while(r); S_2447:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(2803);if(r)goto S_2447;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(2803);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2818);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip313; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("last_line=",10),__STRING_LABEL),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip313; skip313: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2819);}while(r); S_2467:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(2820);if(r)goto S_2467;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip314; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){evnt(",17),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len(");r=0;}",7)), 0 , 0 , 1 ); if (new_error) goto skip314; skip314: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2821);}while(r); } S_2470:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(2823);if(r)goto S_2470;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2823);}while(r); } do{ qbs_set(__STRING_ENTIRELINE,FUNC_GETELEMENTS(__STRING_ENTIRELINE,&(pass315= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2824);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2824);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(2824);}while(r); } } S_2478:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(2832);if(r)goto S_2478;} do{ *__LONG_X2=func_instr(NULL,__STRING_ENTIRELINE,qbs_add(__STRING1_SP,qbs_new_txt_len(":",1)),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2833);}while(r); S_2480:; if ((*__LONG_X2)||new_error){ if(qbevent){evnt(2834);if(r)goto S_2480;} S_2481:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_X2==(__STRING_ENTIRELINE->len- 1 ))))||new_error){ if(qbevent){evnt(2835);if(r)goto S_2481;} do{ *__LONG_X3=*__LONG_X2+ 1 ; if(!qbevent)break;evnt(2835);}while(r); }else{ do{ *__LONG_X3=*__LONG_X2+ 2 ; if(!qbevent)break;evnt(2835);}while(r); } do{ qbs_set(__STRING_A,qbs_left(__STRING_ENTIRELINE,*__LONG_X2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2836);}while(r); do{ *__LONG_CREATINGLABEL= 1 ; if(!qbevent)break;evnt(2838);}while(r); S_2488:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VALIDLABEL(__STRING_A)))||new_error){ if(qbevent){evnt(2839);if(r)goto S_2488;} S_2489:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_A)== 0 )))||new_error){ if(qbevent){evnt(2841);if(r)goto S_2489;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2841);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2841);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A,&(pass317= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2843);}while(r); LABEL_ADDLABCHK:; if(qbevent){evnt(2844);r=0;} S_2494:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(2845);if(r)goto S_2494;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(2846);}while(r); S_2496:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(2847);if(r)goto S_2496;} S_2497:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(2848);if(r)goto S_2497;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(2848);}while(r); } S_2500:; if ((-(*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278))== 1 ))||new_error){ if(qbevent){evnt(2849);if(r)goto S_2500;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Duplicate label",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2849);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2849);}while(r); } do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2851);}while(r); do{ goto LABEL_ADDLABAQ; if(!qbevent)break;evnt(2852);}while(r); } S_2507:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(2854);if(r)goto S_2507;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(2854);}while(r); do{ goto LABEL_ADDLABCHK; if(!qbevent)break;evnt(2854);}while(r); } } do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(2857);}while(r); S_2513:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(2857);if(r)goto S_2513;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(2857);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(2868);if(r)goto S_2524;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_TLAYOUT),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2868);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(__STRING_TLAYOUT,qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2868);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip320; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("LABEL_",6),__STRING_A),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip320; skip320: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2870);}while(r); S_2530:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(2871);if(r)goto S_2530;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip321; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){evnt(",17),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len(");r=0;}",7)), 0 , 0 , 1 ); if (new_error) goto skip321; skip321: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2872);}while(r); } do{ qbs_set(__STRING_ENTIRELINE,qbs_right(__STRING_ENTIRELINE,__STRING_ENTIRELINE->len-*__LONG_X3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2874);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2874);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2875);}while(r); S_2536:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(2875);if(r)goto S_2536;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2875);}while(r); } } } } S_2542:; while((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_U)== 58 )))||new_error){ if(qbevent){evnt(2881);if(r)goto S_2542;} S_2543:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(2882);if(r)goto S_2543;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP2),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2882);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len(":",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2882);}while(r); } S_2548:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_U->len== 1 )))||new_error){ if(qbevent){evnt(2883);if(r)goto S_2548;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2883);}while(r); } do{ qbs_set(__STRING_ENTIRELINE,FUNC_GETELEMENTS(__STRING_ENTIRELINE,&(pass326= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2884);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2884);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(2884);}while(r); } dl_exit_323:; S_2555:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_U)== 69 )))||new_error){ if(qbevent){evnt(2888);if(r)goto S_2555;} do{ qbs_set(__STRING_E1,FUNC_GETELEMENT(__STRING_U,&(pass327= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2890);}while(r); S_2557:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E1,qbs_new_txt_len("ELSE",4))))||new_error){ if(qbevent){evnt(2892);if(r)goto S_2557;} do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSE",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2893);}while(r); S_2559:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(2894);if(r)goto S_2559;} do{ *__LONG_CONTINUELINEFROM= 2 ; if(!qbevent)break;evnt(2894);}while(r); } do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2895);}while(r); } S_2564:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E1,qbs_new_txt_len("ELSEIF",6))))||new_error){ if(qbevent){evnt(2898);if(r)goto S_2564;} S_2565:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(2899);if(r)goto S_2565;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... THEN",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2899);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2899);}while(r); } S_2569:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_U,__LONG_N),qbs_new_txt_len("THEN",4))))||new_error){ if(qbevent){evnt(2900);if(r)goto S_2569;} do{ qbs_set(__STRING_A,__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2900);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2900);}while(r); } S_2573:; fornext_value329= 3 ; fornext_finalvalue329=*__LONG_N- 1 ; fornext_step329= 1 ; if (fornext_step329<0) fornext_step_negative329=1; else fornext_step_negative329=0; if (new_error) goto fornext_error329; goto fornext_entrylabel329; while(1){ fornext_value329=fornext_step329+(*__LONG_I); fornext_entrylabel329: *__LONG_I=fornext_value329; if (fornext_step_negative329){ if (fornext_value329fornext_finalvalue329) break; } fornext_error329:; if(qbevent){evnt(2901);if(r)goto S_2573;} S_2574:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_U,__LONG_I),qbs_new_txt_len("THEN",4))))||new_error){ if(qbevent){evnt(2902);if(r)goto S_2574;} do{ qbs_set(__STRING_A,FUNC_GETELEMENTS(__STRING_ENTIRELINE,&(pass330= 1 ),__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2903);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2904);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2905);}while(r); } } fornext_exit_328:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected THEN",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2908);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2908);}while(r); } } do{ *__LONG_START= 1 ; if(!qbevent)break;evnt(2913);}while(r); do{ goto LABEL_SKIPCONTINIT; if(!qbevent)break;evnt(2915);}while(r); LABEL_CONTLINE:; if(qbevent){evnt(2917);r=0;} do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2919);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2920);}while(r); LABEL_SKIPCONTINIT:; if(qbevent){evnt(2922);r=0;} do{ qbs_set(__STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2930);}while(r); S_2589:; fornext_value332=*__LONG_START; fornext_finalvalue332=*__LONG_N; fornext_step332= 1 ; if (fornext_step332<0) fornext_step_negative332=1; else fornext_step_negative332=0; if (new_error) goto fornext_error332; goto fornext_entrylabel332; while(1){ fornext_value332=fornext_step332+(*__LONG_I); fornext_entrylabel332: *__LONG_I=fornext_value332; if (fornext_step_negative332){ if (fornext_value332fornext_finalvalue332) break; } fornext_error332:; if(qbevent){evnt(2932);if(r)goto S_2589;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_U,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2933);}while(r); S_2591:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(2936);if(r)goto S_2591;} S_2592:; if ((-(*__LONG_I==*__LONG_START))||new_error){ if(qbevent){evnt(2937);if(r)goto S_2592;} do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(2938);}while(r); S_2594:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(2938);if(r)goto S_2594;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP2),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2938);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len(":",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2938);}while(r); } S_2599:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(2939);if(r)goto S_2599;} do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2939);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(2940);}while(r); } S_2604:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(2942);if(r)goto S_2604;} do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(2942);}while(r); } do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2943);}while(r); } S_2609:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("IF",2)))&(qbs_equal(__STRING_A,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(2948);if(r)goto S_2609;} do{ *__LONG_NEWIF= 1 ; if(!qbevent)break;evnt(2948);}while(r); } S_2612:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("THEN",4)))|(((qbs_equal(__STRING_E,qbs_new_txt_len("GOTO",4)))&(-(*__LONG_NEWIF== 1 ))))))||new_error){ if(qbevent){evnt(2951);if(r)goto S_2612;} S_2613:; if ((-(*__LONG_NEWIF== 0 ))||new_error){ if(qbevent){evnt(2952);if(r)goto S_2613;} do{ qbs_set(__STRING_A,qbs_new_txt_len("THEN without IF",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2952);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2952);}while(r); } do{ *__LONG_NEWIF= 0 ; if(!qbevent)break;evnt(2953);}while(r); S_2618:; if ((-(*__LONG_LINEELSEUSED> 0 ))||new_error){ if(qbevent){evnt(2954);if(r)goto S_2618;} do{ *__LONG_LINEELSEUSED=*__LONG_LINEELSEUSED- 1 ; if(!qbevent)break;evnt(2954);}while(r); } S_2621:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("GOTO",4))))||new_error){ if(qbevent){evnt(2955);if(r)goto S_2621;} S_2622:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(2956);if(r)goto S_2622;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected IF expression GOTO label",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2956);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2956);}while(r); } do{ *__LONG_I=*__LONG_I- 1 ; if(!qbevent)break;evnt(2957);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_add(__STRING_A,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2959);}while(r); S_2629:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(2960);if(r)goto S_2629;} do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2960);}while(r); do{ *__LONG_ENDIFS=*__LONG_ENDIFS+ 1 ; if(!qbevent)break;evnt(2960);}while(r); } do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2961);}while(r); } S_2635:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("ELSE",4))))||new_error){ if(qbevent){evnt(2965);if(r)goto S_2635;} S_2636:; if ((-(*__LONG_START==*__LONG_I))||new_error){ if(qbevent){evnt(2967);if(r)goto S_2636;} S_2637:; if ((-(*__LONG_LINEELSEUSED>= 1 ))||new_error){ if(qbevent){evnt(2968);if(r)goto S_2637;} do{ *__LONG_IMPLIEDENDIF= 1 ; if(!qbevent)break;evnt(2973);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("END",3),__STRING1_SP),qbs_new_txt_len("IF",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2973);}while(r); do{ *__LONG_ENDIFS=*__LONG_ENDIFS- 1 ; if(!qbevent)break;evnt(2974);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(2975);}while(r); do{ *__LONG_LINEELSEUSED=*__LONG_LINEELSEUSED- 1 ; if(!qbevent)break;evnt(2976);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2977);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSE",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2980);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2980);}while(r); do{ *__LONG_LINEELSEUSED=*__LONG_LINEELSEUSED+ 1 ; if(!qbevent)break;evnt(2981);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2982);}while(r); } do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(2986);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(2987);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_ENTIRELINE,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2991);}while(r); S_2654:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2991);if(r)goto S_2654;} do{ qbs_set(__STRING_A,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2991);}while(r); }else{ do{ qbs_set(__STRING_A,qbs_add(qbs_add(__STRING_A,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2991);}while(r); } } fornext_exit_331:; S_2660:; if ((-(*__LONG_ENDIFS> 0 ))||new_error){ if(qbevent){evnt(2996);if(r)goto S_2660;} do{ *__LONG_ENDIFS=*__LONG_ENDIFS- 1 ; if(!qbevent)break;evnt(2997);}while(r); do{ *__LONG_IMPLIEDENDIF= 1 ; if(!qbevent)break;evnt(2998);}while(r); do{ qbs_set(__STRING_ENTIRELINE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_ENTIRELINE,__STRING1_SP),qbs_new_txt_len(":",1)),__STRING1_SP),qbs_new_txt_len("END",3)),__STRING1_SP),qbs_new_txt_len("IF",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2998);}while(r); do{ *__LONG_N=*__LONG_N+ 3 ; if(!qbevent)break;evnt(2998);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2999);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(3000);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3001);}while(r); } LABEL_GOTCOMMAND:; if(qbevent){evnt(3005);r=0;} do{ *__LONG_DYNSCOPE= 0 ; if(!qbevent)break;evnt(3007);}while(r); do{ qbs_set(__STRING_CA,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3009);}while(r); do{ qbs_set(__STRING_A,FUNC_ELEUCASE(__STRING_CA)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3010);}while(r); do{ *__LONG_LAYOUTDONE= 0 ; if(!qbevent)break;evnt(3013);}while(r); do{ qbs_set(__STRING_LINEFRAGMENT,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3015);}while(r); S_2674:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(3016);if(r)goto S_2674;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip334; sub_file_print(tmp_fileno,__STRING_A, 0 , 0 , 1 ); if (new_error) goto skip334; skip334: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3016);}while(r); } do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3017);}while(r); S_2678:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(3018);if(r)goto S_2678;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3018);}while(r); } S_2681:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_CA,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len(".",1)),__STRING1_SP),0)))||new_error){ if(qbevent){evnt(3021);if(r)goto S_2681;} do{ qbs_set(__STRING_A3,FUNC_GETELEMENT(__STRING_CA,&(pass335= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3022);}while(r); do{ *__LONG_EXCEPT= 0 ; if(!qbevent)break;evnt(3023);}while(r); do{ qbs_set(__STRING_AA,qbs_add(__STRING_A3,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3024);}while(r); do{ *__LONG_LASTFUSE= -1 ; if(!qbevent)break;evnt(3025);}while(r); S_2686:; fornext_value337= 2 ; fornext_finalvalue337=*__LONG_N; fornext_step337= 1 ; if (fornext_step337<0) fornext_step_negative337=1; else fornext_step_negative337=0; if (new_error) goto fornext_error337; goto fornext_entrylabel337; while(1){ fornext_value337=fornext_step337+(*__LONG_X); fornext_entrylabel337: *__LONG_X=fornext_value337; if (fornext_step_negative337){ if (fornext_value337fornext_finalvalue337) break; } fornext_error337:; if(qbevent){evnt(3026);if(r)goto S_2686;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3027);}while(r); S_2688:; if ((-(*__LONG_EXCEPT== 1 ))||new_error){ if(qbevent){evnt(3028);if(r)goto S_2688;} do{ *__LONG_EXCEPT= 2 ; if(!qbevent)break;evnt(3028);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3028);}while(r); } S_2692:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(".",1)))&(-(*__LONG_X!=*__LONG_N))))||new_error){ if(qbevent){evnt(3029);if(r)goto S_2692;} S_2693:; if ((-(*__LONG_EXCEPT== 2 ))||new_error){ if(qbevent){evnt(3030);if(r)goto S_2693;} do{ *__LONG_EXCEPT= 1 ; if(!qbevent)break;evnt(3030);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3030);}while(r); } S_2697:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(3032);if(r)goto S_2697;} do{ *__LONG_EXCEPT= 1 ; if(!qbevent)break;evnt(3034);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3035);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(qbs_ucase(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3039);}while(r); S_2702:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3040);if(r)goto S_2702;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3040);}while(r); } S_2705:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(3041);if(r)goto S_2705;} S_2706:; if (((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)!= 0 ))|(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISUDT)!= 0 )))||new_error){ if(qbevent){evnt(3042);if(r)goto S_2706;} do{ *__LONG_EXCEPT= 1 ; if(!qbevent)break;evnt(3043);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3044);}while(r); } S_2710:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(3046);if(r)goto S_2710;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(3046);}while(r); do{ *__LONG_TRY=FUNC_FINDID(qbs_ucase(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3046);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(3046);}while(r); } S_2716:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3047);if(r)goto S_2716;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3047);}while(r); } } dl_exit_338:; S_2720:; if ((qbs_cleanup(qbs_tmp_base,(-(((int32*)(__ARRAY_LONG_ISALPHA[0]))[array_check((qbs_asc(__STRING_A3))-__ARRAY_LONG_ISALPHA[4],__ARRAY_LONG_ISALPHA[5])]== 0 ))&(-(*__LONG_LASTFUSE!=(*__LONG_X- 2 )))))||new_error){ if(qbevent){evnt(3050);if(r)goto S_2720;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid '.'",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3050);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3050);}while(r); } do{ qbs_set(__STRING_AA,qbs_add(qbs_left(__STRING_AA,__STRING_AA->len- 1 ),__STRING_FIX046)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3051);}while(r); do{ *__LONG_LASTFUSE=*__LONG_X; if(!qbevent)break;evnt(3052);}while(r); do{ goto LABEL_PERIODFUSED; if(!qbevent)break;evnt(3053);}while(r); } do{ *__LONG_EXCEPT= 0 ; if(!qbevent)break;evnt(3055);}while(r); LABEL_UDTPERIOD:; if(qbevent){evnt(3056);r=0;} do{ qbs_set(__STRING_AA,qbs_add(qbs_add(__STRING_AA,__STRING_A2),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3057);}while(r); LABEL_PERIODFUSED:; if(qbevent){evnt(3058);r=0;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3059);}while(r); } fornext_exit_336:; do{ qbs_set(__STRING_A,qbs_left(__STRING_AA,__STRING_AA->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3061);}while(r); do{ qbs_set(__STRING_CA,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3062);}while(r); do{ qbs_set(__STRING_A,FUNC_ELEUCASE(__STRING_CA)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3063);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3064);}while(r); } do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(3067);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass341= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3069);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass342= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3070);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass343= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3071);}while(r); S_2741:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(3075);if(r)goto S_2741;} S_2742:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("'",1))))||new_error){ if(qbevent){evnt(3076);if(r)goto S_2742;} do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3076);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3076);}while(r); } } S_2747:; if ((-(*__LONG_N<= 2 ))||new_error){ if(qbevent){evnt(3079);if(r)goto S_2747;} S_2748:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DATA",4))))||new_error){ if(qbevent){evnt(3080);if(r)goto S_2748;} do{ qbs_set(__STRING_L,__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3081);}while(r); S_2750:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(3082);if(r)goto S_2750;} do{ qbs_set(__STRING_E,func_space((__STRING_SECONDELEMENT->len- 1 )/ 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3084);}while(r); S_2752:; fornext_value346= 1 ; fornext_finalvalue346=__STRING_E->len; fornext_step346= 1 ; if (fornext_step346<0) fornext_step_negative346=1; else fornext_step_negative346=0; if (new_error) goto fornext_error346; goto fornext_entrylabel346; while(1){ fornext_value346=fornext_step346+(*__LONG_X); fornext_entrylabel346: *__LONG_X=fornext_value346; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative346){ if (fornext_value346fornext_finalvalue346) break; } fornext_error346:; if(qbevent){evnt(3085);if(r)goto S_2752;} do{ *__LONG_V1=qbs_asc(__STRING_SECONDELEMENT,*__LONG_X* 2 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3086);}while(r); do{ *__LONG_V2=qbs_asc(__STRING_SECONDELEMENT,(*__LONG_X* 2 )+( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3087);}while(r); S_2755:; if ((-(*__LONG_V1< 65 ))||new_error){ if(qbevent){evnt(3088);if(r)goto S_2755;} do{ *__LONG_V1=*__LONG_V1- 48 ; if(!qbevent)break;evnt(3088);}while(r); }else{ do{ *__LONG_V1=*__LONG_V1- 55 ; if(!qbevent)break;evnt(3088);}while(r); } S_2760:; if ((-(*__LONG_V2< 65 ))||new_error){ if(qbevent){evnt(3089);if(r)goto S_2760;} do{ *__LONG_V2=*__LONG_V2- 48 ; if(!qbevent)break;evnt(3089);}while(r); }else{ do{ *__LONG_V2=*__LONG_V2- 55 ; if(!qbevent)break;evnt(3089);}while(r); } do{ tqbs=__STRING_E; if (!new_error){ tmp_fileno=*__LONG_X; if (!new_error){ tmp_long=*__LONG_V1+(*__LONG_V2* 16 ); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(3090);}while(r); } fornext_exit_345:; do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3092);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3095);}while(r); S_2770:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3095);if(r)goto S_2770;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3095);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3095);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3097);}while(r); } } S_2778:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(3104);if(r)goto S_2778;} S_2779:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(3106);if(r)goto S_2779;} S_2780:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("DECLARE",7)))))||new_error){ if(qbevent){evnt(3107);if(r)goto S_2780;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END DECLARE",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3107);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3107);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(3108);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("END",3),__STRING1_SP),qbs_new_txt_len("DECLARE",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3109);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3110);}while(r); S_2787:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3110);if(r)goto S_2787;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3110);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3110);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3111);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 2 ; if(!qbevent)break;evnt(3114);}while(r); S_2795:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SUB",3)))|(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FUNCTION",8)))))||new_error){ if(qbevent){evnt(3116);if(r)goto S_2795;} do{ goto LABEL_DECLARESUBFUNC2; if(!qbevent)break;evnt(3117);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SUB/FUNCTION definition or END DECLARE",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3120);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3120);}while(r); } S_2801:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(3124);if(r)goto S_2801;} S_2802:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(3126);if(r)goto S_2802;} S_2803:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("TYPE",4)))))||new_error){ if(qbevent){evnt(3127);if(r)goto S_2803;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END TYPE",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3127);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3127);}while(r); } do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(3128);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("END",3),__STRING1_SP),qbs_new_txt_len("TYPE",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3129);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3130);}while(r); S_2810:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3130);if(r)goto S_2810;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3130);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3130);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3131);}while(r); } S_2817:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N< 3 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("AS",2)))))||new_error){ if(qbevent){evnt(3134);if(r)goto S_2817;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected element-name AS type-name",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3134);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3134);}while(r); } do{ *__LONG_DEFININGTYPE= 2 ; if(!qbevent)break;evnt(3135);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_GETELEMENT(__STRING_CA,&(pass351= 1 )),__STRING1_SP),qbs_new_txt_len("AS",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3136);}while(r); do{ qbs_set(__STRING_T,FUNC_GETELEMENTS(__STRING_A,&(pass352= 3 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3137);}while(r); do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3138);}while(r); S_2825:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3139);if(r)goto S_2825;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3139);}while(r); } S_2828:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(3140);if(r)goto S_2828;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3140);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3140);}while(r); } S_2832:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(3141);if(r)goto S_2832;} do{ qbs_set(__STRING_T,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*__LONG_TYP& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3142);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3144);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3145);}while(r); S_2837:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3145);if(r)goto S_2837;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3145);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3145);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3146);}while(r); } S_2844:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("TYPE",4))))||new_error){ if(qbevent){evnt(3150);if(r)goto S_2844;} S_2845:; if ((-(*__LONG_N!= 2 ))||new_error){ if(qbevent){evnt(3151);if(r)goto S_2845;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected TYPE type-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3151);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3151);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("TYPE",4),__STRING1_SP),FUNC_GETELEMENT(__STRING_CA,&(pass354= 2 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3152);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3153);}while(r); S_2851:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3153);if(r)goto S_2851;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3153);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3153);}while(r); } do{ *__LONG_DEFININGTYPE= 1 ; if(!qbevent)break;evnt(3154);}while(r); do{ *__LONG_DEFININGTYPEERROR=*__LONG_LINENUMBER; if(!qbevent)break;evnt(3155);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3156);}while(r); } S_2860:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(3160);if(r)goto S_2860;} S_2861:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DECLARE",7))))||new_error){ if(qbevent){evnt(3161);if(r)goto S_2861;} S_2862:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("LIBRARY",7)))|(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("DYNAMIC",7)))|(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("CUSTOMTYPE",10)))|(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("STATIC",6)))))||new_error){ if(qbevent){evnt(3163);if(r)goto S_2862;} do{ *__LONG_DECLARINGLIBRARY= 1 ; if(!qbevent)break;evnt(3165);}while(r); do{ *__LONG_DYNAMICLIBRARY= 0 ; if(!qbevent)break;evnt(3166);}while(r); do{ *__LONG_CUSTOMTYPELIBRARY= 0 ; if(!qbevent)break;evnt(3167);}while(r); do{ *__LONG_INDIRECTLIBRARY= 0 ; if(!qbevent)break;evnt(3168);}while(r); do{ *__LONG_STATICLINKEDLIBRARY= 0 ; if(!qbevent)break;evnt(3169);}while(r); do{ *__LONG_X= 3 ; if(!qbevent)break;evnt(3171);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("DECLARE",7),__STRING1_SP),qbs_new_txt_len("LIBRARY",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3172);}while(r); S_2870:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("DYNAMIC",7))))||new_error){ if(qbevent){evnt(3174);if(r)goto S_2870;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass356= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3175);}while(r); S_2872:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("LIBRARY",7))))||new_error){ if(qbevent){evnt(3175);if(r)goto S_2872;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected DYNAMIC LIBRARY ",25),func_chr( 34 )),qbs_new_txt_len("...",3)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3175);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3175);}while(r); } do{ *__LONG_DYNAMICLIBRARY= 1 ; if(!qbevent)break;evnt(3176);}while(r); do{ *__LONG_X= 4 ; if(!qbevent)break;evnt(3177);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("DECLARE",7),__STRING1_SP),qbs_new_txt_len("DYNAMIC",7)),__STRING1_SP),qbs_new_txt_len("LIBRARY",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3178);}while(r); S_2879:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(3179);if(r)goto S_2879;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected DECLARE DYNAMIC LIBRARY ",33),func_chr( 34 )),qbs_new_txt_len("...",3)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3179);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3179);}while(r); } do{ *__LONG_INDIRECTLIBRARY= 1 ; if(!qbevent)break;evnt(3180);}while(r); } S_2885:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("CUSTOMTYPE",10))))||new_error){ if(qbevent){evnt(3183);if(r)goto S_2885;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass357= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3184);}while(r); S_2887:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("LIBRARY",7))))||new_error){ if(qbevent){evnt(3184);if(r)goto S_2887;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CUSTOMTYPE LIBRARY",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3184);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3184);}while(r); } do{ *__LONG_CUSTOMTYPELIBRARY= 1 ; if(!qbevent)break;evnt(3185);}while(r); do{ *__LONG_X= 4 ; if(!qbevent)break;evnt(3186);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("DECLARE",7),__STRING1_SP),qbs_new_txt_len("CUSTOMTYPE",10)),__STRING1_SP),qbs_new_txt_len("LIBRARY",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3187);}while(r); do{ *__LONG_INDIRECTLIBRARY= 1 ; if(!qbevent)break;evnt(3188);}while(r); } S_2896:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(3191);if(r)goto S_2896;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass358= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3192);}while(r); S_2898:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("LIBRARY",7))))||new_error){ if(qbevent){evnt(3192);if(r)goto S_2898;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected STATIC LIBRARY",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3192);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3192);}while(r); } do{ *__LONG_X= 4 ; if(!qbevent)break;evnt(3193);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("DECLARE",7),__STRING1_SP),qbs_new_txt_len("STATIC",6)),__STRING1_SP),qbs_new_txt_len("LIBRARY",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3194);}while(r); do{ *__LONG_STATICLINKEDLIBRARY= 1 ; if(!qbevent)break;evnt(3195);}while(r); } do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3198);}while(r); do{ *__LONG_SFHEADER= 0 ; if(!qbevent)break;evnt(3198);}while(r); S_2908:; if ((-(*__LONG_N>=*__LONG_X))||new_error){ if(qbevent){evnt(3200);if(r)goto S_2908;} do{ *__LONG_SFDECLARE= 1 ; if(!qbevent)break;evnt(3202);}while(r); LABEL_ADDLIBRARY:; if(qbevent){evnt(3204);r=0;} do{ qbs_set(__STRING_LIBNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3206);}while(r); do{ qbs_set(__STRING_HEADERNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3207);}while(r); do{ qbs_set(__STRING_X,FUNC_GETELEMENT(__STRING_CA,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3212);}while(r); S_2913:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_X)!= 34 )))||new_error){ if(qbevent){evnt(3213);if(r)goto S_2913;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected LIBRARY ",17),func_chr( 34 )),qbs_new_txt_len("...",3)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3213);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3213);}while(r); } do{ qbs_set(__STRING_X,qbs_right(__STRING_X,__STRING_X->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3214);}while(r); do{ *__LONG_Z=func_instr(NULL,__STRING_X,func_chr( 34 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3215);}while(r); S_2919:; if ((-(*__LONG_Z== 0 ))||new_error){ if(qbevent){evnt(3216);if(r)goto S_2919;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected LIBRARY ",17),func_chr( 34 )),qbs_new_txt_len("...",3)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3216);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3216);}while(r); } do{ qbs_set(__STRING_X,qbs_left(__STRING_X,*__LONG_Z- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3217);}while(r); S_2924:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_DYNAMICLIBRARY!= 0 ))&(-(__STRING_X->len== 0 ))))||new_error){ if(qbevent){evnt(3219);if(r)goto S_2924;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected DECLARE DYNAMIC LIBRARY ",33),func_chr( 34 )),qbs_new_txt_len("...",3)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3219);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3219);}while(r); } S_2928:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_CUSTOMTYPELIBRARY!= 0 ))&(-(__STRING_X->len== 0 ))))||new_error){ if(qbevent){evnt(3220);if(r)goto S_2928;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected DECLARE CUSTOMTYPE LIBRARY ",36),func_chr( 34 )),qbs_new_txt_len("...",3)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3220);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3220);}while(r); } S_2932:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_X,qbs_new_txt_len("\\\\",2),0)))||new_error){ if(qbevent){evnt(3235);if(r)goto S_2932;} do{ *__LONG_Z=func_instr(NULL,__STRING_X,qbs_new_txt_len("\\\\",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3236);}while(r); do{ qbs_set(__STRING_X,qbs_add(qbs_left(__STRING_X,*__LONG_Z- 1 ),qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3237);}while(r); } ww_exit_362:; do{ qbs_set(__STRING_AUTOFORMAT_X,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3240);}while(r); do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3244);}while(r); LABEL_STRIPLIBVER:; if(qbevent){evnt(3245);r=0;} S_2938:; fornext_value365=__STRING_X->len; fornext_finalvalue365= 1 ; fornext_step365= -1 ; if (fornext_step365<0) fornext_step_negative365=1; else fornext_step_negative365=0; if (new_error) goto fornext_error365; goto fornext_entrylabel365; while(1){ fornext_value365=fornext_step365+(*__LONG_Z); fornext_entrylabel365: *__LONG_Z=fornext_value365; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative365){ if (fornext_value365fornext_finalvalue365) break; } fornext_error365:; if(qbevent){evnt(3246);if(r)goto S_2938;} do{ *__LONG_A=qbs_asc(__STRING_X,*__LONG_Z); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3247);}while(r); S_2940:; if (((-(*__LONG_A== 92 ))|(-(*__LONG_A== 47 )))||new_error){ if(qbevent){evnt(3248);if(r)goto S_2940;} do{ goto fornext_exit_364; if(!qbevent)break;evnt(3248);}while(r); } S_2943:; if (((-(*__LONG_A== 46 ))|(-(*__LONG_A== 58 )))||new_error){ if(qbevent){evnt(3249);if(r)goto S_2943;} S_2944:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z))))||new_error){ if(qbevent){evnt(3250);if(r)goto S_2944;} S_2945:; if ((qbs_cleanup(qbs_tmp_base,__STRING_V->len))||new_error){ if(qbevent){evnt(3251);if(r)goto S_2945;} do{ qbs_set(__STRING_V,qbs_add(qbs_add(qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z),qbs_new_txt_len(".",1)),__STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3251);}while(r); }else{ do{ qbs_set(__STRING_V,qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3251);}while(r); } do{ qbs_set(__STRING_X,qbs_left(__STRING_X,*__LONG_Z- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3252);}while(r); S_2951:; if ((-(*__LONG_A== 58 ))||new_error){ if(qbevent){evnt(3253);if(r)goto S_2951;} do{ goto fornext_exit_364; if(!qbevent)break;evnt(3253);}while(r); } do{ goto LABEL_STRIPLIBVER; if(!qbevent)break;evnt(3254);}while(r); }else{ do{ goto fornext_exit_364; if(!qbevent)break;evnt(3256);}while(r); } } } fornext_exit_364:; do{ qbs_set(__STRING_LIBVER,__STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3260);}while(r); S_2961:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3263);if(r)goto S_2961;} S_2962:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_X,qbs_new_txt_len("/",1),0)))||new_error){ if(qbevent){evnt(3265);if(r)goto S_2962;} do{ *__LONG_Z=func_instr(NULL,__STRING_X,qbs_new_txt_len("/",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3266);}while(r); do{ qbs_set(__STRING_X,qbs_add(qbs_add(qbs_left(__STRING_X,*__LONG_Z- 1 ),qbs_new_txt_len("\\",1)),qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3267);}while(r); } dl_exit_371:; } S_2967:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(3271);if(r)goto S_2967;} S_2968:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_X,qbs_new_txt_len("\\",1),0)))||new_error){ if(qbevent){evnt(3273);if(r)goto S_2968;} do{ *__LONG_Z=func_instr(NULL,__STRING_X,qbs_new_txt_len("\\",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3274);}while(r); do{ qbs_set(__STRING_X,qbs_add(qbs_add(qbs_left(__STRING_X,*__LONG_Z- 1 ),qbs_new_txt_len("/",1)),qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3275);}while(r); } dl_exit_373:; } do{ qbs_set(__STRING_LIBPATH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3280);}while(r); S_2974:; fornext_value376=__STRING_X->len; fornext_finalvalue376= 1 ; fornext_step376= -1 ; if (fornext_step376<0) fornext_step_negative376=1; else fornext_step_negative376=0; if (new_error) goto fornext_error376; goto fornext_entrylabel376; while(1){ fornext_value376=fornext_step376+(*__LONG_Z); fornext_entrylabel376: *__LONG_Z=fornext_value376; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative376){ if (fornext_value376fornext_finalvalue376) break; } fornext_error376:; if(qbevent){evnt(3281);if(r)goto S_2974;} do{ *__LONG_A=qbs_asc(__STRING_X,*__LONG_Z); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3282);}while(r); S_2976:; if (((-(*__LONG_A== 47 ))|(-(*__LONG_A== 92 )))||new_error){ if(qbevent){evnt(3283);if(r)goto S_2976;} do{ qbs_set(__STRING_LIBPATH,qbs_left(__STRING_X,*__LONG_Z)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3284);}while(r); do{ qbs_set(__STRING_X,qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3285);}while(r); do{ goto fornext_exit_375; if(!qbevent)break;evnt(3286);}while(r); } } fornext_exit_375:; do{ qbs_set(__STRING_LIBPATH_INLINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3291);}while(r); S_2983:; fornext_value380= 1 ; fornext_finalvalue380=__STRING_LIBPATH->len; fornext_step380= 1 ; if (fornext_step380<0) fornext_step_negative380=1; else fornext_step_negative380=0; if (new_error) goto fornext_error380; goto fornext_entrylabel380; while(1){ fornext_value380=fornext_step380+(*__LONG_Z); fornext_entrylabel380: *__LONG_Z=fornext_value380; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative380){ if (fornext_value380fornext_finalvalue380) break; } fornext_error380:; if(qbevent){evnt(3292);if(r)goto S_2983;} do{ *__LONG_A=qbs_asc(__STRING_LIBPATH,*__LONG_Z); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3293);}while(r); do{ qbs_set(__STRING_LIBPATH_INLINE,qbs_add(__STRING_LIBPATH_INLINE,func_chr(*__LONG_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3294);}while(r); S_2986:; if ((-(*__LONG_A== 92 ))||new_error){ if(qbevent){evnt(3295);if(r)goto S_2986;} do{ qbs_set(__STRING_LIBPATH_INLINE,qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("\\",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3295);}while(r); } } fornext_exit_379:; S_2990:; if ((qbs_cleanup(qbs_tmp_base,__STRING_X->len))||new_error){ if(qbevent){evnt(3298);if(r)goto S_2990;} S_2991:; if ((-(*__LONG_DYNAMICLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3299);if(r)goto S_2991;} S_2992:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3302);if(r)goto S_2992;} S_2993:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3304);if(r)goto S_2993;} S_2994:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".lib",4)))))||new_error){ if(qbevent){evnt(3305);if(r)goto S_2994;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".lib",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3306);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".lib",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3307);}while(r); } } S_2999:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3311);if(r)goto S_2999;} S_3000:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3312);if(r)goto S_3000;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3313);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3314);}while(r); } } S_3005:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3318);if(r)goto S_3005;} S_3006:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".o",2)))))||new_error){ if(qbevent){evnt(3319);if(r)goto S_3006;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3320);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3321);}while(r); } } S_3011:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3325);if(r)goto S_3011;} S_3012:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".lib",4)))))||new_error){ if(qbevent){evnt(3326);if(r)goto S_3012;} do{ qbs_set(__STRING_LIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".lib",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3327);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".lib",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3328);}while(r); } } S_3017:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3332);if(r)goto S_3017;} S_3018:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3333);if(r)goto S_3018;} do{ qbs_set(__STRING_LIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3334);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3335);}while(r); } } S_3023:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3339);if(r)goto S_3023;} S_3024:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".o",2)))))||new_error){ if(qbevent){evnt(3340);if(r)goto S_3024;} do{ qbs_set(__STRING_LIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3341);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3342);}while(r); } } } S_3030:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(3347);if(r)goto S_3030;} S_3031:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3348);if(r)goto S_3031;} S_3032:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3350);if(r)goto S_3032;} S_3033:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3352);if(r)goto S_3033;} S_3034:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3353);if(r)goto S_3034;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3354);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3355);}while(r); S_3037:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3356);if(r)goto S_3037;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ",12)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3356);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3356);}while(r); } } } S_3044:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3359);if(r)goto S_3044;} S_3045:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3360);if(r)goto S_3045;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3361);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3362);}while(r); S_3048:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3363);if(r)goto S_3048;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ",12)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3363);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3363);}while(r); } } } } S_3056:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3369);if(r)goto S_3056;} S_3057:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3370);if(r)goto S_3057;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3371);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3372);}while(r); S_3060:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3373);if(r)goto S_3060;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ",12)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3373);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3373);}while(r); } } } S_3067:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3376);if(r)goto S_3067;} S_3068:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3377);if(r)goto S_3068;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3378);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3379);}while(r); S_3071:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3380);if(r)goto S_3071;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ",12)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3380);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3380);}while(r); } } } } S_3079:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3385);if(r)goto S_3079;} S_3080:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3386);if(r)goto S_3080;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3387);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3388);}while(r); } } S_3085:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3392);if(r)goto S_3085;} S_3086:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".o",2)))))||new_error){ if(qbevent){evnt(3393);if(r)goto S_3086;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3394);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3395);}while(r); } } S_3091:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3398);if(r)goto S_3091;} S_3092:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3400);if(r)goto S_3092;} S_3093:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3401);if(r)goto S_3093;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3402);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3403);}while(r); S_3096:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3404);if(r)goto S_3096;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib64/",23)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3404);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib64/ ",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3404);}while(r); } } } S_3103:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3407);if(r)goto S_3103;} S_3104:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3408);if(r)goto S_3104;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3409);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3410);}while(r); S_3107:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3411);if(r)goto S_3107;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib64/",23)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3411);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib64/ ",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3411);}while(r); } } } } S_3115:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3416);if(r)goto S_3115;} S_3116:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3417);if(r)goto S_3116;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3418);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3419);}while(r); } } S_3121:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3422);if(r)goto S_3121;} S_3122:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3424);if(r)goto S_3122;} S_3123:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3426);if(r)goto S_3123;} S_3124:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3427);if(r)goto S_3124;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3428);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3429);}while(r); S_3127:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3430);if(r)goto S_3127;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/",21)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3430);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/ ",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3430);}while(r); } } } S_3134:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3433);if(r)goto S_3134;} S_3135:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3434);if(r)goto S_3135;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3435);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3436);}while(r); S_3138:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3437);if(r)goto S_3138;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/",21)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3437);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/ ",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3437);}while(r); } } } } S_3146:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3443);if(r)goto S_3146;} S_3147:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3444);if(r)goto S_3147;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3445);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3446);}while(r); S_3150:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3447);if(r)goto S_3150;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/",21)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3447);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/ ",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3447);}while(r); } } } S_3157:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3450);if(r)goto S_3157;} S_3158:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3451);if(r)goto S_3158;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3452);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3453);}while(r); S_3161:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(3454);if(r)goto S_3161;} do{ qbs_set(__STRING_MYLIBOPT,qbs_add(qbs_add(qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/",21)),__STRING_LIBPATH),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3454);}while(r); }else{ do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/ ",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3454);}while(r); } } } } S_3169:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3459);if(r)goto S_3169;} S_3170:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3460);if(r)goto S_3170;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3461);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3462);}while(r); } } S_3175:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3466);if(r)goto S_3175;} S_3176:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3468);if(r)goto S_3176;} S_3177:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3470);if(r)goto S_3177;} S_3178:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3471);if(r)goto S_3178;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3472);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3473);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3474);}while(r); } } S_3184:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3477);if(r)goto S_3184;} S_3185:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3478);if(r)goto S_3185;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3479);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3480);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3481);}while(r); } } } S_3192:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3487);if(r)goto S_3192;} S_3193:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3488);if(r)goto S_3193;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3489);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3490);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3491);}while(r); } } S_3199:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3494);if(r)goto S_3199;} S_3200:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3495);if(r)goto S_3200;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3496);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3497);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath ./ ",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3498);}while(r); } } } S_3207:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3503);if(r)goto S_3207;} S_3208:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3504);if(r)goto S_3208;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3505);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3506);}while(r); } } S_3213:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3510);if(r)goto S_3213;} S_3214:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".o",2)))))||new_error){ if(qbevent){evnt(3511);if(r)goto S_3214;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3512);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".o",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3513);}while(r); } } S_3219:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3516);if(r)goto S_3219;} S_3220:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3518);if(r)goto S_3220;} S_3221:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3519);if(r)goto S_3221;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3520);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3521);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib64/ ",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3522);}while(r); } } S_3227:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3525);if(r)goto S_3227;} S_3228:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3526);if(r)goto S_3228;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3527);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3528);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib64/ ",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3529);}while(r); } } } S_3235:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3534);if(r)goto S_3235;} S_3236:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3535);if(r)goto S_3236;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3536);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3537);}while(r); } } S_3241:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3540);if(r)goto S_3241;} S_3242:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3542);if(r)goto S_3242;} S_3243:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3544);if(r)goto S_3243;} S_3244:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3545);if(r)goto S_3244;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3546);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3547);}while(r); } } S_3249:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3550);if(r)goto S_3249;} S_3250:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3551);if(r)goto S_3250;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3552);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3553);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/ ",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3554);}while(r); } } } S_3257:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3560);if(r)goto S_3257;} S_3258:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3561);if(r)goto S_3258;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3562);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3563);}while(r); } } S_3263:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3566);if(r)goto S_3263;} S_3264:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3567);if(r)goto S_3264;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3568);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3569);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/ ",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3570);}while(r); } } } S_3271:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3575);if(r)goto S_3271;} S_3272:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(3576);if(r)goto S_3272;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3577);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".a",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3578);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_add(__STRING_MYLIBOPT,qbs_new_txt_len(" -Wl,-rpath /usr/lib/ ",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3579);}while(r); } } } S_3279:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_HEADERNAME->len== 0 )))||new_error){ if(qbevent){evnt(3586);if(r)goto S_3279;} S_3280:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3587);if(r)goto S_3280;} S_3281:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(3588);if(r)goto S_3281;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".h",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3589);}while(r); S_3283:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3590);if(r)goto S_3283;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3590);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3591);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3592);}while(r); } S_3289:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(3594);if(r)goto S_3289;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".hpp",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3595);}while(r); S_3291:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3596);if(r)goto S_3291;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3596);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3597);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3598);}while(r); } S_3297:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(3601);if(r)goto S_3297;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(__STRING_X,qbs_new_txt_len(".h",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3602);}while(r); S_3299:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3603);if(r)goto S_3299;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3603);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3604);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3605);}while(r); } S_3305:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(3607);if(r)goto S_3305;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(__STRING_X,qbs_new_txt_len(".hpp",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3608);}while(r); S_3307:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3609);if(r)goto S_3307;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3609);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3610);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3611);}while(r); } } S_3314:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(3615);if(r)goto S_3314;} S_3315:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(3616);if(r)goto S_3315;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".h",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3617);}while(r); S_3317:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3618);if(r)goto S_3317;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3618);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3619);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3620);}while(r); } S_3323:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(3622);if(r)goto S_3323;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".hpp",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3623);}while(r); S_3325:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3624);if(r)goto S_3325;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3624);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3625);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3626);}while(r); } S_3331:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_LIBPATH),__STRING_X),qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(3628);if(r)goto S_3331;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_LIBPATH_INLINE),__STRING_X),qbs_new_txt_len(".h",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3629);}while(r); S_3333:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3630);if(r)goto S_3333;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3630);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3631);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3632);}while(r); } S_3339:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_LIBPATH),__STRING_X),qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(3634);if(r)goto S_3339;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_LIBPATH_INLINE),__STRING_X),qbs_new_txt_len(".hpp",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3635);}while(r); S_3341:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3636);if(r)goto S_3341;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3636);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3637);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3638);}while(r); } S_3347:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(3641);if(r)goto S_3347;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(__STRING_X,qbs_new_txt_len(".h",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3642);}while(r); S_3349:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3643);if(r)goto S_3349;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3643);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3644);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3645);}while(r); } S_3355:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(3647);if(r)goto S_3355;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(__STRING_X,qbs_new_txt_len(".hpp",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3648);}while(r); S_3357:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3649);if(r)goto S_3357;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3649);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3650);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3651);}while(r); } S_3363:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_X),qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(3653);if(r)goto S_3363;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_X),qbs_new_txt_len(".h",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3654);}while(r); S_3365:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3655);if(r)goto S_3365;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3655);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3656);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3657);}while(r); } S_3371:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_X),qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(3659);if(r)goto S_3371;} do{ qbs_set(__STRING_HEADERNAME,qbs_add(qbs_add(qbs_new_txt_len("/usr/include/",13),__STRING_X),qbs_new_txt_len(".hpp",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3660);}while(r); S_3373:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(3661);if(r)goto S_3373;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3661);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(3662);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(3663);}while(r); } } LABEL_GOTHEADER:; if(qbevent){evnt(3667);r=0;} } }else{ S_3382:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3673);if(r)goto S_3382;} S_3383:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3675);if(r)goto S_3383;} S_3384:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".dll",4)))))||new_error){ if(qbevent){evnt(3676);if(r)goto S_3384;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3677);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3678);}while(r); } } S_3389:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3682);if(r)goto S_3389;} S_3390:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(func_environ(qbs_new_txt_len("SYSTEMROOT",10)),qbs_new_txt_len("\\System32\\",10)),__STRING_LIBPATH),__STRING_X),qbs_new_txt_len(".dll",4)))))||new_error){ if(qbevent){evnt(3683);if(r)goto S_3390;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(__STRING_LIBPATH,__STRING_X),qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3684);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(__STRING_LIBPATH_INLINE,__STRING_X),qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3685);}while(r); } } S_3395:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3690);if(r)goto S_3395;} S_3396:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".dll",4)))))||new_error){ if(qbevent){evnt(3691);if(r)goto S_3396;} do{ qbs_set(__STRING_LIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3692);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3693);}while(r); } } S_3401:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3697);if(r)goto S_3401;} S_3402:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(func_environ(qbs_new_txt_len("SYSTEMROOT",10)),qbs_new_txt_len("\\System32\\",10)),__STRING_X),qbs_new_txt_len(".dll",4)))))||new_error){ if(qbevent){evnt(3698);if(r)goto S_3402;} do{ qbs_set(__STRING_LIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3699);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(__STRING_X,qbs_new_txt_len(".dll",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3700);}while(r); } } } S_3408:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(3705);if(r)goto S_3408;} S_3409:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3709);if(r)goto S_3409;} S_3410:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3711);if(r)goto S_3410;} S_3411:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3712);if(r)goto S_3411;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3713);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3714);}while(r); S_3414:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(3715);if(r)goto S_3414;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3715);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3715);}while(r); } } } S_3420:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3718);if(r)goto S_3420;} S_3421:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3719);if(r)goto S_3421;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3720);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3721);}while(r); S_3424:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(3722);if(r)goto S_3424;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3722);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3722);}while(r); } } } } S_3431:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3728);if(r)goto S_3431;} S_3432:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3729);if(r)goto S_3432;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3730);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3731);}while(r); S_3435:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(3732);if(r)goto S_3435;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3732);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3732);}while(r); } } } S_3441:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3735);if(r)goto S_3441;} S_3442:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3736);if(r)goto S_3442;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3737);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(__STRING_LIBPATH_INLINE,qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3738);}while(r); S_3445:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(3739);if(r)goto S_3445;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3739);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3739);}while(r); } } } S_3451:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3743);if(r)goto S_3451;} S_3452:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3744);if(r)goto S_3452;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3745);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3746);}while(r); } } S_3457:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3749);if(r)goto S_3457;} S_3458:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3750);if(r)goto S_3458;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3751);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3752);}while(r); } } S_3463:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3756);if(r)goto S_3463;} S_3464:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3758);if(r)goto S_3464;} S_3465:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3759);if(r)goto S_3465;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3760);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3761);}while(r); } } S_3470:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3764);if(r)goto S_3470;} S_3471:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3765);if(r)goto S_3471;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3766);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3767);}while(r); } } } S_3477:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3773);if(r)goto S_3477;} S_3478:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3774);if(r)goto S_3478;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3775);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3776);}while(r); } } S_3483:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3779);if(r)goto S_3483;} S_3484:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3780);if(r)goto S_3484;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3781);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),__STRING_LIBPATH_INLINE),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3782);}while(r); } } S_3489:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3786);if(r)goto S_3489;} S_3490:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3788);if(r)goto S_3490;} S_3491:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3789);if(r)goto S_3491;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3790);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3791);}while(r); do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3792);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3792);}while(r); } } S_3498:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3795);if(r)goto S_3498;} S_3499:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3796);if(r)goto S_3499;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3797);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3798);}while(r); do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3799);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3799);}while(r); } } } S_3507:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3805);if(r)goto S_3507;} S_3508:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3806);if(r)goto S_3508;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3807);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3808);}while(r); do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3809);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3809);}while(r); } } S_3515:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3812);if(r)goto S_3515;} S_3516:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3813);if(r)goto S_3516;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3814);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_new_txt_len("lib",3),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3815);}while(r); do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3816);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_INLINELIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3816);}while(r); } } S_3523:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3820);if(r)goto S_3523;} S_3524:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3821);if(r)goto S_3524;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3822);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3823);}while(r); } } S_3529:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3826);if(r)goto S_3529;} S_3530:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3827);if(r)goto S_3530;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3828);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib64/",11),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3829);}while(r); } } S_3535:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(3833);if(r)goto S_3535;} S_3536:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3835);if(r)goto S_3536;} S_3537:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3836);if(r)goto S_3537;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3837);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".",1)),__STRING_LIBVER),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3838);}while(r); } } S_3542:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3841);if(r)goto S_3542;} S_3543:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6)))))||new_error){ if(qbevent){evnt(3842);if(r)goto S_3543;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3843);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".dylib",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3844);}while(r); } } } S_3549:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3850);if(r)goto S_3549;} S_3550:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER))))||new_error){ if(qbevent){evnt(3851);if(r)goto S_3550;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3852);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so.",4)),__STRING_LIBVER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3853);}while(r); } } S_3555:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(3856);if(r)goto S_3555;} S_3556:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3)))))||new_error){ if(qbevent){evnt(3857);if(r)goto S_3556;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3858);}while(r); do{ qbs_set(__STRING_INLINELIBNAME,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("/usr/lib/",9),qbs_new_txt_len("lib",3)),__STRING_X),qbs_new_txt_len(".so",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3859);}while(r); } } } } S_3563:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_DYNAMICLIBRARY!= 0 ))&(-(__STRING_LIBNAME->len== 0 ))))||new_error){ if(qbevent){evnt(3867);if(r)goto S_3563;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DYNAMIC LIBRARY not found",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3867);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3867);}while(r); } S_3567:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_LIBNAME->len== 0 ))&(-(__STRING_HEADERNAME->len== 0 ))))||new_error){ if(qbevent){evnt(3868);if(r)goto S_3567;} do{ qbs_set(__STRING_A,qbs_new_txt_len("LIBRARY not found",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3868);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3868);}while(r); } S_3571:; if ((-(*__LONG_DYNAMICLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3872);if(r)goto S_3571;} S_3572:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBNAME->len))||new_error){ if(qbevent){evnt(3875);if(r)goto S_3572;} S_3573:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3876);if(r)goto S_3573;} do{ qbs_set(__STRING_MYLIB,qbs_add(qbs_add(qbs_add(__STRING_MYLIB,qbs_new_txt_len(" ..\\..\\",7)),__STRING_LIBNAME),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3877);}while(r); } S_3576:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(3879);if(r)goto S_3576;} S_3577:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_LIBNAME, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(3880);if(r)goto S_3577;} do{ qbs_set(__STRING_MYLIB,qbs_add(qbs_add(qbs_add(__STRING_MYLIB,qbs_new_txt_len(" ",1)),__STRING_LIBNAME),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3881);}while(r); }else{ do{ qbs_set(__STRING_MYLIB,qbs_add(qbs_add(qbs_add(__STRING_MYLIB,qbs_new_txt_len(" ../../",7)),__STRING_LIBNAME),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3883);}while(r); } } } }else{ S_3585:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_HEADERNAME->len== 0 )))||new_error){ if(qbevent){evnt(3892);if(r)goto S_3585;} S_3586:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(3894);if(r)goto S_3586;} do{ *__LONG_F=func_freefile(); if(!qbevent)break;evnt(3895);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12)), 5 ,NULL,NULL,*__LONG_F,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3896);}while(r); }else{ do{ *__LONG_F= 13 ; if(!qbevent)break;evnt(3898);}while(r); } do{ qbs_set(__STRING_X2,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3904);}while(r); S_3593:; fornext_value458= 1 ; fornext_finalvalue458=__STRING_X2->len; fornext_step458= 1 ; if (fornext_step458<0) fornext_step_negative458=1; else fornext_step_negative458=0; if (new_error) goto fornext_error458; goto fornext_entrylabel458; while(1){ fornext_value458=fornext_step458+(*__LONG_X2); fornext_entrylabel458: *__LONG_X2=fornext_value458; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative458){ if (fornext_value458fornext_finalvalue458) break; } fornext_error458:; if(qbevent){evnt(3905);if(r)goto S_3593;} S_3594:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_X2,*__LONG_X2)< 48 )))||new_error){ if(qbevent){evnt(3906);if(r)goto S_3594;} do{ tqbs=__STRING_X2; if (!new_error){ tmp_fileno=*__LONG_X2; if (!new_error){ tmp_long= 95 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(3906);}while(r); } S_3597:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_X2,*__LONG_X2)> 57 ))&(-(qbs_asc(__STRING_X2,*__LONG_X2)< 65 ))))||new_error){ if(qbevent){evnt(3907);if(r)goto S_3597;} do{ tqbs=__STRING_X2; if (!new_error){ tmp_fileno=*__LONG_X2; if (!new_error){ tmp_long= 95 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(3907);}while(r); } S_3600:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_X2,*__LONG_X2)> 90 ))&(-(qbs_asc(__STRING_X2,*__LONG_X2)< 97 ))))||new_error){ if(qbevent){evnt(3908);if(r)goto S_3600;} do{ tqbs=__STRING_X2; if (!new_error){ tmp_fileno=*__LONG_X2; if (!new_error){ tmp_long= 95 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(3908);}while(r); } S_3603:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_X2,*__LONG_X2)> 122 )))||new_error){ if(qbevent){evnt(3909);if(r)goto S_3603;} do{ tqbs=__STRING_X2; if (!new_error){ tmp_fileno=*__LONG_X2; if (!new_error){ tmp_long= 95 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(3909);}while(r); } } fornext_exit_457:; do{ qbs_set(__STRING_DLLNAME,__STRING_X2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3911);}while(r); S_3608:; if ((*__LONG_SFDECLARE)||new_error){ if(qbevent){evnt(3913);if(r)goto S_3608;} S_3609:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3915);if(r)goto S_3609;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip460; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("HINSTANCE DLL_",14),__STRING_X2),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip460; skip460: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3916);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip461; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len("){",2)), 0 , 0 , 1 ); if (new_error) goto skip461; skip461: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3917);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip462; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("DLL_",4),__STRING_X2),qbs_new_txt_len("=LoadLibrary(",13)),func_chr( 34 )),__STRING_INLINELIBNAME),func_chr( 34 )),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip462; skip462: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3918);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip463; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len(") error(259);",13)), 0 , 0 , 1 ); if (new_error) goto skip463; skip463: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3919);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip464; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip464; skip464: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3920);}while(r); } S_3616:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(3923);if(r)goto S_3616;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip465; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("void *DLL_",10),__STRING_X2),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip465; skip465: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3924);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip466; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len("){",2)), 0 , 0 , 1 ); if (new_error) goto skip466; skip466: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3925);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip467; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("DLL_",4),__STRING_X2),qbs_new_txt_len("=dlopen(",8)),func_chr( 34 )),__STRING_INLINELIBNAME),func_chr( 34 )),qbs_new_txt_len(",RTLD_LAZY);",12)), 0 , 0 , 1 ); if (new_error) goto skip467; skip467: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3926);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip468; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len(") error(259);",13)), 0 , 0 , 1 ); if (new_error) goto skip468; skip468: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3927);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip469; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip469; skip469: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3928);}while(r); } } S_3624:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(3934);if(r)goto S_3624;} do{ sub_close(*__LONG_F,1); if(!qbevent)break;evnt(3934);}while(r); } } } S_3629:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HEADERNAME->len))||new_error){ if(qbevent){evnt(3940);if(r)goto S_3629;} S_3630:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3941);if(r)goto S_3630;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip471; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("..\\\\..\\\\",8)),__STRING_HEADERNAME),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip471; skip471: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3942);}while(r); } S_3633:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(3944);if(r)goto S_3633;} S_3634:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_HEADERNAME, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(3946);if(r)goto S_3634;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip472; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),__STRING_HEADERNAME),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip472; skip472: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3947);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip473; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("../../",6)),__STRING_HEADERNAME),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip473; skip473: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3949);}while(r); } } } } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),func_chr( 34 )),__STRING_AUTOFORMAT_X),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3957);}while(r); S_3643:; if ((-(*__LONG_N>*__LONG_X))||new_error){ if(qbevent){evnt(3959);if(r)goto S_3643;} S_3644:; if ((*__LONG_DYNAMICLIBRARY)||new_error){ if(qbevent){evnt(3960);if(r)goto S_3644;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot specify multiple DYNAMIC LIBRARY names in a single DECLARE statement",75)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3960);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3960);}while(r); } do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(3961);}while(r); do{ qbs_set(__STRING_X2,FUNC_GETELEMENT(__STRING_A,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3961);}while(r); S_3650:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_X2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(3961);if(r)goto S_3650;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3961);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3961);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3962);}while(r); do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(3963);}while(r); S_3656:; if ((-(*__LONG_X>*__LONG_N))||new_error){ if(qbevent){evnt(3963);if(r)goto S_3656;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3963);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3963);}while(r); } do{ goto LABEL_ADDLIBRARY; if(!qbevent)break;evnt(3964);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3969);}while(r); S_3664:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3969);if(r)goto S_3664;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3969);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3969);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3970);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3973);}while(r); } } S_3674:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(3978);if(r)goto S_3674;} do{ *__LONG_DYNAMICLIBRARY= 0 ; if(!qbevent)break;evnt(3979);}while(r); LABEL_DECLARESUBFUNC2:; if(qbevent){evnt(3980);r=0;} do{ *__LONG_SF= 0 ; if(!qbevent)break;evnt(3981);}while(r); S_3677:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FUNCTION",8))))||new_error){ if(qbevent){evnt(3982);if(r)goto S_3677;} do{ *__LONG_SF= 1 ; if(!qbevent)break;evnt(3982);}while(r); } S_3680:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SUB",3))))||new_error){ if(qbevent){evnt(3983);if(r)goto S_3680;} do{ *__LONG_SF= 2 ; if(!qbevent)break;evnt(3983);}while(r); } S_3683:; if ((*__LONG_SF)||new_error){ if(qbevent){evnt(3984);if(r)goto S_3683;} S_3684:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(3986);if(r)goto S_3684;} S_3685:; if ((qbs_cleanup(qbs_tmp_base,__STRING_SUBFUNC->len))||new_error){ if(qbevent){evnt(3987);if(r)goto S_3685;} do{ qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Expected END SUB/FUNCTION before ",33),__STRING_FIRSTELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3987);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3987);}while(r); } } S_3690:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(3990);if(r)goto S_3690;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected name after SUB/FUNCTION",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3990);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3990);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,&(pass476= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3991);}while(r); do{ qbs_set(__STRING_SYMBOL,FUNC_REMOVESYMBOL(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3992);}while(r); S_3696:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3993);if(r)goto S_3696;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3993);}while(r); } S_3699:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_SF== 2 ))&(qbs_notequal(__STRING_SYMBOL,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(3994);if(r)goto S_3699;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type symbols after a SUB name are invalid",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3994);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3994);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3995);}while(r); S_3704:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3996);if(r)goto S_3704;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3996);}while(r); } S_3707:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(3997);if(r)goto S_3707;} S_3708:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))==*__LONG_SF))||new_error){ if(qbevent){evnt(3998);if(r)goto S_3708;} do{ goto LABEL_CREATESF; if(!qbevent)break;evnt(3998);}while(r); } S_3711:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(3999);if(r)goto S_3711;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(3999);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3999);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(3999);}while(r); } S_3717:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4000);if(r)goto S_3717;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4000);}while(r); } } dl_exit_477:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Unregistered SUB/FUNCTION encountered",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4002);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4002);}while(r); LABEL_CREATESF:; if(qbevent){evnt(4003);r=0;} S_3723:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_E),qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(4004);if(r)goto S_3723;} do{ qbs_set(__STRING_E,qbs_new_txt_len("_GL",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4004);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(__STRING_FIRSTELEMENT,__STRING1_SP),__STRING_E),__STRING_SYMBOL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4005);}while(r); do{ memcpy((((char*)__UDT_ID2)+(0)),(((char*)__UDT_ID)+(0)),2860); if(!qbevent)break;evnt(4006);}while(r); do{ *__LONG_TARGETID=*__LONG_CURRENTID; if(!qbevent)break;evnt(4007);}while(r); do{ qbs_set(__STRING_ALIASNAME,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4010);}while(r); S_3730:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(4011);if(r)goto S_3730;} do{ qbs_set(__STRING_EE,FUNC_GETELEMENT(__STRING_A,&(pass478= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4012);}while(r); S_3732:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_EE,qbs_new_txt_len("ALIAS",5))))||new_error){ if(qbevent){evnt(4013);if(r)goto S_3732;} S_3733:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4014);if(r)goto S_3733;} do{ qbs_set(__STRING_A,qbs_new_txt_len("ALIAS can only be used with DECLARE LIBRARY",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4014);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4014);}while(r); } S_3737:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(4015);if(r)goto S_3737;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ALIAS name-in-library",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4015);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4015);}while(r); } do{ qbs_set(__STRING_EE,FUNC_GETELEMENT(__STRING_CA,&(pass479= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4016);}while(r); S_3742:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_EE, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(4019);if(r)goto S_3742;} do{ qbs_set(__STRING_EE,qbs_right(__STRING_EE,__STRING_EE->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4020);}while(r); do{ *__LONG_X=func_instr(NULL,__STRING_EE,func_chr( 34 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4021);}while(r); S_3745:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(4021);if(r)goto S_3745;} do{ qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Expected ",9),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4021);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4021);}while(r); } do{ qbs_set(__STRING_EE,qbs_left(__STRING_EE,*__LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4022);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("ALIAS",5)),__STRING1_SP),__STRING_CHR_QUOTE),__STRING_EE),__STRING_CHR_QUOTE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4023);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("ALIAS",5)),__STRING1_SP),__STRING_EE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4025);}while(r); } S_3754:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_EE,__STRING_FIX046,0)))||new_error){ if(qbevent){evnt(4029);if(r)goto S_3754;} do{ *__LONG_X=func_instr(NULL,__STRING_EE,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4030);}while(r); do{ qbs_set(__STRING_EE,qbs_add(qbs_add(qbs_left(__STRING_EE,*__LONG_X- 1 ),qbs_new_txt_len(".",1)),qbs_right(__STRING_EE,__STRING_EE->len-*__LONG_X+ 1 -__STRING_FIX046->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4030);}while(r); } dl_exit_481:; do{ qbs_set(__STRING_ALIASNAME,__STRING_EE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4032);}while(r); S_3759:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(4034);if(r)goto S_3759;} do{ qbs_set(__STRING_A,FUNC_GETELEMENTS(__STRING_A,&(pass484= 1 ),&(pass485= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4034);}while(r); } S_3762:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(4035);if(r)goto S_3762;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_A,&(pass486= 1 ),&(pass487= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_A,&(pass488= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4035);}while(r); } S_3765:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(4036);if(r)goto S_3765;} do{ qbs_set(__STRING_CA,FUNC_GETELEMENTS(__STRING_CA,&(pass489= 1 ),&(pass490= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4036);}while(r); } S_3768:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(4037);if(r)goto S_3768;} do{ qbs_set(__STRING_CA,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_CA,&(pass491= 1 ),&(pass492= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass493= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4037);}while(r); } do{ *__LONG_N=*__LONG_N- 2 ; if(!qbevent)break;evnt(4038);}while(r); } } S_3774:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4042);if(r)goto S_3774;} do{ goto LABEL_DECLIBJMP1; if(!qbevent)break;evnt(4042);}while(r); } S_3777:; if ((-(*__INTEGER_CLOSEDMAIN== 0 ))||new_error){ if(qbevent){evnt(4045);if(r)goto S_3777;} do{ SUB_CLOSEMAIN(); if(!qbevent)break;evnt(4045);}while(r); } S_3780:; if ((*__INTEGER_CONTROLLEVEL)||new_error){ if(qbevent){evnt(4048);if(r)goto S_3780;} do{ *__LONG_X=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(4049);}while(r); S_3782:; if ((-(*__LONG_X== 1 ))||new_error){ if(qbevent){evnt(4050);if(r)goto S_3782;} do{ qbs_set(__STRING_A,qbs_new_txt_len("IF without END IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4050);}while(r); } S_3785:; if ((-(*__LONG_X== 2 ))||new_error){ if(qbevent){evnt(4051);if(r)goto S_3785;} do{ qbs_set(__STRING_A,qbs_new_txt_len("FOR without NEXT",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4051);}while(r); } S_3788:; if (((-(*__LONG_X== 3 ))|(-(*__LONG_X== 4 )))||new_error){ if(qbevent){evnt(4052);if(r)goto S_3788;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO without LOOP",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4052);}while(r); } S_3791:; if ((-(*__LONG_X== 5 ))||new_error){ if(qbevent){evnt(4053);if(r)goto S_3791;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE without WEND",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4053);}while(r); } S_3794:; if (((((-(*__LONG_X>= 10 ))&(-(*__LONG_X<= 17 ))))|(-(*__LONG_X== 18 ))|(-(*__LONG_X== 19 )))||new_error){ if(qbevent){evnt(4054);if(r)goto S_3794;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SELECT CASE without END SELECT",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4054);}while(r); } do{ *__LONG_LINENUMBER=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(4055);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4056);}while(r); } do{ qbs_set(__STRING_SUBFUNC,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4059);}while(r); do{ *__LONG_SUBFUNCN=*__LONG_SUBFUNCN+ 1 ; if(!qbevent)break;evnt(4060);}while(r); do{ *__LONG_SUBFUNCID=*__LONG_TARGETID; if(!qbevent)break;evnt(4061);}while(r); do{ qbs_set(__STRING_SUBFUNCRET,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4063);}while(r); do{ sub_close( 13 ,1); if(!qbevent)break;evnt(4065);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 13 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4065);}while(r); do{ sub_close( 19 ,1); if(!qbevent)break;evnt(4066);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("free",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 19 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4066);}while(r); do{ sub_close( 15 ,1); if(!qbevent)break;evnt(4067);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ret",3)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 15 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4067);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip494; sub_file_print(tmp_fileno,qbs_new_txt_len("if (next_return_point){",23), 0 , 0 , 1 ); if (new_error) goto skip494; skip494: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4068);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip495; sub_file_print(tmp_fileno,qbs_new_txt_len("next_return_point--;",20), 0 , 0 , 1 ); if (new_error) goto skip495; skip495: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4069);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip496; sub_file_print(tmp_fileno,qbs_new_txt_len("switch(return_point[next_return_point]){",40), 0 , 0 , 1 ); if (new_error) goto skip496; skip496: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4070);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip497; sub_file_print(tmp_fileno,qbs_new_txt_len("case 0:",7), 0 , 0 , 1 ); if (new_error) goto skip497; skip497: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4071);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip498; sub_file_print(tmp_fileno,qbs_new_txt_len("error(3);",9), 0 , 0 , 1 ); if (new_error) goto skip498; skip498: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4072);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip499; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip499; skip499: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4073);}while(r); do{ *__INTEGER_DEFDATAHANDLE= 13 ; if(!qbevent)break;evnt(4074);}while(r); LABEL_DECLIBJMP1:; if(qbevent){evnt(4076);r=0;} S_3817:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4078);if(r)goto S_3817;} S_3818:; if (((-(*__LONG_SFDECLARE== 0 ))&(-(*__LONG_INDIRECTLIBRARY== 0 )))||new_error){ if(qbevent){evnt(4079);if(r)goto S_3818;} do{ sub_close( 17 ,1); if(!qbevent)break;evnt(4080);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("regsf_ignore.txt",16)), 4 ,NULL,NULL, 17 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4081);}while(r); } S_3822:; if (((-(*__LONG_SFDECLARE== 1 ))&(-(*__LONG_CUSTOMTYPELIBRARY== 0 ))&(-(*__LONG_DYNAMICLIBRARY== 0 ))&(-(*__LONG_INDIRECTLIBRARY== 0 )))||new_error){ if(qbevent){evnt(4083);if(r)goto S_3822;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip500; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("externtype",10)),FUNC_STR2(&(pass501=*__LONG_RESOLVESTATICFUNCTIONS+ 1 ))),qbs_new_txt_len(".txt",4)),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip500; skip500: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4084);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(4085);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("externtype",10)),FUNC_STR2(&(pass502=*__LONG_RESOLVESTATICFUNCTIONS+ 1 ))),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4085);}while(r); do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(4085);}while(r); } } S_3829:; if ((-(*__LONG_SF== 1 ))||new_error){ if(qbevent){evnt(4092);if(r)goto S_3829;} do{ *__LONG_RETTYP=*(int32*)(((char*)__UDT_ID)+(2378)); if(!qbevent)break;evnt(4093);}while(r); do{ qbs_set(__STRING_T,FUNC_TYP2CTYP((int32*)(void*)( ((char*)(__UDT_ID)) + (2378) ),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4094);}while(r); S_3832:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4095);if(r)goto S_3832;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4095);}while(r); } S_3835:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(4096);if(r)goto S_3835;} do{ qbs_set(__STRING_T,qbs_new_txt_len("qbs*",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4096);}while(r); } S_3838:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4098);if(r)goto S_3838;} S_3839:; if ((*__LONG_RETTYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(4099);if(r)goto S_3839;} do{ qbs_set(__STRING_T,qbs_new_txt_len("char*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4100);}while(r); } } S_3843:; if (((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_DYNAMICLIBRARY!= 0 )))||new_error){ if(qbevent){evnt(4104);if(r)goto S_3843;} S_3844:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4105);if(r)goto S_3844;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip503; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("typedef ",8),__STRING_T),qbs_new_txt_len(" (CALLBACK* DLLCALL_",20)),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len(")(",2)), 0 , 0 , 0 ); if (new_error) goto skip503; skip503: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4106);}while(r); } S_3847:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4108);if(r)goto S_3847;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip504; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("typedef ",8),__STRING_T),qbs_new_txt_len(" (*DLLCALL_",11)),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len(")(",2)), 0 , 0 , 0 ); if (new_error) goto skip504; skip504: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4109);}while(r); } S_3850:; }else{ if ((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_CUSTOMTYPELIBRARY!= 0 ))){ if(qbevent){evnt(4111);if(r)goto S_3850;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip505; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("typedef ",8),__STRING_T),qbs_new_txt_len(" CUSTOMCALL_",12)),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip505; skip505: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4112);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip506; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_T,qbs_new_txt_len(" ",1)),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip506; skip506: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4114);}while(r); } } S_3855:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4116);if(r)goto S_3855;} do{ goto LABEL_DECLIBJMP2; if(!qbevent)break;evnt(4116);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip507; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_T,qbs_new_txt_len(" ",1)),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip507; skip507: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4117);}while(r); S_3859:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SYMBOL,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4121);if(r)goto S_3859;} do{ *__LONG_A=qbs_asc(qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4122);}while(r); S_3861:; if ((-(*__LONG_A== 95 ))||new_error){ if(qbevent){evnt(4122);if(r)goto S_3861;} do{ *__LONG_A= 91 ; if(!qbevent)break;evnt(4122);}while(r); } do{ *__LONG_A=*__LONG_A- 64 ; if(!qbevent)break;evnt(4123);}while(r); do{ qbs_set(__STRING_SYMBOL,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*__LONG_A)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4124);}while(r); } do{ *__LONG_REGINTERNALVARIABLE= 1 ; if(!qbevent)break;evnt(4126);}while(r); do{ *__LONG_IGNORE=FUNC_DIM2(__STRING_E,__STRING_SYMBOL,&(pass508= 0 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4127);}while(r); S_3869:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4128);if(r)goto S_3869;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4128);}while(r); } do{ *__LONG_REGINTERNALVARIABLE= 0 ; if(!qbevent)break;evnt(4129);}while(r); do{ sub_close( 19 ,1); if(!qbevent)break;evnt(4131);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("free",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 19 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4131);}while(r); S_3875:; if (((*__LONG_RETTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(4133);if(r)goto S_3875;} do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass509= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4134);}while(r); S_3877:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4135);if(r)goto S_3877;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4135);}while(r); } do{ qbs_set(__STRING_SUBFUNCRET,qbs_add(qbs_add(qbs_add(__STRING_SUBFUNCRET,qbs_new_txt_len("qbs_maketmp(",12)),__STRING_R),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4136);}while(r); do{ qbs_set(__STRING_SUBFUNCRET,qbs_add(qbs_add(qbs_add(__STRING_SUBFUNCRET,qbs_new_txt_len("return ",7)),__STRING_R),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4137);}while(r); }else{ do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass510= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4139);}while(r); S_3884:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4140);if(r)goto S_3884;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4140);}while(r); } do{ qbs_set(__STRING_SUBFUNCRET,qbs_add(qbs_add(qbs_new_txt_len("return ",7),__STRING_R),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4141);}while(r); } }else{ S_3890:; if (((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_DYNAMICLIBRARY!= 0 )))||new_error){ if(qbevent){evnt(4145);if(r)goto S_3890;} S_3891:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4146);if(r)goto S_3891;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip511; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("typedef void (CALLBACK* DLLCALL_",32),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len(")(",2)), 0 , 0 , 0 ); if (new_error) goto skip511; skip511: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4147);}while(r); } S_3894:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4149);if(r)goto S_3894;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip512; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("typedef void (*DLLCALL_",23),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len(")(",2)), 0 , 0 , 0 ); if (new_error) goto skip512; skip512: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4150);}while(r); } S_3897:; }else{ if ((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_CUSTOMTYPELIBRARY!= 0 ))){ if(qbevent){evnt(4152);if(r)goto S_3897;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip513; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("typedef void CUSTOMCALL_",24),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip513; skip513: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4153);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip514; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("void ",5),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip514; skip514: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4155);}while(r); } } S_3902:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4157);if(r)goto S_3902;} do{ goto LABEL_DECLIBJMP2; if(!qbevent)break;evnt(4157);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip515; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("void ",5),FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)))),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip515; skip515: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4158);}while(r); } LABEL_DECLIBJMP2:; if(qbevent){evnt(4160);r=0;} do{ *__LONG_ADDSTATIC2LAYOUT= 0 ; if(!qbevent)break;evnt(4162);}while(r); do{ *__LONG_STATICSF= 0 ; if(!qbevent)break;evnt(4163);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4164);}while(r); S_3910:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(4165);if(r)goto S_3910;} S_3911:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4166);if(r)goto S_3911;} do{ qbs_set(__STRING_A,qbs_new_txt_len("STATIC cannot be used in a library declaration",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4166);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4166);}while(r); } do{ *__LONG_ADDSTATIC2LAYOUT= 1 ; if(!qbevent)break;evnt(4167);}while(r); do{ *__LONG_STATICSF= 2 ; if(!qbevent)break;evnt(4168);}while(r); do{ qbs_set(__STRING_A,qbs_left(__STRING_A,__STRING_A->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4169);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(4169);}while(r); } do{ *__LONG_PARAMS= 0 ; if(!qbevent)break;evnt(4173);}while(r); do{ *__LONG_ALLOWLOCALNAME= 1 ; if(!qbevent)break;evnt(4174);}while(r); S_3922:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(4175);if(r)goto S_3922;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass517= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4176);}while(r); S_3924:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4177);if(r)goto S_3924;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4177);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4177);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4178);}while(r); S_3929:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(4179);if(r)goto S_3929;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4179);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4179);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4180);}while(r); S_3934:; if ((-(*__LONG_N== 4 ))||new_error){ if(qbevent){evnt(4181);if(r)goto S_3934;} do{ goto LABEL_NOSFPARAMS2; if(!qbevent)break;evnt(4181);}while(r); } S_3937:; if ((-(*__LONG_N< 4 ))||new_error){ if(qbevent){evnt(4182);if(r)goto S_3937;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4182);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4182);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(4183);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4184);}while(r); S_3943:; fornext_value519= 4 ; fornext_finalvalue519=*__LONG_N- 1 ; fornext_step519= 1 ; if (fornext_step519<0) fornext_step_negative519=1; else fornext_step_negative519=0; if (new_error) goto fornext_error519; goto fornext_entrylabel519; while(1){ fornext_value519=fornext_step519+(*__LONG_I); fornext_entrylabel519: *__LONG_I=fornext_value519; if (fornext_step_negative519){ if (fornext_value519fornext_finalvalue519) break; } fornext_error519:; if(qbevent){evnt(4185);if(r)goto S_3943;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4186);}while(r); S_3945:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4187);if(r)goto S_3945;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(4187);}while(r); } S_3948:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(4188);if(r)goto S_3948;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(4188);}while(r); } S_3951:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(4189);if(r)goto S_3951;} S_3952:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(4190);if(r)goto S_3952;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4190);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4190);}while(r); } LABEL_GETLASTPARAM2:; if(qbevent){evnt(4191);r=0;} S_3956:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4192);if(r)goto S_3956;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4192);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4192);}while(r); } do{ qbs_set(__STRING_A2,qbs_left(__STRING_A2,__STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4193);}while(r); do{ *__LONG_PARAMS=*__LONG_PARAMS+ 1 ; if(!qbevent)break;evnt(4195);}while(r); do{ *__LONG_GLINKID=*__LONG_TARGETID; if(!qbevent)break;evnt(4196);}while(r); do{ *__INTEGER_GLINKARG=*__LONG_PARAMS; if(!qbevent)break;evnt(4197);}while(r); S_3964:; if ((-(*__LONG_PARAMS> 1 ))||new_error){ if(qbevent){evnt(4201);if(r)goto S_3964;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip521; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0 , 0 , 0 ); if (new_error) goto skip521; skip521: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4202);}while(r); S_3966:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4204);if(r)goto S_3966;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip522; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0 , 0 , 0 ); if (new_error) goto skip522; skip522: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4205);}while(r); } } do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4209);}while(r); do{ *__LONG_ARRAY= 0 ; if(!qbevent)break;evnt(4210);}while(r); do{ qbs_set(__STRING_T2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4211);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,&(pass523= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4212);}while(r); do{ *__LONG_BYVALUE= 0 ; if(!qbevent)break;evnt(4214);}while(r); S_3975:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_E),qbs_new_txt_len("BYVAL",5))))||new_error){ if(qbevent){evnt(4215);if(r)goto S_3975;} S_3976:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4216);if(r)goto S_3976;} do{ qbs_set(__STRING_A,qbs_new_txt_len("BYVAL can currently only be used with DECLARE LIBRARY",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4216);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4216);}while(r); } do{ *__LONG_BYVALUE= 1 ; if(!qbevent)break;evnt(4217);}while(r); do{ qbs_set(__STRING_A2,qbs_right(__STRING_A2,__STRING_A2->len- 6 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4217);}while(r); S_3982:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_L, 1 ),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4218);if(r)goto S_3982;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len("BYVAL",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4218);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("BYVAL",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4218);}while(r); } do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4219);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,&(pass525= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4219);}while(r); } S_3990:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_L, 1 ),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4222);if(r)goto S_3990;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4222);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4222);}while(r); } do{ qbs_set(__STRING_N2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4224);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(4225);}while(r); do{ qbs_set(__STRING_SYMBOL2,FUNC_REMOVESYMBOL(__STRING_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4228);}while(r); S_3998:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_N2)== 0 )))||new_error){ if(qbevent){evnt(4229);if(r)goto S_3998;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4229);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4229);}while(r); } S_4002:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4231);if(r)goto S_4002;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4231);}while(r); } S_4005:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SYMBOL2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4232);if(r)goto S_4005;} do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(4232);}while(r); } do{ *__LONG_M= 0 ; if(!qbevent)break;evnt(4233);}while(r); S_4009:; fornext_value527= 2 ; fornext_finalvalue527=*__LONG_N2; fornext_step527= 1 ; if (fornext_step527<0) fornext_step_negative527=1; else fornext_step_negative527=0; if (new_error) goto fornext_error527; goto fornext_entrylabel527; while(1){ fornext_value527=fornext_step527+(*__LONG_I2); fornext_entrylabel527: *__LONG_I2=fornext_value527; if (fornext_step_negative527){ if (fornext_value527fornext_finalvalue527) break; } fornext_error527:; if(qbevent){evnt(4234);if(r)goto S_4009;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4235);}while(r); S_4011:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4236);if(r)goto S_4011;} S_4012:; if ((-(*__LONG_M!= 0 ))||new_error){ if(qbevent){evnt(4237);if(r)goto S_4012;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4237);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4237);}while(r); } do{ *__LONG_M= 1 ; if(!qbevent)break;evnt(4238);}while(r); do{ *__LONG_ARRAY= 1 ; if(!qbevent)break;evnt(4239);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4240);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(4241);}while(r); } S_4021:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(4243);if(r)goto S_4021;} S_4022:; if ((-(*__LONG_M!= 1 ))||new_error){ if(qbevent){evnt(4244);if(r)goto S_4022;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4244);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4244);}while(r); } do{ *__LONG_M= 2 ; if(!qbevent)break;evnt(4245);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4246);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(4247);}while(r); } S_4030:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_E),qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(4249);if(r)goto S_4030;} S_4031:; if (((-(*__LONG_M!= 0 ))&(-(*__LONG_M!= 2 )))||new_error){ if(qbevent){evnt(4250);if(r)goto S_4031;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4250);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4250);}while(r); } do{ *__LONG_M= 3 ; if(!qbevent)break;evnt(4251);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("AS",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4252);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(4253);}while(r); } S_4039:; if ((-(*__LONG_M== 1 ))||new_error){ if(qbevent){evnt(4255);if(r)goto S_4039;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4255);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(4255);}while(r); } S_4043:; if ((-(*__LONG_M!= 3 ))||new_error){ if(qbevent){evnt(4256);if(r)goto S_4043;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4256);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4256);}while(r); } S_4047:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4257);if(r)goto S_4047;} do{ qbs_set(__STRING_T2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4257);}while(r); }else{ do{ qbs_set(__STRING_T2,qbs_add(qbs_add(__STRING_T2,qbs_new_txt_len(" ",1)),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4257);}while(r); } LABEL_GOTAA2:; if(qbevent){evnt(4258);r=0;} } fornext_exit_526:; S_4053:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_SYMBOL2,qbs_new_txt_len("",0)))&(qbs_notequal(__STRING_T2,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(4260);if(r)goto S_4053;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4260);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4260);}while(r); } S_4057:; if ((qbs_cleanup(qbs_tmp_base,__STRING_T2->len))||new_error){ if(qbevent){evnt(4263);if(r)goto S_4057;} do{ qbs_set(__STRING_T2,qbs_ucase(__STRING_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4264);}while(r); do{ qbs_set(__STRING_T3,__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4265);}while(r); do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4266);}while(r); S_4061:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4267);if(r)goto S_4061;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4267);}while(r); } S_4064:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(4268);if(r)goto S_4064;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4268);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4268);}while(r); } S_4068:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(4269);if(r)goto S_4068;} do{ qbs_set(__STRING_T3,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*__LONG_TYP& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4270);}while(r); }else{ S_4071:; fornext_value530= 1 ; fornext_finalvalue530=4; fornext_step530= 1 ; if (fornext_step530<0) fornext_step_negative530=1; else fornext_step_negative530=0; if (new_error) goto fornext_error530; goto fornext_entrylabel530; while(1){ fornext_value530=fornext_step530+(*__LONG_T3I); fornext_entrylabel530: *__LONG_T3I=fornext_value530; if (fornext_step_negative530){ if (fornext_value530fornext_finalvalue530) break; } fornext_error530:; if(qbevent){evnt(4272);if(r)goto S_4071;} S_4072:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_T3,*__LONG_T3I)== 32 )))||new_error){ if(qbevent){evnt(4273);if(r)goto S_4072;} do{ tqbs=__STRING_T3; if (!new_error){ tmp_fileno=*__LONG_T3I; if (!new_error){ tmp_long=qbs_asc(__STRING1_SP); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(4273);}while(r); } } fornext_exit_529:; } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_T3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4276);}while(r); } S_4079:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4279);if(r)goto S_4079;} do{ qbs_set(__STRING_T2,__STRING_SYMBOL2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4279);}while(r); } S_4082:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4280);if(r)goto S_4082;} S_4083:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N2, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(4281);if(r)goto S_4083;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(4281);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N2))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4281);}while(r); } do{ qbs_set(__STRING_T2,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[array_check((*__LONG_V)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4282);}while(r); do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(4283);}while(r); } S_4091:; if ((-(*__LONG_ARRAY== 1 ))||new_error){ if(qbevent){evnt(4289);if(r)goto S_4091;} S_4092:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4290);if(r)goto S_4092;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Arrays cannot be passed to a library",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4290);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4290);}while(r); } do{ *__INTEGER_DIMSFARRAY= 1 ; if(!qbevent)break;evnt(4291);}while(r); do{ *__LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2744)),100,1),*__LONG_PARAMS, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4293);}while(r); S_4098:; if ((*__LONG_NELEREQ)||new_error){ if(qbevent){evnt(4294);if(r)goto S_4098;} do{ *__LONG_NELE=*__LONG_NELEREQ; if(!qbevent)break;evnt(4295);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2644)),100,1),*__LONG_PARAMS, 1 ,func_chr(*__LONG_NELE),1); if(!qbevent)break;evnt(4296);}while(r); do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860)),(((char*)__UDT_ID2)+(0)),2860); if(!qbevent)break;evnt(4298);}while(r); do{ *__LONG_IGNORE=FUNC_DIM2(__STRING_N2,__STRING_T2,__LONG_DIMMETHOD,FUNC_STR2(__LONG_NELE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4300);}while(r); S_4103:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4301);if(r)goto S_4103;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4301);}while(r); } }else{ do{ *__LONG_NELE= 1 ; if(!qbevent)break;evnt(4303);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2644)),100,1),*__LONG_PARAMS, 1 ,func_chr(*__LONG_NELE),1); if(!qbevent)break;evnt(4304);}while(r); do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860)),(((char*)__UDT_ID2)+(0)),2860); if(!qbevent)break;evnt(4306);}while(r); do{ *__LONG_IGNORE=FUNC_DIM2(__STRING_N2,__STRING_T2,__LONG_DIMMETHOD,qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4308);}while(r); S_4111:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4309);if(r)goto S_4111;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4309);}while(r); } } do{ *__INTEGER_DIMSFARRAY= 0 ; if(!qbevent)break;evnt(4312);}while(r); do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass532= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4313);}while(r); S_4117:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4314);if(r)goto S_4117;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4314);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip533; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("ptrszint*",9),__STRING_R), 0 , 0 , 0 ); if (new_error) goto skip533; skip533: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4315);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip534; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("ptrszint*",9),__STRING_R), 0 , 0 , 0 ); if (new_error) goto skip534; skip534: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4316);}while(r); }else{ S_4123:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4319);if(r)goto S_4123;} S_4124:; fornext_value536= 1 ; fornext_finalvalue536=*__LONG_LASTTYPE; fornext_step536= 1 ; if (fornext_step536<0) fornext_step_negative536=1; else fornext_step_negative536=0; if (new_error) goto fornext_error536; goto fornext_entrylabel536; while(1){ fornext_value536=fornext_step536+(*__LONG_XX); fornext_entrylabel536: *__LONG_XX=fornext_value536; if (fornext_step_negative536){ if (fornext_value536fornext_finalvalue536) break; } fornext_error536:; if(qbevent){evnt(4321);if(r)goto S_4124;} S_4125:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[(array_check((*__LONG_XX)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]))*256],256,1)))))||new_error){ if(qbevent){evnt(4322);if(r)goto S_4125;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip537; sub_file_print(tmp_fileno,qbs_new_txt_len("void*",5), 0 , 0 , 1 ); if (new_error) goto skip537; skip537: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4323);}while(r); do{ goto LABEL_DECUDT; if(!qbevent)break;evnt(4324);}while(r); } } fornext_exit_535:; do{ qbs_set(__STRING_T,FUNC_TYP2CTYP(&(pass538= 0 ),__STRING_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4327);}while(r); S_4131:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4329);if(r)goto S_4131;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4329);}while(r); } S_4134:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(4330);if(r)goto S_4134;} do{ qbs_set(__STRING_T,qbs_new_txt_len("char*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4331);}while(r); S_4136:; if ((-(*__LONG_BYVALUE== 1 ))||new_error){ if(qbevent){evnt(4332);if(r)goto S_4136;} do{ qbs_set(__STRING_A,qbs_new_txt_len("STRINGs cannot be passed using BYVAL",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4332);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4332);}while(r); } do{ *__LONG_BYVALUE= 1 ; if(!qbevent)break;evnt(4333);}while(r); } S_4142:; if ((*__LONG_BYVALUE)||new_error){ if(qbevent){evnt(4335);if(r)goto S_4142;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip539; sub_file_print(tmp_fileno,__STRING_T, 0 , 0 , 0 ); if (new_error) goto skip539; skip539: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4335);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip540; sub_file_print(tmp_fileno,qbs_add(__STRING_T,qbs_new_txt_len("*",1)), 0 , 0 , 0 ); if (new_error) goto skip540; skip540: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4335);}while(r); } LABEL_DECUDT:; if(qbevent){evnt(4336);r=0;} do{ goto LABEL_DECLIBJMP3; if(!qbevent)break;evnt(4337);}while(r); } do{ *__INTEGER_DIMSFARRAY= 1 ; if(!qbevent)break;evnt(4340);}while(r); do{ *__LONG_IGNORE=FUNC_DIM2(__STRING_N2,__STRING_T2,__LONG_DIMMETHOD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4341);}while(r); S_4151:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4342);if(r)goto S_4151;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4342);}while(r); } do{ *__INTEGER_DIMSFARRAY= 0 ; if(!qbevent)break;evnt(4345);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4346);}while(r); do{ *__LONG_TYP=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(4347);}while(r); do{ qbs_set(__STRING_T,FUNC_TYP2CTYP(__LONG_TYP,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4349);}while(r); S_4158:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4350);if(r)goto S_4158;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4350);}while(r); } S_4161:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4354);if(r)goto S_4161;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot find C type to return array data",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4354);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4354);}while(r); } do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass541= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4357);}while(r); S_4166:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4358);if(r)goto S_4166;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4358);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip542; sub_file_print(tmp_fileno,qbs_add(qbs_add(__STRING_T,qbs_new_txt_len("*",1)),__STRING_R), 0 , 0 , 0 ); if (new_error) goto skip542; skip542: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4359);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip543; sub_file_print(tmp_fileno,qbs_add(qbs_add(__STRING_T,qbs_new_txt_len("*",1)),__STRING_R), 0 , 0 , 0 ); if (new_error) goto skip543; skip543: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4360);}while(r); S_4171:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(4361);if(r)goto S_4171;} do{ qbs_set(__STRING_U,FUNC_STR2(&(pass544=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4362);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip545; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs*oldstr",10),__STRING_U),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip545; skip545: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4363);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip546; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(",3),__STRING_R),qbs_new_txt_len("->tmp||",7)),__STRING_R),qbs_new_txt_len("->fixed||",9)),__STRING_R),qbs_new_txt_len("->readonly){",12)), 0 , 0 , 1 ); if (new_error) goto skip546; skip546: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4364);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip547; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("oldstr",6),__STRING_U),qbs_new_txt_len("=",1)),__STRING_R),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip547; skip547: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4365);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip548; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (oldstr",10),__STRING_U),qbs_new_txt_len("->cmem_descriptor){",19)), 0 , 0 , 1 ); if (new_error) goto skip548; skip548: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4367);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip549; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_R,qbs_new_txt_len("=qbs_new_cmem(oldstr",20)),__STRING_U),qbs_new_txt_len("->len,0);",9)), 0 , 0 , 1 ); if (new_error) goto skip549; skip549: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4368);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip550; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip550; skip550: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4369);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip551; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_R,qbs_new_txt_len("=qbs_new(oldstr",15)),__STRING_U),qbs_new_txt_len("->len,0);",9)), 0 , 0 , 1 ); if (new_error) goto skip551; skip551: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4370);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip552; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip552; skip552: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4371);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip553; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memcpy(",7),__STRING_R),qbs_new_txt_len("->chr,oldstr",12)),__STRING_U),qbs_new_txt_len("->chr,oldstr",12)),__STRING_U),qbs_new_txt_len("->len);",7)), 0 , 0 , 1 ); if (new_error) goto skip553; skip553: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4373);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip554; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip554; skip554: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4374);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 19 ; if (new_error) goto skip555; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(oldstr",9),__STRING_U),qbs_new_txt_len("){",2)), 0 , 0 , 1 ); if (new_error) goto skip555; skip555: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4376);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 19 ; if (new_error) goto skip556; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(oldstr",9),__STRING_U),qbs_new_txt_len("->fixed)qbs_set(oldstr",22)),__STRING_U),qbs_new_txt_len(",",1)),__STRING_R),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip556; skip556: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4377);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 19 ; if (new_error) goto skip557; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),__STRING_R),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip557; skip557: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4378);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 19 ; if (new_error) goto skip558; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip558; skip558: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4379);}while(r); } } LABEL_DECLIBJMP3:; if(qbevent){evnt(4382);r=0;} S_4189:; if ((-(*__LONG_I!=(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(4383);if(r)goto S_4189;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4383);}while(r); } do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4385);}while(r); }else{ do{ qbs_set(__STRING_A2,qbs_add(qbs_add(__STRING_A2,__STRING_E),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4387);}while(r); S_4195:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(4388);if(r)goto S_4195;} do{ goto LABEL_GETLASTPARAM2; if(!qbevent)break;evnt(4388);}while(r); } } } fornext_exit_518:; LABEL_NOSFPARAMS2:; if(qbevent){evnt(4391);r=0;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4392);}while(r); } do{ *__LONG_ALLOWLOCALNAME= 0 ; if(!qbevent)break;evnt(4394);}while(r); S_4203:; if ((*__LONG_ADDSTATIC2LAYOUT)||new_error){ if(qbevent){evnt(4396);if(r)goto S_4203;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("STATIC",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4396);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4397);}while(r); S_4207:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4397);if(r)goto S_4207;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4397);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4397);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip560; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip560; skip560: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4399);}while(r); S_4213:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4401);if(r)goto S_4213;} do{ goto LABEL_DECLIBJMP4; if(!qbevent)break;evnt(4401);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip561; sub_file_print(tmp_fileno,qbs_new_txt_len("){",2), 0 , 0 , 1 ); if (new_error) goto skip561; skip561: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4403);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip562; sub_file_print(tmp_fileno,qbs_new_txt_len("qbs *tqbs;",10), 0 , 0 , 1 ); if (new_error) goto skip562; skip562: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4404);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip563; sub_file_print(tmp_fileno,qbs_new_txt_len("ptrszint tmp_long;",18), 0 , 0 , 1 ); if (new_error) goto skip563; skip563: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4405);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip564; sub_file_print(tmp_fileno,qbs_new_txt_len("int32 tmp_fileno;",17), 0 , 0 , 1 ); if (new_error) goto skip564; skip564: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4406);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip565; sub_file_print(tmp_fileno,qbs_new_txt_len("uint32 qbs_tmp_base=qbs_tmp_list_nexti;",39), 0 , 0 , 1 ); if (new_error) goto skip565; skip565: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4407);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip566; sub_file_print(tmp_fileno,qbs_new_txt_len("uint8 *tmp_mem_static_pointer=mem_static_pointer;",49), 0 , 0 , 1 ); if (new_error) goto skip566; skip566: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4408);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip567; sub_file_print(tmp_fileno,qbs_new_txt_len("uint32 tmp_cmem_sp=cmem_sp;",27), 0 , 0 , 1 ); if (new_error) goto skip567; skip567: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4409);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip568; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("data",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip568; skip568: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4410);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip569; sub_file_print(tmp_fileno,qbs_new_txt_len("if (new_error) goto exit_subfunc;",33), 0 , 0 , 1 ); if (new_error) goto skip569; skip569: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4411);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip570; sub_file_print(tmp_fileno,qbs_new_txt_len("mem_lock *sf_mem_lock;",22), 0 , 0 , 1 ); if (new_error) goto skip570; skip570: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4415);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip571; sub_file_print(tmp_fileno,qbs_new_txt_len("new_mem_lock();",15), 0 , 0 , 1 ); if (new_error) goto skip571; skip571: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4416);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip572; sub_file_print(tmp_fileno,qbs_new_txt_len("sf_mem_lock=mem_lock_tmp;",25), 0 , 0 , 1 ); if (new_error) goto skip572; skip572: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4417);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip573; sub_file_print(tmp_fileno,qbs_new_txt_len("sf_mem_lock->type=3;",20), 0 , 0 , 1 ); if (new_error) goto skip573; skip573: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4418);}while(r); do{ *__LONG_DIMSTATIC=*__LONG_STATICSF; if(!qbevent)break;evnt(4424);}while(r); LABEL_DECLIBJMP4:; if(qbevent){evnt(4426);r=0;} S_4230:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4428);if(r)goto S_4230;} S_4231:; if ((*__LONG_CUSTOMTYPELIBRARY)||new_error){ if(qbevent){evnt(4430);if(r)goto S_4231;} do{ qbs_set(__STRING_CALLNAME,FUNC_REMOVECAST(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4432);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 17 ; if (new_error) goto skip574; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CUSTOMCALL_",11),__STRING_CALLNAME),qbs_new_txt_len(" *",2)),__STRING_CALLNAME),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip574; skip574: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4434);}while(r); S_4234:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(4436);if(r)goto S_4234;} do{ *__LONG_F=func_freefile(); if(!qbevent)break;evnt(4437);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12)), 5 ,NULL,NULL,*__LONG_F,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4438);}while(r); }else{ do{ *__LONG_F= 13 ; if(!qbevent)break;evnt(4440);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_F; if (new_error) goto skip575; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_CALLNAME,qbs_new_txt_len("=(CUSTOMCALL_",13)),__STRING_CALLNAME),qbs_new_txt_len("*)&",3)),__STRING_ALIASNAME),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip575; skip575: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4444);}while(r); S_4241:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(4446);if(r)goto S_4241;} do{ sub_close(*__LONG_F,1); if(!qbevent)break;evnt(4446);}while(r); } S_4244:; if (((-(*__LONG_SFHEADER== 0 ))&(-(*__LONG_SFDECLARE!= 0 )))||new_error){ if(qbevent){evnt(4449);if(r)goto S_4244;} do{ *__LONG_RESOLVESTATICFUNCTIONS=*__LONG_RESOLVESTATICFUNCTIONS+ 1 ; if(!qbevent)break;evnt(4450);}while(r); S_4246:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_RESOLVESTATICFUNCTIONS>func_ubound(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME,1,1))))||new_error){ if(qbevent){evnt(4452);if(r)goto S_4246;} do{ if (__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]&1){ preserved_elements=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4]= 1 ; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]=(*__LONG_RESOLVESTATICFUNCTIONS+ 100 )-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4]+1; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[2]&1){ preserved_elements=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; } else preserved_elements=0; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4]= 1 ; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]=(*__LONG_RESOLVESTATICFUNCTIONS+ 100 )-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4]+1; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&1){ preserved_elements=__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]; } else preserved_elements=0; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4]= 1 ; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]=(*__LONG_RESOLVESTATICFUNCTIONS+ 100 )-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4]+1; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[6]=1; if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0])); tmp_long=__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsfunc_ubound(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME,1,1))))||new_error){ if(qbevent){evnt(4495);if(r)goto S_4282;} do{ if (__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[2]&1){ preserved_elements=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4]= 1 ; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]=(*__LONG_RESOLVESTATICFUNCTIONS+ 100 )-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4]+1; __ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[2]&1){ preserved_elements=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; } else preserved_elements=0; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4]= 1 ; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]=(*__LONG_RESOLVESTATICFUNCTIONS+ 100 )-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4]+1; __ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&1){ preserved_elements=__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]; } else preserved_elements=0; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4]= 1 ; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]=(*__LONG_RESOLVESTATICFUNCTIONS+ 100 )-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4]+1; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[6]=1; if (__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0])); tmp_long=__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5]; __ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementslen== 0 )))||new_error){ if(qbevent){evnt(4524);if(r)goto S_4309;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("END ",4),__STRING_SECONDELEMENT),qbs_new_txt_len(" without ",9)),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4524);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4524);}while(r); } S_4313:; if ((*__INTEGER_CONTROLLEVEL)||new_error){ if(qbevent){evnt(4527);if(r)goto S_4313;} do{ *__LONG_X=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(4528);}while(r); S_4315:; if ((-(*__LONG_X== 1 ))||new_error){ if(qbevent){evnt(4529);if(r)goto S_4315;} do{ qbs_set(__STRING_A,qbs_new_txt_len("IF without END IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4529);}while(r); } S_4318:; if ((-(*__LONG_X== 2 ))||new_error){ if(qbevent){evnt(4530);if(r)goto S_4318;} do{ qbs_set(__STRING_A,qbs_new_txt_len("FOR without NEXT",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4530);}while(r); } S_4321:; if (((-(*__LONG_X== 3 ))|(-(*__LONG_X== 4 )))||new_error){ if(qbevent){evnt(4531);if(r)goto S_4321;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO without LOOP",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4531);}while(r); } S_4324:; if ((-(*__LONG_X== 5 ))||new_error){ if(qbevent){evnt(4532);if(r)goto S_4324;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE without WEND",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4532);}while(r); } S_4327:; if (((((-(*__LONG_X>= 10 ))&(-(*__LONG_X<= 17 ))))|(-(*__LONG_X== 18 ))|(-(*__LONG_X== 19 )))||new_error){ if(qbevent){evnt(4533);if(r)goto S_4327;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SELECT CASE without END SELECT",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4533);}while(r); } do{ *__LONG_LINENUMBER=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(4534);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4535);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_FIRSTELEMENT,__STRING1_SP),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4538);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4539);}while(r); S_4335:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4539);if(r)goto S_4335;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4539);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4539);}while(r); } do{ qbs_set(__STRING_STATICARRAYLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4541);}while(r); do{ *__LONG_STATICARRAYLISTN= 0 ; if(!qbevent)break;evnt(4541);}while(r); do{ *__LONG_DIMSTATIC= 0 ; if(!qbevent)break;evnt(4542);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip585; sub_file_print(tmp_fileno,qbs_new_txt_len("exit_subfunc:;",14), 0 , 0 , 1 ); if (new_error) goto skip585; skip585: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4543);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip586; sub_file_print(tmp_fileno,qbs_new_txt_len("free_mem_lock(sf_mem_lock);",27), 0 , 0 , 1 ); if (new_error) goto skip586; skip586: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4546);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip587; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("free",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip587; skip587: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4548);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip588; sub_file_print(tmp_fileno,qbs_new_txt_len("if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;",164), 0 , 0 , 1 ); if (new_error) goto skip588; skip588: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4549);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip589; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp=tmp_cmem_sp;",20), 0 , 0 , 1 ); if (new_error) goto skip589; skip589: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4550);}while(r); S_4348:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SUBFUNCRET,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4551);if(r)goto S_4348;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip590; sub_file_print(tmp_fileno,__STRING_SUBFUNCRET, 0 , 0 , 1 ); if (new_error) goto skip590; skip590: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4551);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip591; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip591; skip591: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4553);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip592; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip592; skip592: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4555);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip593; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip593; skip593: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4556);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip594; sub_file_print(tmp_fileno,qbs_new_txt_len("error(3);",9), 0 , 0 , 1 ); if (new_error) goto skip594; skip594: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4557);}while(r); do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4558);}while(r); S_4356:; fornext_value596= 1 ; fornext_finalvalue596=*__LONG_IDN; fornext_step596= 1 ; if (fornext_step596<0) fornext_step_negative596=1; else fornext_step_negative596=0; if (new_error) goto fornext_error596; goto fornext_entrylabel596; while(1){ fornext_value596=fornext_step596+(*__LONG_I); fornext_entrylabel596: *__LONG_I=fornext_value596; if (fornext_step_negative596){ if (fornext_value596fornext_finalvalue596) break; } fornext_error596:; if(qbevent){evnt(4561);if(r)goto S_4356;} S_4357:; if ((*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2642))& 2 )||new_error){ if(qbevent){evnt(4562);if(r)goto S_4357;} do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2642))=*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2642))- 2 ; if(!qbevent)break;evnt(4562);}while(r); } } fornext_exit_595:; S_4361:; fornext_value598= 1 ; fornext_finalvalue598=*__LONG_REVERTMAYMUSTHAVEN; fornext_step598= 1 ; if (fornext_step598<0) fornext_step_negative598=1; else fornext_step_negative598=0; if (new_error) goto fornext_error598; goto fornext_entrylabel598; while(1){ fornext_value598=fornext_step598+(*__LONG_I); fornext_entrylabel598: *__LONG_I=fornext_value598; if (fornext_step_negative598){ if (fornext_value598fornext_finalvalue598) break; } fornext_error598:; if(qbevent){evnt(4565);if(r)goto S_4361;} do{ *__LONG_X=((int32*)(__ARRAY_LONG_REVERTMAYMUSTHAVE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_REVERTMAYMUSTHAVE[4],__ARRAY_LONG_REVERTMAYMUSTHAVE[5])]; if(!qbevent)break;evnt(4566);}while(r); do{ swap_string(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_X)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1),qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_X)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+520)),8,1)); if(!qbevent)break;evnt(4567);}while(r); } fornext_exit_597:; do{ *__LONG_REVERTMAYMUSTHAVEN= 0 ; if(!qbevent)break;evnt(4569);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4573);}while(r); } } } S_4370:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N>= 1 ))&(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CONST",5)))))||new_error){ if(qbevent){evnt(4581);if(r)goto S_4370;} do{ qbs_set(__STRING_L,qbs_new_txt_len("CONST",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4582);}while(r); S_4372:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(4585);if(r)goto S_4372;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CONST name = value/expression",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4585);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4585);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(4586);}while(r); LABEL_CONSTDEFPENDING:; if(qbevent){evnt(4588);r=0;} do{ *__LONG_PENDING= 0 ; if(!qbevent)break;evnt(4589);}while(r); do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4591);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(4591);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_N),__STRING1_SP),qbs_new_txt_len("=",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4592);}while(r); do{ *__LONG_TYPEOVERRIDE= 0 ; if(!qbevent)break;evnt(4593);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4594);}while(r); S_4383:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4595);if(r)goto S_4383;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4595);}while(r); } S_4386:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4596);if(r)goto S_4386;} do{ *__LONG_TYPEOVERRIDE=FUNC_TYPNAME2TYP(__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4597);}while(r); S_4388:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4598);if(r)goto S_4388;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4598);}while(r); } S_4391:; if ((*__LONG_TYPEOVERRIDE&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(4599);if(r)goto S_4391;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4599);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4599);}while(r); } S_4395:; if ((-(*__LONG_TYPEOVERRIDE== 0 ))||new_error){ if(qbevent){evnt(4600);if(r)goto S_4395;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4600);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4600);}while(r); } } S_4400:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(4603);if(r)goto S_4400;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4603);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4603);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(4604);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4607);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(4608);}while(r); S_4407:; fornext_value600=*__LONG_I; fornext_finalvalue600=*__LONG_N; fornext_step600= 1 ; if (fornext_step600<0) fornext_step_negative600=1; else fornext_step_negative600=0; if (new_error) goto fornext_error600; goto fornext_entrylabel600; while(1){ fornext_value600=fornext_step600+(*__LONG_I2); fornext_entrylabel600: *__LONG_I2=fornext_value600; if (fornext_step_negative600){ if (fornext_value600fornext_finalvalue600) break; } fornext_error600:; if(qbevent){evnt(4609);if(r)goto S_4407;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4610);}while(r); S_4409:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4611);if(r)goto S_4409;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(4611);}while(r); } S_4412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(4612);if(r)goto S_4412;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(4612);}while(r); } S_4415:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(4613);if(r)goto S_4415;} do{ *__LONG_PENDING= 1 ; if(!qbevent)break;evnt(4614);}while(r); do{ *__LONG_I=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(4615);}while(r); S_4418:; if ((-(*__LONG_I>(*__LONG_N- 2 )))||new_error){ if(qbevent){evnt(4616);if(r)goto S_4418;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CONST ... , name = value/expression",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4616);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4616);}while(r); } do{ goto fornext_exit_599; if(!qbevent)break;evnt(4617);}while(r); } S_4424:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(4619);if(r)goto S_4424;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4619);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4619);}while(r); } } fornext_exit_599:; do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4622);}while(r); S_4431:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4623);if(r)goto S_4431;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4623);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4624);}while(r); do{ qbs_set(__STRING_HASHNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4629);}while(r); do{ *__LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(4630);}while(r); do{ *__LONG_HASHRES=FUNC_HASHFIND(__STRING_HASHNAME,__LONG_HASHCHKFLAGS,__LONG_HASHRESFLAGS,__LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4631);}while(r); S_4438:; while((*__LONG_HASHRES)||new_error){ if(qbevent){evnt(4632);if(r)goto S_4438;} S_4439:; if ((-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*__LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(4633);if(r)goto S_4439;} do{ tmp_long=array_check((*__LONG_HASHRESREF)-__ARRAY_LONG_CONSTDEFINED[4],__ARRAY_LONG_CONSTDEFINED[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONSTDEFINED[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(4633);}while(r); do{ goto dl_exit_602; if(!qbevent)break;evnt(4633);}while(r); } S_4443:; if ((-(*__LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(4634);if(r)goto S_4443;} do{ *__LONG_HASHRES=FUNC_HASHFINDCONT(__LONG_HASHRESFLAGS,__LONG_HASHRESREF); if(!qbevent)break;evnt(4634);}while(r); }else{ do{ *__LONG_HASHRES= 0 ; if(!qbevent)break;evnt(4634);}while(r); } } dl_exit_602:; S_4449:; if ((*__LONG_PENDING)||new_error){ if(qbevent){evnt(4637);if(r)goto S_4449;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4637);}while(r); do{ goto LABEL_CONSTDEFPENDING; if(!qbevent)break;evnt(4637);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4639);}while(r); S_4454:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4639);if(r)goto S_4454;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4639);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4639);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4641);}while(r); } LABEL_PREDEFINE:; if(qbevent){evnt(4644);r=0;} S_4461:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(4645);if(r)goto S_4461;} do{ *__LONG_ASREQ= 0 ; if(!qbevent)break;evnt(4646);}while(r); S_4463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFINT",6))))||new_error){ if(qbevent){evnt(4647);if(r)goto S_4463;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_A,__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),qbs_new_txt_len("INTEGER",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4647);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(4647);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(4647);}while(r); } S_4468:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFLNG",6))))||new_error){ if(qbevent){evnt(4648);if(r)goto S_4468;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_A,__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),qbs_new_txt_len("LONG",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4648);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(4648);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(4648);}while(r); } S_4473:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFSNG",6))))||new_error){ if(qbevent){evnt(4649);if(r)goto S_4473;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_A,__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),qbs_new_txt_len("SINGLE",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4649);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(4649);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(4649);}while(r); } S_4478:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFDBL",6))))||new_error){ if(qbevent){evnt(4650);if(r)goto S_4478;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_A,__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),qbs_new_txt_len("DOUBLE",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4650);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(4650);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(4650);}while(r); } S_4483:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFSTR",6))))||new_error){ if(qbevent){evnt(4651);if(r)goto S_4483;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_A,__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),qbs_new_txt_len("STRING",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4651);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(4651);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(4651);}while(r); } S_4488:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_DEFINE",7))))||new_error){ if(qbevent){evnt(4652);if(r)goto S_4488;} do{ *__LONG_ASREQ= 1 ; if(!qbevent)break;evnt(4653);}while(r); LABEL_DEFINETYPE:; if(qbevent){evnt(4654);r=0;} do{ qbs_set(__STRING_L,__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4655);}while(r); do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4657);}while(r); do{ qbs_set(__STRING_TYP2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4658);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4659);}while(r); S_4494:; fornext_value605=*__LONG_N; fornext_finalvalue605= 2 ; fornext_step605= -1 ; if (fornext_step605<0) fornext_step_negative605=1; else fornext_step_negative605=0; if (new_error) goto fornext_error605; goto fornext_entrylabel605; while(1){ fornext_value605=fornext_step605+(*__LONG_I); fornext_entrylabel605: *__LONG_I=fornext_value605; if (fornext_step_negative605){ if (fornext_value605fornext_finalvalue605) break; } fornext_error605:; if(qbevent){evnt(4660);if(r)goto S_4494;} do{ qbs_set(__STRING_T,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4661);}while(r); S_4496:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(4662);if(r)goto S_4496;} do{ goto fornext_exit_604; if(!qbevent)break;evnt(4662);}while(r); } do{ qbs_set(__STRING_TYP,qbs_add(qbs_add(__STRING_T,qbs_new_txt_len(" ",1)),__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4663);}while(r); do{ qbs_set(__STRING_TYP2,qbs_add(qbs_add(__STRING_T,__STRING1_SP),__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4664);}while(r); } fornext_exit_604:; do{ qbs_set(__STRING_TYP,qbs_rtrim(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4666);}while(r); S_4503:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_T,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(4667);if(r)goto S_4503;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected ... AS ...",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4667);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4667);}while(r); } S_4507:; if (((-(*__LONG_I==*__LONG_N))|(-(*__LONG_I== 2 )))||new_error){ if(qbevent){evnt(4668);if(r)goto S_4507;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected ... AS ...",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4668);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4668);}while(r); } do{ *__LONG_N=*__LONG_I- 1 ; if(!qbevent)break;evnt(4671);}while(r); do{ *__LONG_I= 2 - 1 ; if(!qbevent)break;evnt(4673);}while(r); LABEL_DEFINENEXT:; if(qbevent){evnt(4674);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(4676);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4676);}while(r); do{ *__LONG_E=qbs_asc(qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4676);}while(r); S_4516:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len> 1 )))||new_error){ if(qbevent){evnt(4677);if(r)goto S_4516;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected an alphabet letter or the underscore character (_)",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4677);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4677);}while(r); } S_4520:; if (((-(*__LONG_E!= 95 ))&(((-(*__LONG_E> 90 ))|(-(*__LONG_E< 65 )))))||new_error){ if(qbevent){evnt(4678);if(r)goto S_4520;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected an alphabet letter or the underscore character (_)",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4678);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4678);}while(r); } S_4524:; if ((-(*__LONG_E== 95 ))||new_error){ if(qbevent){evnt(4679);if(r)goto S_4524;} do{ *__LONG_E= 27 ; if(!qbevent)break;evnt(4679);}while(r); }else{ do{ *__LONG_E=*__LONG_E- 64 ; if(!qbevent)break;evnt(4679);}while(r); } do{ tmp_long=array_check((*__LONG_E)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[tmp_long])),__STRING_TYP); if(!qbevent)break;evnt(4680);}while(r); do{ tmp_long=array_check((*__LONG_E)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[tmp_long])),FUNC_TYPE2SYMBOL(__STRING_TYP)); if(!qbevent)break;evnt(4681);}while(r); S_4531:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4682);if(r)goto S_4531;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4682);}while(r); } do{ *__LONG_FIRSTE=*__LONG_E; if(!qbevent)break;evnt(4683);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4684);}while(r); S_4536:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(4686);if(r)goto S_4536;} S_4537:; if ((-(*__LONG_PREDEFINING== 1 ))||new_error){ if(qbevent){evnt(4687);if(r)goto S_4537;} do{ goto LABEL_PREDEFINED; if(!qbevent)break;evnt(4687);}while(r); } S_4540:; if ((*__LONG_ASREQ)||new_error){ if(qbevent){evnt(4688);if(r)goto S_4540;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4688);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4689);}while(r); S_4544:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4689);if(r)goto S_4544;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4689);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4689);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4690);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(4694);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4694);}while(r); S_4553:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_E,qbs_new_txt_len("-",1)))&(qbs_notequal(__STRING_E,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(4695);if(r)goto S_4553;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected - or ,",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4695);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4695);}while(r); } S_4557:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(4696);if(r)goto S_4557;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len("-",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4697);}while(r); S_4559:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(4698);if(r)goto S_4559;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Syntax incomplete",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4698);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4698);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(4700);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4700);}while(r); do{ *__LONG_E=qbs_asc(qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4700);}while(r); S_4566:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len> 1 )))||new_error){ if(qbevent){evnt(4701);if(r)goto S_4566;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected an alphabet letter or the underscore character (_)",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4701);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4701);}while(r); } S_4570:; if (((-(*__LONG_E!= 95 ))&(((-(*__LONG_E> 90 ))|(-(*__LONG_E< 65 )))))||new_error){ if(qbevent){evnt(4702);if(r)goto S_4570;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected an alphabet letter or the underscore character (_)",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4702);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4702);}while(r); } S_4574:; if ((-(*__LONG_E== 95 ))||new_error){ if(qbevent){evnt(4703);if(r)goto S_4574;} do{ *__LONG_E= 27 ; if(!qbevent)break;evnt(4703);}while(r); }else{ do{ *__LONG_E=*__LONG_E- 64 ; if(!qbevent)break;evnt(4703);}while(r); } S_4579:; if ((-(*__LONG_FIRSTE>*__LONG_E))||new_error){ if(qbevent){evnt(4704);if(r)goto S_4579;} do{ swap_32(&*__LONG_E,&*__LONG_FIRSTE); if(!qbevent)break;evnt(4704);}while(r); } S_4582:; fornext_value610=*__LONG_FIRSTE; fornext_finalvalue610=*__LONG_E; fornext_step610= 1 ; if (fornext_step610<0) fornext_step_negative610=1; else fornext_step_negative610=0; if (new_error) goto fornext_error610; goto fornext_entrylabel610; while(1){ fornext_value610=fornext_step610+(*__LONG_E2); fornext_entrylabel610: *__LONG_E2=fornext_value610; if (fornext_step_negative610){ if (fornext_value610fornext_finalvalue610) break; } fornext_error610:; if(qbevent){evnt(4705);if(r)goto S_4582;} do{ tmp_long=array_check((*__LONG_E2)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[tmp_long])),__STRING_TYP); if(!qbevent)break;evnt(4706);}while(r); do{ tmp_long=array_check((*__LONG_E2)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[tmp_long])),FUNC_TYPE2SYMBOL(__STRING_TYP)); if(!qbevent)break;evnt(4707);}while(r); S_4585:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4708);if(r)goto S_4585;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4708);}while(r); } } fornext_exit_609:; do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4710);}while(r); S_4590:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(4711);if(r)goto S_4590;} S_4591:; if ((-(*__LONG_PREDEFINING== 1 ))||new_error){ if(qbevent){evnt(4712);if(r)goto S_4591;} do{ goto LABEL_PREDEFINED; if(!qbevent)break;evnt(4712);}while(r); } S_4594:; if ((*__LONG_ASREQ)||new_error){ if(qbevent){evnt(4713);if(r)goto S_4594;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4713);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4714);}while(r); S_4598:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4714);if(r)goto S_4598;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4714);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4714);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4715);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(4718);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4718);}while(r); S_4607:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(4719);if(r)goto S_4607;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_DEFINE: Expected ,",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4719);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4719);}while(r); } } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4721);}while(r); do{ goto LABEL_DEFINENEXT; if(!qbevent)break;evnt(4722);}while(r); } } S_4616:; if ((-(*__LONG_PREDEFINING== 1 ))||new_error){ if(qbevent){evnt(4725);if(r)goto S_4616;} do{ goto LABEL_PREDEFINED; if(!qbevent)break;evnt(4725);}while(r); } S_4619:; if ((qbs_cleanup(qbs_tmp_base,(-(*__INTEGER_CLOSEDMAIN!= 0 ))&(qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(4727);if(r)goto S_4619;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Statement cannot be placed between SUB/FUNCTIONs",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4727);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4727);}while(r); } do{ *__LONG_STATEMENTN=*__LONG_STATEMENTN+ 1 ; if(!qbevent)break;evnt(4731);}while(r); S_4624:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(4734);if(r)goto S_4624;} S_4625:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("NEXT",4))))||new_error){ if(qbevent){evnt(4735);if(r)goto S_4625;} do{ qbs_set(__STRING_L,qbs_new_txt_len("NEXT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4737);}while(r); S_4627:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(4738);if(r)goto S_4627;} do{ goto LABEL_SIMPLENEXT; if(!qbevent)break;evnt(4738);}while(r); } do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4739);}while(r); S_4631:; fornext_value613= 2 ; fornext_finalvalue613=*__LONG_N; fornext_step613= 1 ; if (fornext_step613<0) fornext_step_negative613=1; else fornext_step_negative613=0; if (new_error) goto fornext_error613; goto fornext_entrylabel613; while(1){ fornext_value613=fornext_step613+(*__LONG_I); fornext_entrylabel613: *__LONG_I=fornext_value613; if (fornext_step_negative613){ if (fornext_value613fornext_finalvalue613) break; } fornext_error613:; if(qbevent){evnt(4740);if(r)goto S_4631;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4741);}while(r); S_4633:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(4743);if(r)goto S_4633;} LABEL_LASTNEXTELE:; if(qbevent){evnt(4745);r=0;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4746);}while(r); S_4635:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4747);if(r)goto S_4635;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4747);}while(r); } S_4638:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_L->len== 4 )))||new_error){ if(qbevent){evnt(4748);if(r)goto S_4638;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4748);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4748);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4749);}while(r); S_4644:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4750);if(r)goto S_4644;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4750);}while(r); } S_4647:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(4751);if(r)goto S_4647;} do{ SUB_GETID(&(pass615=qbr(func_val(__STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4752);}while(r); S_4649:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4753);if(r)goto S_4649;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4753);}while(r); } S_4652:; if (((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(4754);if(r)goto S_4652;} S_4653:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(4755);if(r)goto S_4653;} S_4654:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISOFFSETINBITS)== 0 ))||new_error){ if(qbevent){evnt(4756);if(r)goto S_4654;} S_4655:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(4757);if(r)goto S_4655;} do{ goto LABEL_FORNEXTFOUNDVAR2; if(!qbevent)break;evnt(4758);}while(r); } } } } } do{ qbs_set(__STRING_A,qbs_new_txt_len("Unsupported variable after NEXT",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4764);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4764);}while(r); LABEL_FORNEXTFOUNDVAR2:; if(qbevent){evnt(4765);r=0;} LABEL_SIMPLENEXT:; if(qbevent){evnt(4766);r=0;} S_4664:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 2 ))||new_error){ if(qbevent){evnt(4767);if(r)goto S_4664;} do{ qbs_set(__STRING_A,qbs_new_txt_len("NEXT without FOR",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4767);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4767);}while(r); } S_4668:; if (((-(*__LONG_N!= 1 ))&(-(((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5])]!=*__LONG_CURRENTID)))||new_error){ if(qbevent){evnt(4768);if(r)goto S_4668;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Incorrect variable after NEXT",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4768);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4768);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip616; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip616; skip616: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4769);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip617; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("fornext_exit_",13),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip617; skip617: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4770);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(4771);}while(r); S_4675:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(4772);if(r)goto S_4675;} do{ goto fornext_exit_612; if(!qbevent)break;evnt(4772);}while(r); } do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4773);}while(r); }else{ S_4680:; if ((qbs_cleanup(qbs_tmp_base,__STRING_V->len))||new_error){ if(qbevent){evnt(4777);if(r)goto S_4680;} do{ qbs_set(__STRING_V,qbs_add(qbs_add(__STRING_V,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4777);}while(r); }else{ do{ qbs_set(__STRING_V,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4777);}while(r); } S_4685:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(4778);if(r)goto S_4685;} do{ goto LABEL_LASTNEXTELE; if(!qbevent)break;evnt(4778);}while(r); } } } fornext_exit_612:; do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4784);}while(r); S_4691:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4784);if(r)goto S_4691;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4784);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4784);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4785);}while(r); } } S_4699:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(4791);if(r)goto S_4699;} S_4700:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(4792);if(r)goto S_4700;} S_4701:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(4793);if(r)goto S_4701;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip620; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip620; skip620: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4793);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(4793);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(4795);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLREF[0]))[tmp_long]=*__LONG_LINENUMBER; if(!qbevent)break;evnt(4796);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(4797);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLID[0]))[tmp_long]=FUNC_UNIQUENUMBER(); if(!qbevent)break;evnt(4798);}while(r); S_4709:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(4799);if(r)goto S_4709;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass621= 2 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4800);}while(r); S_4711:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4801);if(r)goto S_4711;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4801);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("WHILE",5),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4802);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4803);}while(r); S_4716:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4803);if(r)goto S_4716;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4803);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4803);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4804);}while(r); S_4722:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4805);if(r)goto S_4722;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4805);}while(r); } S_4725:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(4806);if(r)goto S_4725;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass623= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4806);}while(r); } S_4728:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4807);if(r)goto S_4728;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4807);}while(r); } S_4731:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(4808);if(r)goto S_4731;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4808);}while(r); } S_4734:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(4809);if(r)goto S_4734;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE ERROR! Cannot accept a STRING type.",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4809);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4809);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip624; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("while((",7),__STRING_E),qbs_new_txt_len(")||new_error){",14)), 0 , 0 , 1 ); if (new_error) goto skip624; skip624: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4810);}while(r); }else{ do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE ERROR! Expected expression after WHILE.",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4812);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4812);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(4815);}while(r); } } S_4746:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(4819);if(r)goto S_4746;} S_4747:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WEND",4))))||new_error){ if(qbevent){evnt(4820);if(r)goto S_4747;} S_4748:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 5 ))||new_error){ if(qbevent){evnt(4823);if(r)goto S_4748;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WEND without WHILE",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4823);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4823);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip625; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip625; skip625: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4824);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip626; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("ww_exit_",8),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip626; skip626: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4825);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(4826);}while(r); do{ qbs_set(__STRING_L,qbs_new_txt_len("WEND",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4827);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4828);}while(r); S_4757:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4828);if(r)goto S_4757;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4828);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4828);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4829);}while(r); } } S_4765:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(4837);if(r)goto S_4765;} S_4766:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DO",2))))||new_error){ if(qbevent){evnt(4838);if(r)goto S_4766;} S_4767:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(4839);if(r)goto S_4767;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip628; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip628; skip628: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4839);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(4839);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(4840);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLREF[0]))[tmp_long]=*__LONG_LINENUMBER; if(!qbevent)break;evnt(4841);}while(r); do{ qbs_set(__STRING_L,qbs_new_txt_len("DO",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4842);}while(r); S_4774:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(4843);if(r)goto S_4774;} do{ *__LONG_WHILEUNTIL= 0 ; if(!qbevent)break;evnt(4844);}while(r); S_4776:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(4845);if(r)goto S_4776;} do{ *__LONG_WHILEUNTIL= 1 ; if(!qbevent)break;evnt(4845);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("WHILE",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4845);}while(r); } S_4780:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("UNTIL",5))))||new_error){ if(qbevent){evnt(4846);if(r)goto S_4780;} do{ *__LONG_WHILEUNTIL= 2 ; if(!qbevent)break;evnt(4846);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("UNTIL",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4846);}while(r); } S_4784:; if ((-(*__LONG_WHILEUNTIL== 0 ))||new_error){ if(qbevent){evnt(4847);if(r)goto S_4784;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO ERROR! Expected WHILE or UNTIL after DO.",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4847);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4847);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass629= 3 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4848);}while(r); S_4789:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4849);if(r)goto S_4789;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4849);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4850);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4851);}while(r); S_4794:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4852);if(r)goto S_4794;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4852);}while(r); } S_4797:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(4853);if(r)goto S_4797;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass630= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4853);}while(r); } S_4800:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4854);if(r)goto S_4800;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4854);}while(r); } S_4803:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(4855);if(r)goto S_4803;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4855);}while(r); } S_4806:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(4856);if(r)goto S_4806;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO ERROR! Cannot accept a STRING type.",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4856);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4856);}while(r); } S_4810:; if ((-(*__LONG_WHILEUNTIL== 1 ))||new_error){ if(qbevent){evnt(4857);if(r)goto S_4810;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip631; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("while((",7),__STRING_E),qbs_new_txt_len(")||new_error){",14)), 0 , 0 , 1 ); if (new_error) goto skip631; skip631: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4857);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip632; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("while((!(",9),__STRING_E),qbs_new_txt_len("))||new_error){",15)), 0 , 0 , 1 ); if (new_error) goto skip632; skip632: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4857);}while(r); } do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 4 ; if(!qbevent)break;evnt(4858);}while(r); }else{ do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 3 ; if(!qbevent)break;evnt(4860);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip633; sub_file_print(tmp_fileno,qbs_new_txt_len("do{",3), 0 , 0 , 1 ); if (new_error) goto skip633; skip633: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4861);}while(r); } do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLID[0]))[tmp_long]=FUNC_UNIQUENUMBER(); if(!qbevent)break;evnt(4863);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4864);}while(r); S_4822:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4864);if(r)goto S_4822;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4864);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4864);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(4865);}while(r); } } S_4830:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(4869);if(r)goto S_4830;} S_4831:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LOOP",4))))||new_error){ if(qbevent){evnt(4870);if(r)goto S_4831;} do{ qbs_set(__STRING_L,qbs_new_txt_len("LOOP",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4871);}while(r); S_4833:; if (((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 3 ))&(-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 4 )))||new_error){ if(qbevent){evnt(4872);if(r)goto S_4833;} do{ qbs_set(__STRING_A,qbs_new_txt_len("PROGRAM FLOW ERROR!",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4872);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4872);}while(r); } S_4837:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(4873);if(r)goto S_4837;} S_4838:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(4874);if(r)goto S_4838;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip635; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip635; skip635: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4874);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(4874);}while(r); } S_4842:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 4 ))||new_error){ if(qbevent){evnt(4875);if(r)goto S_4842;} do{ qbs_set(__STRING_A,qbs_new_txt_len("PROGRAM FLOW ERROR!",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4875);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4875);}while(r); } do{ *__LONG_WHILEUNTIL= 0 ; if(!qbevent)break;evnt(4876);}while(r); S_4847:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(4877);if(r)goto S_4847;} do{ *__LONG_WHILEUNTIL= 1 ; if(!qbevent)break;evnt(4877);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("WHILE",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4877);}while(r); } S_4851:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("UNTIL",5))))||new_error){ if(qbevent){evnt(4878);if(r)goto S_4851;} do{ *__LONG_WHILEUNTIL= 2 ; if(!qbevent)break;evnt(4878);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("UNTIL",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4878);}while(r); } S_4855:; if ((-(*__LONG_WHILEUNTIL== 0 ))||new_error){ if(qbevent){evnt(4879);if(r)goto S_4855;} do{ qbs_set(__STRING_A,qbs_new_txt_len("LOOP ERROR! Expected WHILE or UNTIL after LOOP.",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4879);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4879);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass636= 3 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4880);}while(r); S_4860:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4881);if(r)goto S_4860;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4881);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4882);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4883);}while(r); S_4865:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4884);if(r)goto S_4865;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4884);}while(r); } S_4868:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(4885);if(r)goto S_4868;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass637= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4885);}while(r); } S_4871:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4886);if(r)goto S_4871;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4886);}while(r); } S_4874:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(4887);if(r)goto S_4874;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4887);}while(r); } S_4877:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(4888);if(r)goto S_4877;} do{ qbs_set(__STRING_A,qbs_new_txt_len("LOOP ERROR! Cannot accept a STRING type.",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4888);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4888);}while(r); } S_4881:; if ((-(*__LONG_WHILEUNTIL== 1 ))||new_error){ if(qbevent){evnt(4889);if(r)goto S_4881;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip638; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("}while((",8),__STRING_E),qbs_new_txt_len(")&&(!new_error));",17)), 0 , 0 , 1 ); if (new_error) goto skip638; skip638: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4889);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip639; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("}while((!(",10),__STRING_E),qbs_new_txt_len("))&&(!new_error));",18)), 0 , 0 , 1 ); if (new_error) goto skip639; skip639: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4889);}while(r); } }else{ S_4887:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 4 ))||new_error){ if(qbevent){evnt(4891);if(r)goto S_4887;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip640; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip640; skip640: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4892);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip641; sub_file_print(tmp_fileno,qbs_new_txt_len("}while(1);",10), 0 , 0 , 1 ); if (new_error) goto skip641; skip641: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4894);}while(r); } } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip642; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("dl_exit_",8),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip642; skip642: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4897);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(4898);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4899);}while(r); S_4896:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4899);if(r)goto S_4896;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4899);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4899);}while(r); } S_4901:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(4900);if(r)goto S_4901;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4900);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(4901);}while(r); } } S_4907:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(4913);if(r)goto S_4907;} S_4908:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FOR",3))))||new_error){ if(qbevent){evnt(4914);if(r)goto S_4908;} S_4909:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(4915);if(r)goto S_4909;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip644; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip644; skip644: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(4915);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(4915);}while(r); } do{ qbs_set(__STRING_L,qbs_new_txt_len("FOR",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4917);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(4918);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLREF[0]))[tmp_long]=*__LONG_LINENUMBER; if(!qbevent)break;evnt(4919);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 2 ; if(!qbevent)break;evnt(4920);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLID[0]))[tmp_long]=FUNC_UNIQUENUMBER(); if(!qbevent)break;evnt(4921);}while(r); do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4923);}while(r); do{ qbs_set(__STRING_STARTVALUE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4924);}while(r); do{ qbs_set(__STRING_P3,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4925);}while(r); do{ *__LONG_STEPUSED= 0 ; if(!qbevent)break;evnt(4925);}while(r); do{ qbs_set(__STRING_P2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4926);}while(r); do{ *__LONG_MODE= 0 ; if(!qbevent)break;evnt(4927);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(4928);}while(r); S_4925:; fornext_value646= 2 ; fornext_finalvalue646=*__LONG_N; fornext_step646= 1 ; if (fornext_step646<0) fornext_step_negative646=1; else fornext_step_negative646=0; if (new_error) goto fornext_error646; goto fornext_entrylabel646; while(1){ fornext_value646=fornext_step646+(*__LONG_I); fornext_entrylabel646: *__LONG_I=fornext_value646; if (fornext_step_negative646){ if (fornext_value646fornext_finalvalue646) break; } fornext_error646:; if(qbevent){evnt(4929);if(r)goto S_4925;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4930);}while(r); S_4927:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(4931);if(r)goto S_4927;} S_4928:; if ((-(*__LONG_MODE!= 0 ))||new_error){ if(qbevent){evnt(4932);if(r)goto S_4928;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(4932);}while(r); do{ goto fornext_exit_645; if(!qbevent)break;evnt(4932);}while(r); } do{ *__LONG_MODE= 1 ; if(!qbevent)break;evnt(4933);}while(r); do{ qbs_set(__STRING_V,FUNC_GETELEMENTS(__STRING_CA,&(pass647= 2 ),&(pass648=*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4934);}while(r); do{ *__LONG_EQUPOS=*__LONG_I; if(!qbevent)break;evnt(4935);}while(r); } S_4936:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("TO",2))))||new_error){ if(qbevent){evnt(4937);if(r)goto S_4936;} S_4937:; if ((-(*__LONG_MODE!= 1 ))||new_error){ if(qbevent){evnt(4938);if(r)goto S_4937;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(4938);}while(r); do{ goto fornext_exit_645; if(!qbevent)break;evnt(4938);}while(r); } do{ *__LONG_MODE= 2 ; if(!qbevent)break;evnt(4939);}while(r); do{ qbs_set(__STRING_STARTVALUE,FUNC_GETELEMENTS(__STRING_CA,&(pass649=*__LONG_EQUPOS+ 1 ),&(pass650=*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4940);}while(r); do{ *__LONG_TOPOS=*__LONG_I; if(!qbevent)break;evnt(4941);}while(r); } S_4945:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("STEP",4))))||new_error){ if(qbevent){evnt(4943);if(r)goto S_4945;} S_4946:; if ((-(*__LONG_MODE!= 2 ))||new_error){ if(qbevent){evnt(4944);if(r)goto S_4946;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(4944);}while(r); do{ goto fornext_exit_645; if(!qbevent)break;evnt(4944);}while(r); } do{ *__LONG_MODE= 3 ; if(!qbevent)break;evnt(4945);}while(r); do{ *__LONG_STEPUSED= 1 ; if(!qbevent)break;evnt(4946);}while(r); do{ qbs_set(__STRING_P2,FUNC_GETELEMENTS(__STRING_CA,&(pass651=*__LONG_TOPOS+ 1 ),&(pass652=*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4947);}while(r); do{ qbs_set(__STRING_P3,FUNC_GETELEMENTS(__STRING_CA,&(pass653=*__LONG_I+ 1 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4948);}while(r); do{ goto fornext_exit_645; if(!qbevent)break;evnt(4949);}while(r); } } fornext_exit_645:; S_4957:; if ((-(*__LONG_MODE< 2 ))||new_error){ if(qbevent){evnt(4952);if(r)goto S_4957;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(4952);}while(r); } S_4960:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_P2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4953);if(r)goto S_4960;} do{ qbs_set(__STRING_P2,FUNC_GETELEMENTS(__STRING_CA,&(pass654=*__LONG_TOPOS+ 1 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4953);}while(r); } S_4963:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_V->len== 0 ))|(-(__STRING_STARTVALUE->len== 0 ))|(-(__STRING_P2->len== 0 ))))||new_error){ if(qbevent){evnt(4954);if(r)goto S_4963;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(4954);}while(r); } S_4966:; if (((-(*__LONG_E!= 0 ))&(-(*__LONG_MODE< 3 )))||new_error){ if(qbevent){evnt(4955);if(r)goto S_4966;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected FOR name = start TO end",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4955);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4955);}while(r); } S_4970:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(4956);if(r)goto S_4970;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected FOR name = start TO end STEP increment",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4956);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4956);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4958);}while(r); S_4975:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4959);if(r)goto S_4975;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4959);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4960);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4961);}while(r); S_4980:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4962);if(r)goto S_4980;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4962);}while(r); } S_4983:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(4963);if(r)goto S_4983;} do{ SUB_GETID(&(pass658=qbr(func_val(__STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4964);}while(r); S_4985:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4965);if(r)goto S_4985;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4965);}while(r); } S_4988:; if (((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(4966);if(r)goto S_4988;} S_4989:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(4967);if(r)goto S_4989;} S_4990:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISOFFSETINBITS)== 0 ))||new_error){ if(qbevent){evnt(4968);if(r)goto S_4990;} S_4991:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(4969);if(r)goto S_4991;} do{ goto LABEL_FORNEXTFOUNDVAR; if(!qbevent)break;evnt(4970);}while(r); } } } } } do{ qbs_set(__STRING_A,qbs_new_txt_len("Unsupported variable used in FOR statement",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4976);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4976);}while(r); LABEL_FORNEXTFOUNDVAR:; if(qbevent){evnt(4977);r=0;} do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[tmp_long]=*__LONG_CURRENTID; if(!qbevent)break;evnt(4978);}while(r); do{ qbs_set(__STRING_V,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4979);}while(r); do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4983);}while(r); do{ *__LONG_CTYP=*__LONG_TYP-*__LONG_ISPOINTER; if(!qbevent)break;evnt(4984);}while(r); do{ *__LONG_BITS=*__LONG_TYP& 511 ; if(!qbevent)break;evnt(4985);}while(r); S_5005:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(4986);if(r)goto S_5005;} S_5006:; if ((-(*__LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(4987);if(r)goto S_5006;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4987);}while(r); do{ *__LONG_CTYP= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(4987);}while(r); } S_5010:; if ((-(*__LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(4988);if(r)goto S_5010;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4988);}while(r); do{ *__LONG_CTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(4988);}while(r); } S_5014:; if ((-(*__LONG_BITS== 256 ))||new_error){ if(qbevent){evnt(4989);if(r)goto S_5014;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4989);}while(r); do{ *__LONG_CTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(4989);}while(r); } }else{ S_5019:; if ((-(*__LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(4991);if(r)goto S_5019;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4991);}while(r); do{ *__LONG_CTYP= 16 ; if(!qbevent)break;evnt(4991);}while(r); } S_5023:; if ((-(*__LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(4992);if(r)goto S_5023;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4992);}while(r); do{ *__LONG_CTYP= 32 ; if(!qbevent)break;evnt(4992);}while(r); } S_5027:; if ((-(*__LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(4993);if(r)goto S_5027;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4993);}while(r); do{ *__LONG_CTYP= 64 ; if(!qbevent)break;evnt(4993);}while(r); } S_5031:; if ((-(*__LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(4994);if(r)goto S_5031;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4994);}while(r); do{ *__LONG_CTYP= 64 ; if(!qbevent)break;evnt(4994);}while(r); } } S_5036:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CTYPE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4996);if(r)goto S_5036;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Unsupported variable used in FOR statement",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4996);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4996);}while(r); } do{ qbs_set(__STRING_U,FUNC_STR2(&(pass659=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4997);}while(r); S_5041:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4999);if(r)goto S_5041;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip660; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("static ",7),__STRING_CTYPE),qbs_new_txt_len(" fornext_value",14)),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip660; skip660: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5000);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip661; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("static ",7),__STRING_CTYPE),qbs_new_txt_len(" fornext_finalvalue",19)),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip661; skip661: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5001);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip662; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("static ",7),__STRING_CTYPE),qbs_new_txt_len(" fornext_step",13)),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip662; skip662: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5002);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip663; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("static uint8 fornext_step_negative",34),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip663; skip663: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5003);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip664; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_CTYPE,qbs_new_txt_len(" fornext_value",14)),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip664; skip664: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5005);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip665; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_CTYPE,qbs_new_txt_len(" fornext_finalvalue",19)),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip665; skip665: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5006);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip666; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_CTYPE,qbs_new_txt_len(" fornext_step",13)),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip666; skip666: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5007);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip667; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("uint8 fornext_step_negative",27),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip667; skip667: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5008);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_STARTVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5012);}while(r); S_5053:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5013);if(r)goto S_5053;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5013);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("=",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5014);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5015);}while(r); S_5058:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5016);if(r)goto S_5058;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5016);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip668; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("fornext_value",13),__STRING_U),qbs_new_txt_len("=",1)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip668; skip668: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5017);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_P2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5020);}while(r); S_5063:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5021);if(r)goto S_5063;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5021);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("TO",2)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5022);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5023);}while(r); S_5068:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5024);if(r)goto S_5068;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5024);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip669; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("fornext_finalvalue",18),__STRING_U),qbs_new_txt_len("=",1)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip669; skip669: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5025);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_P3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5028);}while(r); S_5073:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5029);if(r)goto S_5073;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5029);}while(r); } S_5076:; if ((-(*__LONG_STEPUSED== 1 ))||new_error){ if(qbevent){evnt(5030);if(r)goto S_5076;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("STEP",4)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5030);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5031);}while(r); S_5080:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5032);if(r)goto S_5080;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5032);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip670; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("fornext_step",12),__STRING_U),qbs_new_txt_len("=",1)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip670; skip670: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5033);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip671; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (fornext_step",16),__STRING_U),qbs_new_txt_len("<0) fornext_step_negative",25)),__STRING_U),qbs_new_txt_len("=1; else fornext_step_negative",30)),__STRING_U),qbs_new_txt_len("=0;",3)), 0 , 0 , 1 ); if (new_error) goto skip671; skip671: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5034);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip672; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto fornext_error",33),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip672; skip672: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5036);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip673; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto fornext_entrylabel",23),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip673; skip673: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5037);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip674; sub_file_print(tmp_fileno,qbs_new_txt_len("while(1){",9), 0 , 0 , 1 ); if (new_error) goto skip674; skip674: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5038);}while(r); do{ *__LONG_TYPBAK=*__LONG_TYP; if(!qbevent)break;evnt(5039);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip675; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("fornext_value",13),__STRING_U),qbs_new_txt_len("=fornext_step",13)),__STRING_U),qbs_new_txt_len("+(",2)),FUNC_REFER(__STRING_V,__LONG_TYP,&(pass676= 0 ))),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip675; skip675: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5040);}while(r); S_5090:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5041);if(r)goto S_5090;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5041);}while(r); } do{ *__LONG_TYP=*__LONG_TYPBAK; if(!qbevent)break;evnt(5042);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip677; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("fornext_entrylabel",18),__STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip677; skip677: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5043);}while(r); do{ SUB_SETREFER(__STRING_V,__LONG_TYP,qbs_add(qbs_new_txt_len("fornext_value",13),__STRING_U),&(pass678= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5044);}while(r); S_5096:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5045);if(r)goto S_5096;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5045);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip679; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (fornext_step_negative",25),__STRING_U),qbs_new_txt_len("){",2)), 0 , 0 , 1 ); if (new_error) goto skip679; skip679: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5046);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip680; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (fornext_value",17),__STRING_U),qbs_new_txt_len("fornext_finalvalue",19)),__STRING_U),qbs_new_txt_len(") break;",8)), 0 , 0 , 1 ); if (new_error) goto skip682; skip682: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5049);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip683; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip683; skip683: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5050);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip684; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("fornext_error",13),__STRING_U),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip684; skip684: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5051);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5053);}while(r); S_5106:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5053);if(r)goto S_5106;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5053);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5053);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5055);}while(r); } } S_5114:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5060);if(r)goto S_5114;} S_5115:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ELSE",4))))||new_error){ if(qbevent){evnt(5061);if(r)goto S_5115;} S_5116:; fornext_value687=*__INTEGER_CONTROLLEVEL; fornext_finalvalue687= 1 ; fornext_step687= -1 ; if (fornext_step687<0) fornext_step_negative687=1; else fornext_step_negative687=0; if (new_error) goto fornext_error687; goto fornext_entrylabel687; while(1){ fornext_value687=fornext_step687+(*__LONG_I); fornext_entrylabel687: *__LONG_I=fornext_value687; if (fornext_step_negative687){ if (fornext_value687fornext_finalvalue687) break; } fornext_error687:; if(qbevent){evnt(5062);if(r)goto S_5116;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(5063);}while(r); S_5118:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(5064);if(r)goto S_5118;} S_5119:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLSTATE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLSTATE[4],__ARRAY_INTEGER_CONTROLSTATE[5])]== 2 ))||new_error){ if(qbevent){evnt(5065);if(r)goto S_5119;} do{ qbs_set(__STRING_A,qbs_new_txt_len("IF-THEN already contains an ELSE statement",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5065);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5065);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip688; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip688; skip688: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5066);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLSTATE[4],__ARRAY_INTEGER_CONTROLSTATE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLSTATE[0]))[tmp_long]= 2 ; if(!qbevent)break;evnt(5067);}while(r); S_5125:; if ((-(*__LONG_LINEELSEUSED== 0 ))||new_error){ if(qbevent){evnt(5068);if(r)goto S_5125;} do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5068);}while(r); } do{ qbs_set(__STRING_L,qbs_new_txt_len("ELSE",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5069);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5070);}while(r); S_5130:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5070);if(r)goto S_5130;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5070);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5070);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5071);}while(r); } } fornext_exit_686:; do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSE without IF",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5074);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5074);}while(r); } } S_5142:; if ((-(*__LONG_N>= 3 ))||new_error){ if(qbevent){evnt(5078);if(r)goto S_5142;} S_5143:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ELSEIF",6))))||new_error){ if(qbevent){evnt(5079);if(r)goto S_5143;} S_5144:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5080);if(r)goto S_5144;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip690; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip690; skip690: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5080);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5080);}while(r); } S_5148:; fornext_value692=*__INTEGER_CONTROLLEVEL; fornext_finalvalue692= 1 ; fornext_step692= -1 ; if (fornext_step692<0) fornext_step_negative692=1; else fornext_step_negative692=0; if (new_error) goto fornext_error692; goto fornext_entrylabel692; while(1){ fornext_value692=fornext_step692+(*__LONG_I); fornext_entrylabel692: *__LONG_I=fornext_value692; if (fornext_step_negative692){ if (fornext_value692fornext_finalvalue692) break; } fornext_error692:; if(qbevent){evnt(5082);if(r)goto S_5148;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(5083);}while(r); S_5150:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(5084);if(r)goto S_5150;} S_5151:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLSTATE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLSTATE[4],__ARRAY_INTEGER_CONTROLSTATE[5])]== 2 ))||new_error){ if(qbevent){evnt(5085);if(r)goto S_5151;} do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSEIF invalid after ELSE",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5085);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5085);}while(r); } do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLSTATE[4],__ARRAY_INTEGER_CONTROLSTATE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLSTATE[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(5086);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[tmp_long]=((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5])]+ 1 ; if(!qbevent)break;evnt(5087);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5088);}while(r); S_5158:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("THEN",4))))||new_error){ if(qbevent){evnt(5089);if(r)goto S_5158;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ELSEIF expression THEN",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5089);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5089);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip693; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip693; skip693: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5090);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass694= 2 ),&(pass695=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5091);}while(r); S_5164:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5092);if(r)goto S_5164;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5092);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ELSEIF",6),__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP),qbs_new_txt_len("THEN",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5093);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5094);}while(r); S_5169:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5094);if(r)goto S_5169;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5094);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5094);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5095);}while(r); S_5175:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5096);if(r)goto S_5175;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5096);}while(r); } S_5178:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5097);if(r)goto S_5178;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass697= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5097);}while(r); } S_5181:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5098);if(r)goto S_5181;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5098);}while(r); } S_5184:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5099);if(r)goto S_5184;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip698; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_CLEANUPSTRINGPROCESSINGCALL),__STRING_E),qbs_new_txt_len(")){",3)), 0 , 0 , 1 ); if (new_error) goto skip698; skip698: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5100);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip699; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_E),qbs_new_txt_len("){",2)), 0 , 0 , 1 ); if (new_error) goto skip699; skip699: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5102);}while(r); } do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5104);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5105);}while(r); } } fornext_exit_691:; do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSEIF without IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5108);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5108);}while(r); } } S_5197:; if ((-(*__LONG_N>= 3 ))||new_error){ if(qbevent){evnt(5112);if(r)goto S_5197;} S_5198:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("IF",2))))||new_error){ if(qbevent){evnt(5113);if(r)goto S_5198;} S_5199:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5114);if(r)goto S_5199;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip700; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip700; skip700: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5114);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5114);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5116);}while(r); do{ *__LONG_IFTYPE= 0 ; if(!qbevent)break;evnt(5117);}while(r); S_5205:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("THEN",4))))||new_error){ if(qbevent){evnt(5118);if(r)goto S_5205;} do{ *__LONG_IFTYPE= 1 ; if(!qbevent)break;evnt(5118);}while(r); } S_5208:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("GOTO",4))))||new_error){ if(qbevent){evnt(5119);if(r)goto S_5208;} do{ *__LONG_IFTYPE= 2 ; if(!qbevent)break;evnt(5119);}while(r); } S_5211:; if ((-(*__LONG_IFTYPE== 0 ))||new_error){ if(qbevent){evnt(5120);if(r)goto S_5211;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected IF expression THEN/GOTO",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5120);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5120);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(5122);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLREF[0]))[tmp_long]=*__LONG_LINENUMBER; if(!qbevent)break;evnt(5123);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(5124);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(5125);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLSTATE[4],__ARRAY_INTEGER_CONTROLSTATE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLSTATE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(5126);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass701= 2 ),&(pass702=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5128);}while(r); S_5221:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5129);if(r)goto S_5221;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5129);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("IF",2),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5130);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5131);}while(r); S_5226:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5132);if(r)goto S_5226;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5132);}while(r); } S_5229:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5133);if(r)goto S_5229;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass703= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5133);}while(r); } S_5232:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5134);if(r)goto S_5232;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5134);}while(r); } S_5235:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5136);if(r)goto S_5235;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip704; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_CLEANUPSTRINGPROCESSINGCALL),__STRING_E),qbs_new_txt_len("))||new_error){",15)), 0 , 0 , 1 ); if (new_error) goto skip704; skip704: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5137);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip705; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_E),qbs_new_txt_len(")||new_error){",14)), 0 , 0 , 1 ); if (new_error) goto skip705; skip705: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5139);}while(r); } S_5240:; if ((-(*__LONG_IFTYPE== 1 ))||new_error){ if(qbevent){evnt(5142);if(r)goto S_5240;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("THEN",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5142);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5143);}while(r); S_5244:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(5143);if(r)goto S_5244;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5143);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5143);}while(r); } S_5249:; if ((-(*__LONG_IFTYPE== 2 ))||new_error){ if(qbevent){evnt(5145);if(r)goto S_5249;} do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5146);}while(r); } do{ *__LONG_THENGOTO= 1 ; if(!qbevent)break;evnt(5149);}while(r); do{ goto LABEL_FINISHEDLINE2; if(!qbevent)break;evnt(5150);}while(r); } } S_5256:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(5156);if(r)goto S_5256;} S_5257:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass707= 1 )),qbs_new_txt_len("END",3)))&(qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass708= 2 )),qbs_new_txt_len("IF",2)))))||new_error){ if(qbevent){evnt(5157);if(r)goto S_5257;} S_5258:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 1 ))||new_error){ if(qbevent){evnt(5160);if(r)goto S_5258;} do{ qbs_set(__STRING_A,qbs_new_txt_len("END IF without IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5160);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5160);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5161);}while(r); S_5263:; if ((-(*__LONG_IMPLIEDENDIF== 0 ))||new_error){ if(qbevent){evnt(5162);if(r)goto S_5263;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("END",3),__STRING1_SP),qbs_new_txt_len("IF",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5163);}while(r); S_5265:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(5164);if(r)goto S_5265;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5164);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5164);}while(r); } } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip710; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip710; skip710: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5167);}while(r); S_5272:; fornext_value712= 1 ; fornext_finalvalue712=((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5])]; fornext_step712= 1 ; if (fornext_step712<0) fornext_step_negative712=1; else fornext_step_negative712=0; if (new_error) goto fornext_error712; goto fornext_entrylabel712; while(1){ fornext_value712=fornext_step712+(*__LONG_I); fornext_entrylabel712: *__LONG_I=fornext_value712; if (fornext_step_negative712){ if (fornext_value712fornext_finalvalue712) break; } fornext_error712:; if(qbevent){evnt(5168);if(r)goto S_5272;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip713; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip713; skip713: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5169);}while(r); } fornext_exit_711:; do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5171);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5172);}while(r); } } S_5279:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(5179);if(r)goto S_5279;} S_5280:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SELECT",6))))||new_error){ if(qbevent){evnt(5180);if(r)goto S_5280;} S_5281:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5181);if(r)goto S_5281;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip714; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip714; skip714: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5181);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5181);}while(r); } S_5285:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N== 1 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("CASE",4)))))||new_error){ if(qbevent){evnt(5183);if(r)goto S_5285;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5183);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5183);}while(r); } S_5289:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(5184);if(r)goto S_5289;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SELECT CASE expression",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5184);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5184);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass715= 3 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5185);}while(r); S_5294:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5186);if(r)goto S_5294;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5186);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("SELECT",6),__STRING1_SP),qbs_new_txt_len("CASE",4)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5187);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5188);}while(r); S_5299:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5188);if(r)goto S_5299;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5188);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5188);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5189);}while(r); S_5305:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5190);if(r)goto S_5305;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5190);}while(r); } do{ *__LONG_U=FUNC_UNIQUENUMBER(); if(!qbevent)break;evnt(5191);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(5193);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(5194);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5198);}while(r); S_5312:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(5199);if(r)goto S_5312;} do{ *__LONG_T= 0 ; if(!qbevent)break;evnt(5200);}while(r); S_5314:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))&(-((*__LONG_TYP&*__LONG_ISARRAY)== 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(5201);if(r)goto S_5314;} do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[tmp_long]=qbr(func_val(__STRING_E)); if(!qbevent)break;evnt(5202);}while(r); }else{ S_5317:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5204);if(r)goto S_5317;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass717= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5204);}while(r); } S_5320:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5205);if(r)goto S_5320;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5205);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip718; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("static qbs *sc_",15),FUNC_STR2(__LONG_U)),qbs_new_txt_len("=qbs_new(0,0);",14)), 0 , 0 , 1 ); if (new_error) goto skip718; skip718: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5206);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip719; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(sc_",11),FUNC_STR2(__LONG_U)),qbs_new_txt_len(",",1)),__STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip719; skip719: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5207);}while(r); S_5325:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5208);if(r)goto S_5325;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip720; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip720; skip720: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5208);}while(r); } } }else{ S_5330:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(5213);if(r)goto S_5330;} S_5331:; if ((-((*__LONG_TYP& 511 )> 64 ))||new_error){ if(qbevent){evnt(5215);if(r)goto S_5331;} do{ *__LONG_T= 3 ; if(!qbevent)break;evnt(5215);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5215);}while(r); } S_5335:; if ((-((*__LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(5216);if(r)goto S_5335;} do{ *__LONG_T= 4 ; if(!qbevent)break;evnt(5216);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5216);}while(r); } S_5339:; if ((-((*__LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(5217);if(r)goto S_5339;} do{ *__LONG_T= 5 ; if(!qbevent)break;evnt(5217);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5217);}while(r); } S_5343:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))&(-((*__LONG_TYP&*__LONG_ISARRAY)== 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(5218);if(r)goto S_5343;} do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[tmp_long]=qbr(func_val(__STRING_E)); if(!qbevent)break;evnt(5219);}while(r); }else{ S_5346:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5221);if(r)goto S_5346;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass721= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5221);}while(r); } S_5349:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5222);if(r)goto S_5349;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5222);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip722; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("static ",7),__STRING_T),qbs_new_txt_len(" sc_",4)),FUNC_STR2(__LONG_U)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip722; skip722: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5224);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip723; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sc_",3),FUNC_STR2(__LONG_U)),qbs_new_txt_len("=",1)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip723; skip723: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5225);}while(r); S_5354:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5226);if(r)goto S_5354;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip724; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip724; skip724: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5226);}while(r); } } }else{ do{ *__LONG_T= 1 ; if(!qbevent)break;evnt(5232);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5232);}while(r); S_5361:; if (((*__LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(5233);if(r)goto S_5361;} S_5362:; if ((-((*__LONG_TYP& 511 )<= 32 ))||new_error){ if(qbevent){evnt(5234);if(r)goto S_5362;} do{ *__LONG_T= 7 ; if(!qbevent)break;evnt(5234);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5234);}while(r); } S_5366:; if ((-((*__LONG_TYP& 511 )> 32 ))||new_error){ if(qbevent){evnt(5235);if(r)goto S_5366;} do{ *__LONG_T= 2 ; if(!qbevent)break;evnt(5235);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("uint64",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5235);}while(r); } }else{ S_5371:; if ((-((*__LONG_TYP& 511 )<= 32 ))||new_error){ if(qbevent){evnt(5237);if(r)goto S_5371;} do{ *__LONG_T= 6 ; if(!qbevent)break;evnt(5237);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5237);}while(r); } S_5375:; if ((-((*__LONG_TYP& 511 )> 32 ))||new_error){ if(qbevent){evnt(5238);if(r)goto S_5375;} do{ *__LONG_T= 1 ; if(!qbevent)break;evnt(5238);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5238);}while(r); } } S_5380:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))&(-((*__LONG_TYP&*__LONG_ISARRAY)== 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(5240);if(r)goto S_5380;} do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[tmp_long]=qbr(func_val(__STRING_E)); if(!qbevent)break;evnt(5241);}while(r); }else{ S_5383:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5243);if(r)goto S_5383;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass725= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5243);}while(r); } S_5386:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5244);if(r)goto S_5386;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5244);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip726; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("static ",7),__STRING_T),qbs_new_txt_len(" sc_",4)),FUNC_STR2(__LONG_U)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip726; skip726: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5245);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip727; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sc_",3),FUNC_STR2(__LONG_U)),qbs_new_txt_len("=",1)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip727; skip727: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5246);}while(r); S_5391:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5247);if(r)goto S_5391;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip728; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip728; skip728: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5247);}while(r); } } } } do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLREF[0]))[tmp_long]=*__LONG_LINENUMBER; if(!qbevent)break;evnt(5255);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 10 +*__LONG_T; if(!qbevent)break;evnt(5256);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLID[0]))[tmp_long]=*__LONG_U; if(!qbevent)break;evnt(5257);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5259);}while(r); } } S_5403:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(5265);if(r)goto S_5403;} S_5404:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3)))&(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("SELECT",6)))))||new_error){ if(qbevent){evnt(5266);if(r)goto S_5404;} S_5405:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 18 ))||new_error){ if(qbevent){evnt(5272);if(r)goto S_5405;} do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5273);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip729; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto sc_",8),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len("_end;",5)), 0 , 0 , 1 ); if (new_error) goto skip729; skip729: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5274);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip730; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip730; skip730: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5275);}while(r); } S_5410:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 19 ))||new_error){ if(qbevent){evnt(5277);if(r)goto S_5410;} do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5278);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip731; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sc_",3),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len("_end:;",6)), 0 , 0 , 1 ); if (new_error) goto skip731; skip731: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5280);}while(r); S_5414:; if (((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]< 10 ))|(-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]> 17 )))||new_error){ if(qbevent){evnt(5281);if(r)goto S_5414;} do{ qbs_set(__STRING_A,qbs_new_txt_len("END SELECT without SELECT CASE",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5281);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5281);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5282);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("END",3),__STRING1_SP),qbs_new_txt_len("SELECT",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5283);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5284);}while(r); S_5421:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5284);if(r)goto S_5421;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5284);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5284);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5285);}while(r); } } S_5429:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(5290);if(r)goto S_5429;} S_5430:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CASE",4))))||new_error){ if(qbevent){evnt(5291);if(r)goto S_5430;} do{ qbs_set(__STRING_L,qbs_new_txt_len("CASE",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5293);}while(r); S_5432:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 19 ))||new_error){ if(qbevent){evnt(5297);if(r)goto S_5432;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END SELECT",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5297);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5297);}while(r); } S_5436:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 18 ))||new_error){ if(qbevent){evnt(5298);if(r)goto S_5436;} do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5299);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5300);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip733; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto sc_",8),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len("_end;",5)), 0 , 0 , 1 ); if (new_error) goto skip733; skip733: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5301);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip734; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip734; skip734: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5302);}while(r); } S_5442:; if (((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]< 10 ))|(-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]> 17 )))||new_error){ if(qbevent){evnt(5308);if(r)goto S_5442;} do{ qbs_set(__STRING_A,qbs_new_txt_len("CASE without SELECT CASE",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5308);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5308);}while(r); } S_5446:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5309);if(r)goto S_5446;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5309);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5309);}while(r); } do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]- 10 ; if(!qbevent)break;evnt(5343);}while(r); do{ *__LONG_FLT= 0 ; if(!qbevent)break;evnt(5345);}while(r); S_5452:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(5346);if(r)goto S_5452;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5346);}while(r); } S_5455:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(5347);if(r)goto S_5455;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5347);}while(r); } S_5458:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(5348);if(r)goto S_5458;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5348);}while(r); } S_5461:; if ((-(*__LONG_T== 3 ))||new_error){ if(qbevent){evnt(5349);if(r)goto S_5461;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5349);}while(r); do{ *__LONG_FLT= 1 ; if(!qbevent)break;evnt(5349);}while(r); } S_5465:; if ((-(*__LONG_T== 4 ))||new_error){ if(qbevent){evnt(5350);if(r)goto S_5465;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("(float)",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5350);}while(r); do{ *__LONG_FLT= 1 ; if(!qbevent)break;evnt(5350);}while(r); } S_5469:; if ((-(*__LONG_T== 5 ))||new_error){ if(qbevent){evnt(5351);if(r)goto S_5469;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("(double)",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5351);}while(r); do{ *__LONG_FLT= 1 ; if(!qbevent)break;evnt(5351);}while(r); } S_5473:; if ((-(*__LONG_T== 6 ))||new_error){ if(qbevent){evnt(5352);if(r)goto S_5473;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5352);}while(r); } S_5476:; if ((-(*__LONG_T== 7 ))||new_error){ if(qbevent){evnt(5353);if(r)goto S_5476;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5353);}while(r); } do{ qbs_set(__STRING_N,qbs_add(qbs_new_txt_len("sc_",3),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5355);}while(r); do{ *__LONG_CV=((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5])]; if(!qbevent)break;evnt(5356);}while(r); S_5481:; if ((*__LONG_CV)||new_error){ if(qbevent){evnt(5357);if(r)goto S_5481;} do{ qbs_set(__STRING_N,FUNC_REFER(FUNC_STR2(__LONG_CV),&(pass735= 0 ),&(pass736= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5358);}while(r); S_5483:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5359);if(r)goto S_5483;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5359);}while(r); } } S_5487:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(5363);if(r)goto S_5487;} S_5488:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass737= 2 )),qbs_new_txt_len("C-EL",4))))||new_error){ if(qbevent){evnt(5364);if(r)goto S_5488;} do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(5365);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 19 ; if(!qbevent)break;evnt(5365);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLREF[0]))[tmp_long]=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL- 1 )-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(5366);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("ELSE",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5367);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5368);}while(r); S_5494:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5368);if(r)goto S_5494;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5368);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5368);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5369);}while(r); } } S_5502:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5373);if(r)goto S_5502;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip739; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip739; skip739: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5373);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5373);}while(r); } do{ qbs_set(__STRING_F12,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5377);}while(r); do{ *__LONG_NEXP= 0 ; if(!qbevent)break;evnt(5379);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(5380);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5381);}while(r); S_5510:; fornext_value741= 2 ; fornext_finalvalue741=*__LONG_N; fornext_step741= 1 ; if (fornext_step741<0) fornext_step_negative741=1; else fornext_step_negative741=0; if (new_error) goto fornext_error741; goto fornext_entrylabel741; while(1){ fornext_value741=fornext_step741+(*__LONG_I); fornext_entrylabel741: *__LONG_I=fornext_value741; if (fornext_step_negative741){ if (fornext_value741fornext_finalvalue741) break; } fornext_error741:; if(qbevent){evnt(5382);if(r)goto S_5510;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5383);}while(r); S_5512:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5384);if(r)goto S_5512;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(5384);}while(r); } S_5515:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5385);if(r)goto S_5515;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(5385);}while(r); } S_5518:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(5386);if(r)goto S_5518;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5386);}while(r); } S_5521:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_I==*__LONG_N))|(((qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))))||new_error){ if(qbevent){evnt(5387);if(r)goto S_5521;} S_5522:; if ((-(*__LONG_NEXP!= 0 ))||new_error){ if(qbevent){evnt(5388);if(r)goto S_5522;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5388);}while(r); do{ qbs_set(__STRING_F12,qbs_add(__STRING_F12,qbs_new_txt_len("||",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5388);}while(r); } S_5526:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5389);if(r)goto S_5526;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected expression",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5389);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5389);}while(r); } do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5390);}while(r); do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5395);}while(r); do{ *__LONG_B2= 0 ; if(!qbevent)break;evnt(5396);}while(r); do{ qbs_set(__STRING_EL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5397);}while(r); do{ qbs_set(__STRING_ER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5397);}while(r); do{ *__LONG_USEDTO= 0 ; if(!qbevent)break;evnt(5398);}while(r); S_5536:; fornext_value744= 1 ; fornext_finalvalue744=*__LONG_N2; fornext_step744= 1 ; if (fornext_step744<0) fornext_step_negative744=1; else fornext_step_negative744=0; if (new_error) goto fornext_error744; goto fornext_entrylabel744; while(1){ fornext_value744=fornext_step744+(*__LONG_I2); fornext_entrylabel744: *__LONG_I2=fornext_value744; if (fornext_step_negative744){ if (fornext_value744fornext_finalvalue744) break; } fornext_error744:; if(qbevent){evnt(5399);if(r)goto S_5536;} do{ qbs_set(__STRING_E3,FUNC_GETELEMENT(__STRING_E,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5400);}while(r); S_5538:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E3,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5401);if(r)goto S_5538;} do{ *__LONG_B2=*__LONG_B2+ 1 ; if(!qbevent)break;evnt(5401);}while(r); } S_5541:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E3,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5402);if(r)goto S_5541;} do{ *__LONG_B2=*__LONG_B2- 1 ; if(!qbevent)break;evnt(5402);}while(r); } S_5544:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_B2== 0 ))&(qbs_equal(qbs_ucase(__STRING_E3),qbs_new_txt_len("TO",2)))))||new_error){ if(qbevent){evnt(5403);if(r)goto S_5544;} do{ *__LONG_USEDTO= 1 ; if(!qbevent)break;evnt(5404);}while(r); }else{ S_5547:; if ((-(*__LONG_USEDTO== 0 ))||new_error){ if(qbevent){evnt(5406);if(r)goto S_5547;} do{ qbs_set(__STRING_EL,qbs_add(qbs_add(__STRING_EL,__STRING1_SP),__STRING_E3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5406);}while(r); }else{ do{ qbs_set(__STRING_ER,qbs_add(qbs_add(__STRING_ER,__STRING1_SP),__STRING_E3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5406);}while(r); } } } fornext_exit_743:; S_5554:; if ((-(*__LONG_USEDTO== 1 ))||new_error){ if(qbevent){evnt(5409);if(r)goto S_5554;} S_5555:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_EL,qbs_new_txt_len("",0)))|(qbs_equal(__STRING_ER,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(5410);if(r)goto S_5555;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected expression TO expression",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5410);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5410);}while(r); } do{ qbs_set(__STRING_EL,qbs_right(__STRING_EL,__STRING_EL->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5411);}while(r); do{ qbs_set(__STRING_ER,qbs_right(__STRING_ER,__STRING_ER->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5411);}while(r); S_5561:; fornext_value748= 1 ; fornext_finalvalue748= 2 ; fornext_step748= 1 ; if (fornext_step748<0) fornext_step_negative748=1; else fornext_step_negative748=0; if (new_error) goto fornext_error748; goto fornext_entrylabel748; while(1){ fornext_value748=fornext_step748+(*__LONG_I2); fornext_entrylabel748: *__LONG_I2=fornext_value748; if (fornext_step_negative748){ if (fornext_value748fornext_finalvalue748) break; } fornext_error748:; if(qbevent){evnt(5413);if(r)goto S_5561;} S_5562:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(5414);if(r)goto S_5562;} do{ qbs_set(__STRING_E,__STRING_EL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5414);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_ER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5414);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5415);}while(r); S_5568:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5416);if(r)goto S_5568;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5416);}while(r); } S_5571:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(5417);if(r)goto S_5571;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5417);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("TO",2)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5417);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5418);}while(r); S_5577:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5419);if(r)goto S_5577;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5419);}while(r); } S_5580:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5420);if(r)goto S_5580;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass749= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5420);}while(r); } S_5583:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5421);if(r)goto S_5583;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5421);}while(r); } S_5586:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(5422);if(r)goto S_5586;} S_5587:; if ((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(5423);if(r)goto S_5587;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string expression",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5423);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5423);}while(r); } S_5591:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(5424);if(r)goto S_5591;} do{ qbs_set(__STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_F12,qbs_new_txt_len("(qbs_greaterorequal(",20)),__STRING_N),qbs_new_txt_len(",",1)),__STRING_E),qbs_new_txt_len(")&&qbs_lessorequal(",19)),__STRING_N),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5424);}while(r); } S_5594:; if ((-(*__LONG_I2== 2 ))||new_error){ if(qbevent){evnt(5425);if(r)goto S_5594;} do{ qbs_set(__STRING_F12,qbs_add(qbs_add(__STRING_F12,__STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5425);}while(r); } }else{ S_5598:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(5427);if(r)goto S_5598;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected numeric expression",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5427);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5427);}while(r); } S_5602:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(5429);if(r)goto S_5602;} S_5603:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(5430);if(r)goto S_5603;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5430);}while(r); } S_5606:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(5431);if(r)goto S_5606;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_longdouble_to_uint64(",25),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5431);}while(r); } S_5609:; if (((-(*__LONG_T== 6 ))|(-(*__LONG_T== 7 )))||new_error){ if(qbevent){evnt(5432);if(r)goto S_5609;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_double_to_long(",19),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5432);}while(r); } } S_5613:; if ((qbs_cleanup(qbs_tmp_base,__STRING_TC->len))||new_error){ if(qbevent){evnt(5435);if(r)goto S_5613;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(__STRING_TC,qbs_new_txt_len("(",1)),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5435);}while(r); } S_5616:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(5436);if(r)goto S_5616;} do{ qbs_set(__STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_F12,qbs_new_txt_len("((",2)),__STRING_N),qbs_new_txt_len(">=(",3)),__STRING_E),qbs_new_txt_len("))&&(",5)),__STRING_N),qbs_new_txt_len("<=(",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5436);}while(r); } S_5619:; if ((-(*__LONG_I2== 2 ))||new_error){ if(qbevent){evnt(5437);if(r)goto S_5619;} do{ qbs_set(__STRING_F12,qbs_add(qbs_add(__STRING_F12,__STRING_E),qbs_new_txt_len(")))",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5437);}while(r); } } } fornext_exit_747:; do{ goto LABEL_ADDEDEXP; if(!qbevent)break;evnt(5440);}while(r); } do{ qbs_set(__STRING_O,qbs_new_txt_len("==",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5462);}while(r); do{ qbs_set(__STRING_X,FUNC_GETELEMENT(__STRING_E,&(pass751= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5465);}while(r); S_5628:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(__STRING_X)))||new_error){ if(qbevent){evnt(5466);if(r)goto S_5628;} S_5629:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_X,qbs_new_txt_len("=",1)))|(qbs_equal(__STRING_X,qbs_new_txt_len("<>",2)))|(qbs_equal(__STRING_X,qbs_new_txt_len(">",1)))|(qbs_equal(__STRING_X,qbs_new_txt_len("<",1)))|(qbs_equal(__STRING_X,qbs_new_txt_len(">=",2)))|(qbs_equal(__STRING_X,qbs_new_txt_len("<=",2)))))||new_error){ if(qbevent){evnt(5467);if(r)goto S_5629;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("IS",2),__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5468);}while(r); do{ qbs_set(__STRING_X,qbs_new_txt_len("IS",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5469);}while(r); } } S_5634:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_X),qbs_new_txt_len("IS",2))))||new_error){ if(qbevent){evnt(5472);if(r)goto S_5634;} do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5473);}while(r); S_5636:; if ((-(*__LONG_N2< 3 ))||new_error){ if(qbevent){evnt(5474);if(r)goto S_5636;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected IS =,<>,>,<,>=,<= expression",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5474);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5474);}while(r); } do{ qbs_set(__STRING_O,FUNC_GETELEMENT(__STRING_E,&(pass752= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5475);}while(r); do{ qbs_set(__STRING_O2,__STRING_O); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5476);}while(r); do{ *__LONG_O= 0 ; if(!qbevent)break;evnt(5477);}while(r); S_5643:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(5478);if(r)goto S_5643;} do{ qbs_set(__STRING_O,qbs_new_txt_len("==",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5478);}while(r); do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(5478);}while(r); } S_5647:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(5479);if(r)goto S_5647;} do{ qbs_set(__STRING_O,qbs_new_txt_len("!=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5479);}while(r); do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(5479);}while(r); } S_5651:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(5480);if(r)goto S_5651;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(5480);}while(r); } S_5654:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(5481);if(r)goto S_5654;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(5481);}while(r); } S_5657:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(5482);if(r)goto S_5657;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(5482);}while(r); } S_5660:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(5483);if(r)goto S_5660;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(5483);}while(r); } S_5663:; if ((-(*__LONG_O!= 1 ))||new_error){ if(qbevent){evnt(5484);if(r)goto S_5663;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected IS =,<>,>,<,>=,<= expression",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5484);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5484);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("IS",2)),__STRING1_SP),__STRING_O2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5485);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_E,&(pass753= 3 ),__LONG_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5486);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5491);}while(r); S_5671:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5492);if(r)goto S_5671;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5492);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5493);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5494);}while(r); S_5676:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5495);if(r)goto S_5676;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5495);}while(r); } S_5679:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5496);if(r)goto S_5679;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass754= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5496);}while(r); } S_5682:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5497);if(r)goto S_5682;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5497);}while(r); } S_5685:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(5498);if(r)goto S_5685;} S_5686:; if ((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(5500);if(r)goto S_5686;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string expression",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5500);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5500);}while(r); } S_5690:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("==",2))))||new_error){ if(qbevent){evnt(5501);if(r)goto S_5690;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_equal",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5501);}while(r); } S_5693:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("!=",2))))||new_error){ if(qbevent){evnt(5502);if(r)goto S_5693;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_notequal",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5502);}while(r); } S_5696:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(5503);if(r)goto S_5696;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_greaterthan",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5503);}while(r); } S_5699:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(5504);if(r)goto S_5699;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_lessthan",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5504);}while(r); } S_5702:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(5505);if(r)goto S_5702;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_greaterorequal",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5505);}while(r); } S_5705:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(5506);if(r)goto S_5705;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_lessorequal",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5506);}while(r); } do{ qbs_set(__STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_F12,__STRING_O),qbs_new_txt_len("(",1)),__STRING_N),qbs_new_txt_len(",",1)),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5507);}while(r); }else{ S_5710:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(5510);if(r)goto S_5710;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected numeric expression",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5510);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5510);}while(r); } S_5714:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(5512);if(r)goto S_5714;} S_5715:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(5513);if(r)goto S_5715;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5513);}while(r); } S_5718:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(5514);if(r)goto S_5718;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_longdouble_to_uint64(",25),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5514);}while(r); } S_5721:; if (((-(*__LONG_T== 6 ))|(-(*__LONG_T== 7 )))||new_error){ if(qbevent){evnt(5515);if(r)goto S_5721;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_double_to_long(",19),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5515);}while(r); } } S_5725:; if ((qbs_cleanup(qbs_tmp_base,__STRING_TC->len))||new_error){ if(qbevent){evnt(5518);if(r)goto S_5725;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(__STRING_TC,qbs_new_txt_len("(",1)),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5518);}while(r); } do{ qbs_set(__STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_F12,qbs_new_txt_len("(",1)),__STRING_N),__STRING_O),qbs_new_txt_len("(",1)),__STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5519);}while(r); } LABEL_ADDEDEXP:; if(qbevent){evnt(5522);r=0;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5523);}while(r); do{ *__LONG_NEXP=*__LONG_NEXP+ 1 ; if(!qbevent)break;evnt(5524);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5526);}while(r); } } fornext_exit_740:; S_5736:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5530);if(r)goto S_5736;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip756; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_CLEANUPSTRINGPROCESSINGCALL),__STRING_F12),qbs_new_txt_len("))||new_error){",15)), 0 , 0 , 1 ); if (new_error) goto skip756; skip756: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5531);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip757; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_F12),qbs_new_txt_len(")||new_error){",14)), 0 , 0 , 1 ); if (new_error) goto skip757; skip757: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5533);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5536);}while(r); S_5742:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5536);if(r)goto S_5742;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5536);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5536);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(5537);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5]); if (!new_error) ((int32*)(__ARRAY_LONG_CONTROLREF[0]))[tmp_long]=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL- 1 )-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(5538);}while(r); do{ tmp_long=array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[tmp_long]= 18 ; if(!qbevent)break;evnt(5539);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5540);}while(r); } } S_5753:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5557);if(r)goto S_5753;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip759; sub_file_print(tmp_fileno,qbs_new_txt_len("do{",3), 0 , 0 , 1 ); if (new_error) goto skip759; skip759: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5558);}while(r); } S_5756:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(5563);if(r)goto S_5756;} S_5757:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("PALETTE",7))))||new_error){ if(qbevent){evnt(5564);if(r)goto S_5757;} S_5758:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(5565);if(r)goto S_5758;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("PALETTE",7),__STRING1_SP),qbs_new_txt_len("USING",5)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5566);}while(r); S_5760:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(5567);if(r)goto S_5760;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected PALETTE USING array-name",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5567);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5567);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,&(pass760= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5569);}while(r); S_5765:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_E)))||new_error){ if(qbevent){evnt(5570);if(r)goto S_5765;} S_5766:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5571);if(r)goto S_5766;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5571);}while(r); } do{ *__LONG_Z= 1 ; if(!qbevent)break;evnt(5572);}while(r); do{ *__LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(5573);}while(r); S_5771:; if (((-((*__LONG_T& 511 )!= 16 ))&(-((*__LONG_T& 511 )!= 32 )))||new_error){ if(qbevent){evnt(5574);if(r)goto S_5771;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(5574);}while(r); } S_5774:; if ((*__LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(5575);if(r)goto S_5774;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(5575);}while(r); } S_5777:; if ((*__LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(5576);if(r)goto S_5777;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(5576);}while(r); } S_5780:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(5577);if(r)goto S_5780;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(5577);}while(r); } S_5783:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(5578);if(r)goto S_5783;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(5578);}while(r); } S_5786:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(5579);if(r)goto S_5786;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(5579);}while(r); } S_5789:; if ((-(*__LONG_Z== 0 ))||new_error){ if(qbevent){evnt(5580);if(r)goto S_5789;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Array must be of type INTEGER or LONG",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5580);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5580);}while(r); } do{ *__LONG_BITS=*__LONG_T& 511 ; if(!qbevent)break;evnt(5581);}while(r); do{ goto LABEL_PU_GOTARRAY; if(!qbevent)break;evnt(5582);}while(r); } S_5796:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5584);if(r)goto S_5796;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5584);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected PALETTE USING array-name",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5585);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5585);}while(r); LABEL_PU_GOTARRAY:; if(qbevent){evnt(5586);r=0;} S_5801:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(5588);if(r)goto S_5801;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_E,__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5589);}while(r); }else{ S_5804:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N== 4 ))|(qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass761= 4 )),qbs_new_txt_len("(",1)))|(qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_N),qbs_new_txt_len(")",1)))))||new_error){ if(qbevent){evnt(5591);if(r)goto S_5804;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected PALETTE USING array-name(...)",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5591);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5591);}while(r); } do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass762= 4 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5592);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5594);}while(r); S_5811:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5595);if(r)goto S_5811;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5595);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5596);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass763= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5597);}while(r); S_5816:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5598);if(r)goto S_5816;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5598);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip764; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_paletteusing(",17),__STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(__LONG_BITS)),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip764; skip764: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5599);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5600);}while(r); S_5821:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5600);if(r)goto S_5821;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5600);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5600);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5601);}while(r); } } } S_5830:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("KEY",3))))||new_error){ if(qbevent){evnt(5607);if(r)goto S_5830;} S_5831:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5608);if(r)goto S_5831;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY ...",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5608);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5608);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_new_txt_len("KEY",3),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5609);}while(r); S_5836:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("OFF",3))))||new_error){ if(qbevent){evnt(5610);if(r)goto S_5836;} S_5837:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(5611);if(r)goto S_5837;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY OFF only",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5611);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5611);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,qbs_new_txt_len("OFF",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5612);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5612);}while(r); S_5843:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5612);if(r)goto S_5843;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5612);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5612);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip767; sub_file_print(tmp_fileno,qbs_new_txt_len("key_off();",10), 0 , 0 , 1 ); if (new_error) goto skip767; skip767: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5613);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5614);}while(r); } S_5851:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("ON",2))))||new_error){ if(qbevent){evnt(5616);if(r)goto S_5851;} S_5852:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(5617);if(r)goto S_5852;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY ON only",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5617);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5617);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,qbs_new_txt_len("ON",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5618);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5618);}while(r); S_5858:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5618);if(r)goto S_5858;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5618);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5618);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip769; sub_file_print(tmp_fileno,qbs_new_txt_len("key_on();",9), 0 , 0 , 1 ); if (new_error) goto skip769; skip769: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5619);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5620);}while(r); } S_5866:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("LIST",4))))||new_error){ if(qbevent){evnt(5622);if(r)goto S_5866;} S_5867:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(5623);if(r)goto S_5867;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY LIST only",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5623);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5623);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,qbs_new_txt_len("LIST",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5624);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5624);}while(r); S_5873:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5624);if(r)goto S_5873;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5624);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5624);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip771; sub_file_print(tmp_fileno,qbs_new_txt_len("key_list();",11), 0 , 0 , 1 ); if (new_error) goto skip771; skip771: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5625);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5626);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(5629);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5629);}while(r); S_5883:; fornext_value773= 2 ; fornext_finalvalue773=*__LONG_N; fornext_step773= 1 ; if (fornext_step773<0) fornext_step_negative773=1; else fornext_step_negative773=0; if (new_error) goto fornext_error773; goto fornext_entrylabel773; while(1){ fornext_value773=fornext_step773+(*__LONG_I); fornext_entrylabel773: *__LONG_I=fornext_value773; if (fornext_step_negative773){ if (fornext_value773fornext_finalvalue773) break; } fornext_error773:; if(qbevent){evnt(5630);if(r)goto S_5883;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5631);}while(r); S_5885:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5632);if(r)goto S_5885;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(5632);}while(r); } S_5888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5633);if(r)goto S_5888;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(5633);}while(r); } S_5891:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(5634);if(r)goto S_5891;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5635);}while(r); do{ goto LABEL_KEY_ASSIGNMENT; if(!qbevent)break;evnt(5635);}while(r); } S_5895:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(5637);if(r)goto S_5895;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5637);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5637);}while(r); } } fornext_exit_772:; do{ goto LABEL_KEY_FALLTHROUGH; if(!qbevent)break;evnt(5640);}while(r); LABEL_KEY_ASSIGNMENT:; if(qbevent){evnt(5641);r=0;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5644);}while(r); S_5903:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5645);if(r)goto S_5903;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5645);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5646);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass775= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5647);}while(r); S_5908:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5648);if(r)goto S_5908;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5648);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip776; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("key_assign(",11),__STRING_E),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip776; skip776: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5649);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,__LONG_I,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5651);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5652);}while(r); S_5914:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5653);if(r)goto S_5914;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5653);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5654);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5655);}while(r); S_5919:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5656);if(r)goto S_5919;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5656);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip777; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip777; skip777: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5657);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5658);}while(r); S_5924:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5658);if(r)goto S_5924;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5658);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5658);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5659);}while(r); } LABEL_KEY_FALLTHROUGH:; if(qbevent){evnt(5661);r=0;} S_5931:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FIELD",5))))||new_error){ if(qbevent){evnt(5666);if(r)goto S_5931;} do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(5669);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5669);}while(r); S_5934:; fornext_value780= 2 ; fornext_finalvalue780=*__LONG_N; fornext_step780= 1 ; if (fornext_step780<0) fornext_step_negative780=1; else fornext_step_negative780=0; if (new_error) goto fornext_error780; goto fornext_entrylabel780; while(1){ fornext_value780=fornext_step780+(*__LONG_I); fornext_entrylabel780: *__LONG_I=fornext_value780; if (fornext_step_negative780){ if (fornext_value780fornext_finalvalue780) break; } fornext_error780:; if(qbevent){evnt(5670);if(r)goto S_5934;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5671);}while(r); S_5936:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5672);if(r)goto S_5936;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(5672);}while(r); } S_5939:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5673);if(r)goto S_5939;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(5673);}while(r); } S_5942:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(5674);if(r)goto S_5942;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5675);}while(r); do{ goto LABEL_FIELDGOTFN; if(!qbevent)break;evnt(5675);}while(r); } S_5946:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(5677);if(r)goto S_5946;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5677);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5677);}while(r); } } fornext_exit_779:; do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5679);}while(r); LABEL_FIELDGOTFN:; if(qbevent){evnt(5680);r=0;} S_5953:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("#",1)))|(-(__STRING_E->len== 0 ))))||new_error){ if(qbevent){evnt(5681);if(r)goto S_5953;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5681);}while(r); } S_5956:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_left(__STRING_E, 2 )),(qbs_add(qbs_new_txt_len("#",1),__STRING1_SP)))))||new_error){ if(qbevent){evnt(5682);if(r)goto S_5956;} do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5682);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("FIELD",5),__STRING1_SP),qbs_new_txt_len("#",1)),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5682);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_new_txt_len("FIELD",5),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5682);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5683);}while(r); S_5963:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5684);if(r)goto S_5963;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5684);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5685);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass784= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5686);}while(r); S_5968:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5687);if(r)goto S_5968;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5687);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip785; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("field_new(",10),__STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip785; skip785: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5688);}while(r); LABEL_FIELDNEXT:; if(qbevent){evnt(5690);r=0;} S_5972:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(5693);if(r)goto S_5972;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5693);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(5694);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5694);}while(r); S_5977:; fornext_value787=*__LONG_I; fornext_finalvalue787=*__LONG_N; fornext_step787= 1 ; if (fornext_step787<0) fornext_step_negative787=1; else fornext_step_negative787=0; if (new_error) goto fornext_error787; goto fornext_entrylabel787; while(1){ fornext_value787=fornext_step787+(*__LONG_I); fornext_entrylabel787: *__LONG_I=fornext_value787; if (fornext_step_negative787){ if (fornext_value787fornext_finalvalue787) break; } fornext_error787:; if(qbevent){evnt(5695);if(r)goto S_5977;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5696);}while(r); S_5979:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5697);if(r)goto S_5979;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(5697);}while(r); } S_5982:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5698);if(r)goto S_5982;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(5698);}while(r); } S_5985:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_E2),qbs_new_txt_len("AS",2)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(5699);if(r)goto S_5985;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5700);}while(r); do{ goto LABEL_FIELDGOTFW; if(!qbevent)break;evnt(5700);}while(r); } S_5989:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(5702);if(r)goto S_5989;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5702);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5702);}while(r); } } fornext_exit_786:; do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5704);}while(r); LABEL_FIELDGOTFW:; if(qbevent){evnt(5705);r=0;} S_5996:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(5706);if(r)goto S_5996;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5706);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5707);}while(r); S_6000:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5708);if(r)goto S_6000;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5708);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5709);}while(r); do{ qbs_set(__STRING_SIZEE,FUNC_EVALUATETOTYP(__STRING_E,&(pass790= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5710);}while(r); S_6005:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5711);if(r)goto S_6005;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5711);}while(r); } S_6008:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(5714);if(r)goto S_6008;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5714);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(5715);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5715);}while(r); S_6013:; fornext_value792=*__LONG_I; fornext_finalvalue792=*__LONG_N; fornext_step792= 1 ; if (fornext_step792<0) fornext_step_negative792=1; else fornext_step_negative792=0; if (new_error) goto fornext_error792; goto fornext_entrylabel792; while(1){ fornext_value792=fornext_step792+(*__LONG_I); fornext_entrylabel792: *__LONG_I=fornext_value792; if (fornext_step_negative792){ if (fornext_value792fornext_finalvalue792) break; } fornext_error792:; if(qbevent){evnt(5716);if(r)goto S_6013;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5717);}while(r); S_6015:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5718);if(r)goto S_6015;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(5718);}while(r); } S_6018:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5719);if(r)goto S_6018;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(5719);}while(r); } S_6021:; if ((qbs_cleanup(qbs_tmp_base,(((-(*__LONG_I==*__LONG_N))|(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(5720);if(r)goto S_6021;} S_6022:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(5721);if(r)goto S_6022;} do{ *__LONG_I=*__LONG_I- 1 ; if(!qbevent)break;evnt(5721);}while(r); } S_6025:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(5722);if(r)goto S_6025;} S_6026:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(5723);if(r)goto S_6026;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5723);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5723);}while(r); } } do{ goto LABEL_FIELDGOTFNAME; if(!qbevent)break;evnt(5725);}while(r); } S_6034:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(5727);if(r)goto S_6034;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5727);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5727);}while(r); } } fornext_exit_791:; do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5729);}while(r); LABEL_FIELDGOTFNAME:; if(qbevent){evnt(5730);r=0;} S_6041:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(5731);if(r)goto S_6041;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5731);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5733);}while(r); S_6045:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5734);if(r)goto S_6045;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5734);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5735);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5736);}while(r); S_6050:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5737);if(r)goto S_6050;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5737);}while(r); } S_6053:; if ((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(5738);if(r)goto S_6053;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5738);}while(r); } S_6056:; if ((*__LONG_TYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(5739);if(r)goto S_6056;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Fixed length strings cannot be used in a FIELD statement",56)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5739);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5739);}while(r); } S_6060:; if ((-((*__LONG_TYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(5740);if(r)goto S_6060;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(5740);}while(r); } do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass796= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5741);}while(r); S_6064:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5742);if(r)goto S_6064;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5742);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip797; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("field_add(",10),__STRING_E),qbs_new_txt_len(",",1)),__STRING_SIZEE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip797; skip797: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5743);}while(r); S_6068:; if ((-(*__LONG_I<*__LONG_N))||new_error){ if(qbevent){evnt(5745);if(r)goto S_6068;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5746);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5747);}while(r); S_6071:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(5748);if(r)goto S_6071;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5748);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5748);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5749);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5750);}while(r); do{ goto LABEL_FIELDNEXT; if(!qbevent)break;evnt(5751);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5754);}while(r); S_6080:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5754);if(r)goto S_6080;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5754);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5754);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5755);}while(r); LABEL_FIELDERROR:; if(qbevent){evnt(5757);r=0;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected FIELD #filenumber, characters AS variable$, ...",56)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5757);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5757);}while(r); } S_6089:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(5770);if(r)goto S_6089;} S_6090:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("EXIT",4))))||new_error){ if(qbevent){evnt(5771);if(r)goto S_6090;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_FIRSTELEMENT,__STRING1_SP),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5773);}while(r); S_6092:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("DO",2))))||new_error){ if(qbevent){evnt(5775);if(r)goto S_6092;} S_6093:; fornext_value800=*__INTEGER_CONTROLLEVEL; fornext_finalvalue800= 1 ; fornext_step800= -1 ; if (fornext_step800<0) fornext_step_negative800=1; else fornext_step_negative800=0; if (new_error) goto fornext_error800; goto fornext_entrylabel800; while(1){ fornext_value800=fornext_step800+(*__LONG_I); fornext_entrylabel800: *__LONG_I=fornext_value800; if (fornext_step_negative800){ if (fornext_value800fornext_finalvalue800) break; } fornext_error800:; if(qbevent){evnt(5777);if(r)goto S_6093;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(5778);}while(r); S_6095:; if (((-(*__LONG_T== 3 ))|(-(*__LONG_T== 4 )))||new_error){ if(qbevent){evnt(5779);if(r)goto S_6095;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip801; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto dl_exit_",13),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip801; skip801: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5780);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5781);}while(r); S_6098:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5781);if(r)goto S_6098;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5781);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5781);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5782);}while(r); } } fornext_exit_799:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT DO without DO",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5785);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5785);}while(r); } S_6109:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("FOR",3))))||new_error){ if(qbevent){evnt(5788);if(r)goto S_6109;} S_6110:; fornext_value804=*__INTEGER_CONTROLLEVEL; fornext_finalvalue804= 1 ; fornext_step804= -1 ; if (fornext_step804<0) fornext_step_negative804=1; else fornext_step_negative804=0; if (new_error) goto fornext_error804; goto fornext_entrylabel804; while(1){ fornext_value804=fornext_step804+(*__LONG_I); fornext_entrylabel804: *__LONG_I=fornext_value804; if (fornext_step_negative804){ if (fornext_value804fornext_finalvalue804) break; } fornext_error804:; if(qbevent){evnt(5790);if(r)goto S_6110;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(5791);}while(r); S_6112:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(5792);if(r)goto S_6112;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip805; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto fornext_exit_",18),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip805; skip805: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5793);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5794);}while(r); S_6115:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5794);if(r)goto S_6115;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5794);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5794);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5795);}while(r); } } fornext_exit_803:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT FOR without FOR",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5798);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5798);}while(r); } S_6126:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(5801);if(r)goto S_6126;} S_6127:; fornext_value808=*__INTEGER_CONTROLLEVEL; fornext_finalvalue808= 1 ; fornext_step808= -1 ; if (fornext_step808<0) fornext_step_negative808=1; else fornext_step_negative808=0; if (new_error) goto fornext_error808; goto fornext_entrylabel808; while(1){ fornext_value808=fornext_step808+(*__LONG_I); fornext_entrylabel808: *__LONG_I=fornext_value808; if (fornext_step_negative808){ if (fornext_value808fornext_finalvalue808) break; } fornext_error808:; if(qbevent){evnt(5803);if(r)goto S_6127;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(5804);}while(r); S_6129:; if ((-(*__LONG_T== 5 ))||new_error){ if(qbevent){evnt(5805);if(r)goto S_6129;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip809; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto ww_exit_",13),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip809; skip809: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5806);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5807);}while(r); S_6132:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5807);if(r)goto S_6132;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5807);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5807);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5808);}while(r); } } fornext_exit_807:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT WHILE without WHILE",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5811);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5811);}while(r); } } } S_6145:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(5824);if(r)goto S_6145;} S_6146:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ON",2)))&(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("STRIG",5)))))||new_error){ if(qbevent){evnt(5825);if(r)goto S_6146;} do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(5826);}while(r); S_6148:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(5827);if(r)goto S_6148;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5827);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5827);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5828);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5828);}while(r); S_6154:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5829);if(r)goto S_6154;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5829);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5829);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ON",2),__STRING1_SP),qbs_new_txt_len("STRIG",5)),__STRING1_SP2),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5830);}while(r); S_6159:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(5831);if(r)goto S_6159;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ...",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5831);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5831);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(5832);}while(r); do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(5833);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5834);}while(r); do{ qbs_set(__STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5835);}while(r); S_6167:; fornext_value812=*__LONG_I; fornext_finalvalue812=*__LONG_N; fornext_step812= 1 ; if (fornext_step812<0) fornext_step_negative812=1; else fornext_step_negative812=0; if (new_error) goto fornext_error812; goto fornext_entrylabel812; while(1){ fornext_value812=fornext_step812+(*__LONG_I); fornext_entrylabel812: *__LONG_I=fornext_value812; if (fornext_step_negative812){ if (fornext_value812fornext_finalvalue812) break; } fornext_error812:; if(qbevent){evnt(5836);if(r)goto S_6167;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5837);}while(r); do{ *__LONG_A=qbs_asc(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5838);}while(r); S_6170:; if ((-(*__LONG_A== 40 ))||new_error){ if(qbevent){evnt(5839);if(r)goto S_6170;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(5839);}while(r); } S_6173:; if ((-(*__LONG_A== 41 ))||new_error){ if(qbevent){evnt(5840);if(r)goto S_6173;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(5840);}while(r); } S_6176:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(5841);if(r)goto S_6176;} do{ goto LABEL_ONSTRIGGOTARG; if(!qbevent)break;evnt(5841);}while(r); } S_6179:; if (((-(*__LONG_A== 44 ))&(-(*__LONG_B== 0 )))||new_error){ if(qbevent){evnt(5842);if(r)goto S_6179;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(5843);}while(r); S_6181:; if ((-(*__LONG_X> 1 ))||new_error){ if(qbevent){evnt(5844);if(r)goto S_6181;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5844);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5844);}while(r); } S_6185:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5845);if(r)goto S_6185;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5845);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5845);}while(r); } do{ qbs_set(__STRING_E3,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5846);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5847);}while(r); }else{ S_6192:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E2->len))||new_error){ if(qbevent){evnt(5849);if(r)goto S_6192;} do{ qbs_set(__STRING_E2,qbs_add(qbs_add(__STRING_E2,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5849);}while(r); }else{ do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5849);}while(r); } } } fornext_exit_811:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5852);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5852);}while(r); LABEL_ONSTRIGGOTARG:; if(qbevent){evnt(5853);r=0;} S_6201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5854);if(r)goto S_6201;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... )",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5854);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5854);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip814; sub_file_print(tmp_fileno,qbs_new_txt_len("onstrig_setup(",14), 0 , 0 , 0 ); if (new_error) goto skip814; skip814: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5855);}while(r); S_6206:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E3->len))||new_error){ if(qbevent){evnt(5858);if(r)goto S_6206;} do{ qbs_set(__STRING_OPTI,__STRING_E3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5859);}while(r); do{ qbs_set(__STRING_OPTCONTROLLER,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5860);}while(r); do{ qbs_set(__STRING_OPTPASSED,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5861);}while(r); }else{ do{ qbs_set(__STRING_OPTI,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5863);}while(r); do{ qbs_set(__STRING_OPTCONTROLLER,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5864);}while(r); do{ qbs_set(__STRING_OPTPASSED,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5865);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OPTI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5869);}while(r); S_6216:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5869);if(r)goto S_6216;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5869);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5870);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass816= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5871);}while(r); S_6221:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5871);if(r)goto S_6221;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5871);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip817; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip817; skip817: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5872);}while(r); S_6225:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OPTPASSED,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(5875);if(r)goto S_6225;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OPTCONTROLLER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5876);}while(r); S_6227:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5876);if(r)goto S_6227;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5876);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5877);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass818= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5878);}while(r); S_6232:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5878);if(r)goto S_6232;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5878);}while(r); } }else{ do{ qbs_set(__STRING_E,__STRING_OPTCONTROLLER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5880);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip819; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_E,qbs_new_txt_len(",",1)),__STRING_OPTPASSED),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip819; skip819: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5882);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5884);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5886);}while(r); S_6241:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(5887);if(r)goto S_6241;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5887);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5887);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5888);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5888);}while(r); do{ *__LONG_ONSTRIGID=*__LONG_ONSTRIGID+ 1 ; if(!qbevent)break;evnt(5889);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip820; sub_file_print(tmp_fileno,qbs_add(FUNC_STR2(__LONG_ONSTRIGID),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip820; skip820: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5890);}while(r); S_6249:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(5892);if(r)goto S_6249;} S_6250:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(5893);if(r)goto S_6250;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected linenumber/label",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5893);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5893);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5894);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5894);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip821; sub_file_print(tmp_fileno,qbs_new_txt_len("0);",3), 0 , 0 , 1 ); if (new_error) goto skip821; skip821: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5896);}while(r); S_6257:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(5898);if(r)goto S_6257;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5898);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5898);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass822= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5900);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(5901);}while(r); LABEL_LABCHK60Z:; if(qbevent){evnt(5902);r=0;} S_6263:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(5903);if(r)goto S_6263;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(5904);}while(r); S_6265:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(5905);if(r)goto S_6265;} S_6266:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(5906);if(r)goto S_6266;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))= 0 ; if(!qbevent)break;evnt(5906);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(5907);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5908);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(5909);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(5910);}while(r); }else{ S_6274:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(5912);if(r)goto S_6274;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(5912);}while(r); do{ goto LABEL_LABCHK60Z; if(!qbevent)break;evnt(5912);}while(r); } } } S_6280:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(5915);if(r)goto S_6280;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(5917);}while(r); S_6282:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(5917);if(r)goto S_6282;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(5917);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elements=return_points) more_return_points();",59), 0 , 0 , 1 ); if (new_error) goto skip830; skip830: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5936);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 29 ; if (new_error) goto skip831; sub_file_print(tmp_fileno,qbs_new_txt_len("QBMAIN(NULL);",13), 0 , 0 , 1 ); if (new_error) goto skip831; skip831: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5937);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 29 ; if (new_error) goto skip832; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip832; skip832: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5938);}while(r); S_6305:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(5940);if(r)goto S_6305;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5940);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5940);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5941);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5942);}while(r); }else{ do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(5947);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5948);}while(r); S_6315:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5949);if(r)goto S_6315;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5949);}while(r); } S_6318:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(5950);if(r)goto S_6318;} S_6319:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(5951);if(r)goto S_6319;} do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(5951);}while(r); do{ goto dl_exit_834; if(!qbevent)break;evnt(5951);}while(r); } S_6323:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(5952);if(r)goto S_6323;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(5952);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5952);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(5952);}while(r); } S_6329:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5953);if(r)goto S_6329;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5953);}while(r); } } dl_exit_834:; S_6333:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(5955);if(r)goto S_6333;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5955);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5955);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5957);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 29 ; if (new_error) goto skip835; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_ONSTRIGID)),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip835; skip835: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5959);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 29 ; if (new_error) goto skip836; sub_file_print(tmp_fileno,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip836; skip836: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5960);}while(r); S_6340:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))> 1 ))||new_error){ if(qbevent){evnt(5962);if(r)goto S_6340;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB requires more than one argument",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5962);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5962);}while(r); } S_6344:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(5964);if(r)goto S_6344;} S_6345:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))== 1 ))||new_error){ if(qbevent){evnt(5966);if(r)goto S_6345;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected argument after SUB",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5966);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5966);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip837; sub_file_print(tmp_fileno,qbs_new_txt_len("0);",3), 0 , 0 , 1 ); if (new_error) goto skip837; skip837: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5967);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 29 ; if (new_error) goto skip838; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip838; skip838: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5968);}while(r); }else{ S_6352:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))== 0 ))||new_error){ if(qbevent){evnt(5972);if(r)goto S_6352;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB has no arguments",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5972);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5972);}while(r); } do{ *__LONG_T=string2l(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5974);}while(r); do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(5975);}while(r); S_6358:; if (((-(*__LONG_B== 0 ))|(-((*__LONG_T&*__LONG_ISARRAY)!= 0 ))|(-((*__LONG_T&*__LONG_ISFLOAT)!= 0 ))|(-((*__LONG_T&*__LONG_ISSTRING)!= 0 ))|(-((*__LONG_T&*__LONG_ISOFFSETINBITS)!= 0 )))||new_error){ if(qbevent){evnt(5976);if(r)goto S_6358;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Only SUB arguments of integer-type allowed",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5976);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5976);}while(r); } S_6362:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(5977);if(r)goto S_6362;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5977);}while(r); } S_6365:; if ((-(*__LONG_B== 16 ))||new_error){ if(qbevent){evnt(5978);if(r)goto S_6365;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5978);}while(r); } S_6368:; if ((-(*__LONG_B== 32 ))||new_error){ if(qbevent){evnt(5979);if(r)goto S_6368;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5979);}while(r); } S_6371:; if ((-(*__LONG_B== 64 ))||new_error){ if(qbevent){evnt(5980);if(r)goto S_6371;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5980);}while(r); } S_6374:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(5981);if(r)goto S_6374;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5981);}while(r); } S_6377:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(5982);if(r)goto S_6377;} do{ qbs_set(__STRING_CT,qbs_add(qbs_new_txt_len("u",1),__STRING_CT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5982);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 29 ; if (new_error) goto skip839; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING_CT),qbs_new_txt_len("*)&i64);",8)), 0 , 0 , 1 ); if (new_error) goto skip839; skip839: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5983);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,__LONG_I,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5985);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5986);}while(r); S_6383:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5987);if(r)goto S_6383;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5987);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5988);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass840=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5989);}while(r); S_6388:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5990);if(r)goto S_6388;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5990);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip841; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip841; skip841: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5991);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 29 ; if (new_error) goto skip842; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip842; skip842: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(5995);}while(r); S_6394:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(5996);if(r)goto S_6394;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5996);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5996);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5997);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5998);}while(r); } } } S_6404:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(6015);if(r)goto S_6404;} S_6405:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ON",2)))&(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("TIMER",5)))))||new_error){ if(qbevent){evnt(6016);if(r)goto S_6405;} do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(6017);}while(r); S_6407:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6018);if(r)goto S_6407;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6018);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6018);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6019);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6019);}while(r); S_6413:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6020);if(r)goto S_6413;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6020);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6020);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ON",2),__STRING1_SP),qbs_new_txt_len("TIMER",5)),__STRING1_SP2),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6021);}while(r); S_6418:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6022);if(r)goto S_6418;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ...",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6022);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6022);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6023);}while(r); do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6024);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6025);}while(r); do{ qbs_set(__STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6026);}while(r); S_6426:; fornext_value845=*__LONG_I; fornext_finalvalue845=*__LONG_N; fornext_step845= 1 ; if (fornext_step845<0) fornext_step_negative845=1; else fornext_step_negative845=0; if (new_error) goto fornext_error845; goto fornext_entrylabel845; while(1){ fornext_value845=fornext_step845+(*__LONG_I); fornext_entrylabel845: *__LONG_I=fornext_value845; if (fornext_step_negative845){ if (fornext_value845fornext_finalvalue845) break; } fornext_error845:; if(qbevent){evnt(6027);if(r)goto S_6426;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6028);}while(r); do{ *__LONG_A=qbs_asc(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6029);}while(r); S_6429:; if ((-(*__LONG_A== 40 ))||new_error){ if(qbevent){evnt(6030);if(r)goto S_6429;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6030);}while(r); } S_6432:; if ((-(*__LONG_A== 41 ))||new_error){ if(qbevent){evnt(6031);if(r)goto S_6432;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6031);}while(r); } S_6435:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(6032);if(r)goto S_6435;} do{ goto LABEL_ONTIMGOTARG; if(!qbevent)break;evnt(6032);}while(r); } S_6438:; if (((-(*__LONG_A== 44 ))&(-(*__LONG_B== 0 )))||new_error){ if(qbevent){evnt(6033);if(r)goto S_6438;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(6034);}while(r); S_6440:; if ((-(*__LONG_X> 1 ))||new_error){ if(qbevent){evnt(6035);if(r)goto S_6440;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6035);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6035);}while(r); } S_6444:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6036);if(r)goto S_6444;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6036);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6036);}while(r); } do{ qbs_set(__STRING_E3,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6037);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6038);}while(r); }else{ S_6451:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E2->len))||new_error){ if(qbevent){evnt(6040);if(r)goto S_6451;} do{ qbs_set(__STRING_E2,qbs_add(qbs_add(__STRING_E2,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6040);}while(r); }else{ do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6040);}while(r); } } } fornext_exit_844:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6043);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6043);}while(r); LABEL_ONTIMGOTARG:; if(qbevent){evnt(6044);r=0;} S_6460:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6045);if(r)goto S_6460;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... )",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6045);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6045);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip847; sub_file_print(tmp_fileno,qbs_new_txt_len("ontimer_setup(",14), 0 , 0 , 0 ); if (new_error) goto skip847; skip847: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6046);}while(r); S_6465:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E3->len))||new_error){ if(qbevent){evnt(6048);if(r)goto S_6465;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6049);}while(r); S_6467:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6050);if(r)goto S_6467;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6050);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),__STRING_TLAYOUT),qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6051);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass849= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6052);}while(r); S_6472:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6053);if(r)goto S_6472;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6053);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip850; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip850; skip850: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6054);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip851; sub_file_print(tmp_fileno,qbs_new_txt_len("0,",2), 0 , 0 , 0 ); if (new_error) goto skip851; skip851: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6056);}while(r); do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6057);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6060);}while(r); S_6481:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6061);if(r)goto S_6481;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6061);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6062);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass852=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6063);}while(r); S_6486:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6064);if(r)goto S_6486;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6064);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip853; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip853; skip853: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6065);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6066);}while(r); S_6491:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6067);if(r)goto S_6491;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6067);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6067);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6068);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6068);}while(r); do{ *__LONG_ONTIMERID=*__LONG_ONTIMERID+ 1 ; if(!qbevent)break;evnt(6069);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip854; sub_file_print(tmp_fileno,qbs_add(FUNC_STR2(__LONG_ONTIMERID),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip854; skip854: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6070);}while(r); S_6499:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(6072);if(r)goto S_6499;} S_6500:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6073);if(r)goto S_6500;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected linenumber/label",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6073);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6073);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6074);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6074);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip855; sub_file_print(tmp_fileno,qbs_new_txt_len("0);",3), 0 , 0 , 1 ); if (new_error) goto skip855; skip855: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6076);}while(r); S_6507:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(6078);if(r)goto S_6507;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6078);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6078);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass856= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6080);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(6081);}while(r); LABEL_LABCHK60:; if(qbevent){evnt(6082);r=0;} S_6513:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(6083);if(r)goto S_6513;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(6084);}while(r); S_6515:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(6085);if(r)goto S_6515;} S_6516:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(6086);if(r)goto S_6516;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))= 0 ; if(!qbevent)break;evnt(6086);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6087);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6088);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(6089);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(6090);}while(r); }else{ S_6524:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(6092);if(r)goto S_6524;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(6092);}while(r); do{ goto LABEL_LABCHK60; if(!qbevent)break;evnt(6092);}while(r); } } } S_6530:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(6095);if(r)goto S_6530;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(6097);}while(r); S_6532:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(6097);if(r)goto S_6532;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(6097);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elements=return_points) more_return_points();",59), 0 , 0 , 1 ); if (new_error) goto skip864; skip864: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6116);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 24 ; if (new_error) goto skip865; sub_file_print(tmp_fileno,qbs_new_txt_len("QBMAIN(NULL);",13), 0 , 0 , 1 ); if (new_error) goto skip865; skip865: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6117);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 24 ; if (new_error) goto skip866; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip866; skip866: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6118);}while(r); S_6555:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(6128);if(r)goto S_6555;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6128);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6128);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6129);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6130);}while(r); }else{ do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6134);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6135);}while(r); S_6565:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6136);if(r)goto S_6565;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6136);}while(r); } S_6568:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(6137);if(r)goto S_6568;} S_6569:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(6138);if(r)goto S_6569;} do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(6138);}while(r); do{ goto dl_exit_868; if(!qbevent)break;evnt(6138);}while(r); } S_6573:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(6139);if(r)goto S_6573;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(6139);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6139);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(6139);}while(r); } S_6579:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6140);if(r)goto S_6579;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6140);}while(r); } } dl_exit_868:; S_6583:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(6142);if(r)goto S_6583;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6142);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6142);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6144);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 24 ; if (new_error) goto skip869; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_ONTIMERID)),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip869; skip869: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6146);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 24 ; if (new_error) goto skip870; sub_file_print(tmp_fileno,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip870; skip870: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6147);}while(r); S_6590:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))> 1 ))||new_error){ if(qbevent){evnt(6149);if(r)goto S_6590;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB requires more than one argument",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6149);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6149);}while(r); } S_6594:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6151);if(r)goto S_6594;} S_6595:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))== 1 ))||new_error){ if(qbevent){evnt(6153);if(r)goto S_6595;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected argument after SUB",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6153);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6153);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip871; sub_file_print(tmp_fileno,qbs_new_txt_len("0);",3), 0 , 0 , 1 ); if (new_error) goto skip871; skip871: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6154);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 24 ; if (new_error) goto skip872; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip872; skip872: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6155);}while(r); }else{ S_6602:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))== 0 ))||new_error){ if(qbevent){evnt(6159);if(r)goto S_6602;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB has no arguments",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6159);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6159);}while(r); } do{ *__LONG_T=string2l(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6161);}while(r); do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(6162);}while(r); S_6608:; if (((-(*__LONG_B== 0 ))|(-((*__LONG_T&*__LONG_ISARRAY)!= 0 ))|(-((*__LONG_T&*__LONG_ISFLOAT)!= 0 ))|(-((*__LONG_T&*__LONG_ISSTRING)!= 0 ))|(-((*__LONG_T&*__LONG_ISOFFSETINBITS)!= 0 )))||new_error){ if(qbevent){evnt(6163);if(r)goto S_6608;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Only SUB arguments of integer-type allowed",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6163);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6163);}while(r); } S_6612:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(6164);if(r)goto S_6612;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6164);}while(r); } S_6615:; if ((-(*__LONG_B== 16 ))||new_error){ if(qbevent){evnt(6165);if(r)goto S_6615;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6165);}while(r); } S_6618:; if ((-(*__LONG_B== 32 ))||new_error){ if(qbevent){evnt(6166);if(r)goto S_6618;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6166);}while(r); } S_6621:; if ((-(*__LONG_B== 64 ))||new_error){ if(qbevent){evnt(6167);if(r)goto S_6621;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6167);}while(r); } S_6624:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(6168);if(r)goto S_6624;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6168);}while(r); } S_6627:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(6169);if(r)goto S_6627;} do{ qbs_set(__STRING_CT,qbs_add(qbs_new_txt_len("u",1),__STRING_CT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6169);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 24 ; if (new_error) goto skip873; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING_CT),qbs_new_txt_len("*)&i64);",8)), 0 , 0 , 1 ); if (new_error) goto skip873; skip873: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6170);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,__LONG_I,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6172);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6173);}while(r); S_6633:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6174);if(r)goto S_6633;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6174);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6175);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass874=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6176);}while(r); S_6638:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6177);if(r)goto S_6638;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6177);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip875; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip875; skip875: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6178);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 24 ; if (new_error) goto skip876; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip876; skip876: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6182);}while(r); S_6644:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(6183);if(r)goto S_6644;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6183);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6183);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6184);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6185);}while(r); } } } S_6654:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(6194);if(r)goto S_6654;} S_6655:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ON",2)))&(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("KEY",3)))))||new_error){ if(qbevent){evnt(6195);if(r)goto S_6655;} do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(6196);}while(r); S_6657:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6197);if(r)goto S_6657;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6197);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6197);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6198);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6198);}while(r); S_6663:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6199);if(r)goto S_6663;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6199);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6199);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ON",2),__STRING1_SP),qbs_new_txt_len("KEY",3)),__STRING1_SP2),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6200);}while(r); S_6668:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6201);if(r)goto S_6668;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ...",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6201);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6201);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6202);}while(r); do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6203);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6204);}while(r); S_6675:; fornext_value879=*__LONG_I; fornext_finalvalue879=*__LONG_N; fornext_step879= 1 ; if (fornext_step879<0) fornext_step_negative879=1; else fornext_step_negative879=0; if (new_error) goto fornext_error879; goto fornext_entrylabel879; while(1){ fornext_value879=fornext_step879+(*__LONG_I); fornext_entrylabel879: *__LONG_I=fornext_value879; if (fornext_step_negative879){ if (fornext_value879fornext_finalvalue879) break; } fornext_error879:; if(qbevent){evnt(6205);if(r)goto S_6675;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6206);}while(r); do{ *__LONG_A=qbs_asc(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6207);}while(r); S_6678:; if ((-(*__LONG_A== 40 ))||new_error){ if(qbevent){evnt(6210);if(r)goto S_6678;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6210);}while(r); } S_6681:; if ((-(*__LONG_A== 41 ))||new_error){ if(qbevent){evnt(6211);if(r)goto S_6681;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6211);}while(r); } S_6684:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(6212);if(r)goto S_6684;} do{ goto fornext_exit_878; if(!qbevent)break;evnt(6212);}while(r); } S_6687:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E2->len))||new_error){ if(qbevent){evnt(6213);if(r)goto S_6687;} do{ qbs_set(__STRING_E2,qbs_add(qbs_add(__STRING_E2,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6213);}while(r); }else{ do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6213);}while(r); } } fornext_exit_878:; S_6693:; if ((-(*__LONG_I==(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(6215);if(r)goto S_6693;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6215);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6215);}while(r); } S_6697:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6216);if(r)goto S_6697;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... )",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6216);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6216);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6218);}while(r); S_6702:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6219);if(r)goto S_6702;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6219);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6220);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass881=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6221);}while(r); S_6707:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6222);if(r)goto S_6707;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6222);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip882; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("onkey_setup(",12),__STRING_E),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip882; skip882: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6223);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6225);}while(r); S_6712:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6226);if(r)goto S_6712;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6226);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6226);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6227);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6227);}while(r); do{ *__LONG_ONKEYID=*__LONG_ONKEYID+ 1 ; if(!qbevent)break;evnt(6228);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip883; sub_file_print(tmp_fileno,qbs_add(FUNC_STR2(__LONG_ONKEYID),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip883; skip883: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6229);}while(r); S_6720:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(6231);if(r)goto S_6720;} S_6721:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6232);if(r)goto S_6721;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected linenumber/label",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6232);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6232);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6233);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6233);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip884; sub_file_print(tmp_fileno,qbs_new_txt_len("0);",3), 0 , 0 , 1 ); if (new_error) goto skip884; skip884: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6235);}while(r); S_6728:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(6237);if(r)goto S_6728;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6237);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6237);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass885= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6239);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(6240);}while(r); LABEL_LABCHK61:; if(qbevent){evnt(6241);r=0;} S_6734:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(6242);if(r)goto S_6734;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(6243);}while(r); S_6736:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(6244);if(r)goto S_6736;} S_6737:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(6245);if(r)goto S_6737;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))= 0 ; if(!qbevent)break;evnt(6245);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6246);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6247);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(6248);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(6249);}while(r); }else{ S_6745:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(6251);if(r)goto S_6745;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(6251);}while(r); do{ goto LABEL_LABCHK61; if(!qbevent)break;evnt(6251);}while(r); } } } S_6751:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(6254);if(r)goto S_6751;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(6256);}while(r); S_6753:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(6256);if(r)goto S_6753;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(6256);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elements=return_points) more_return_points();",59), 0 , 0 , 1 ); if (new_error) goto skip893; skip893: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6275);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 27 ; if (new_error) goto skip894; sub_file_print(tmp_fileno,qbs_new_txt_len("QBMAIN(NULL);",13), 0 , 0 , 1 ); if (new_error) goto skip894; skip894: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6276);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 27 ; if (new_error) goto skip895; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip895; skip895: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6277);}while(r); S_6776:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(6279);if(r)goto S_6776;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6279);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6279);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6280);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6281);}while(r); }else{ do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6285);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6286);}while(r); S_6786:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6287);if(r)goto S_6786;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6287);}while(r); } S_6789:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(6288);if(r)goto S_6789;} S_6790:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(6289);if(r)goto S_6790;} do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(6289);}while(r); do{ goto dl_exit_897; if(!qbevent)break;evnt(6289);}while(r); } S_6794:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(6290);if(r)goto S_6794;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(6290);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6290);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(6290);}while(r); } S_6800:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6291);if(r)goto S_6800;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6291);}while(r); } } dl_exit_897:; S_6804:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(6293);if(r)goto S_6804;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6293);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6293);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6295);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 27 ; if (new_error) goto skip898; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_ONKEYID)),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip898; skip898: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6297);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 27 ; if (new_error) goto skip899; sub_file_print(tmp_fileno,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)),qbs_new_txt_len("(",1)), 0 , 0 , 0 ); if (new_error) goto skip899; skip899: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6298);}while(r); S_6811:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))> 1 ))||new_error){ if(qbevent){evnt(6300);if(r)goto S_6811;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB requires more than one argument",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6300);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6300);}while(r); } S_6815:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6302);if(r)goto S_6815;} S_6816:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))== 1 ))||new_error){ if(qbevent){evnt(6304);if(r)goto S_6816;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected argument after SUB",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6304);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6304);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip900; sub_file_print(tmp_fileno,qbs_new_txt_len("0);",3), 0 , 0 , 1 ); if (new_error) goto skip900; skip900: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6305);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 27 ; if (new_error) goto skip901; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip901; skip901: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6306);}while(r); }else{ S_6823:; if ((-(*(int16*)(((char*)__UDT_ID)+(808))== 0 ))||new_error){ if(qbevent){evnt(6310);if(r)goto S_6823;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB has no arguments",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6310);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6310);}while(r); } do{ *__LONG_T=string2l(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6312);}while(r); do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(6313);}while(r); S_6829:; if (((-(*__LONG_B== 0 ))|(-((*__LONG_T&*__LONG_ISARRAY)!= 0 ))|(-((*__LONG_T&*__LONG_ISFLOAT)!= 0 ))|(-((*__LONG_T&*__LONG_ISSTRING)!= 0 ))|(-((*__LONG_T&*__LONG_ISOFFSETINBITS)!= 0 )))||new_error){ if(qbevent){evnt(6314);if(r)goto S_6829;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Only SUB arguments of integer-type allowed",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6314);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6314);}while(r); } S_6833:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(6315);if(r)goto S_6833;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6315);}while(r); } S_6836:; if ((-(*__LONG_B== 16 ))||new_error){ if(qbevent){evnt(6316);if(r)goto S_6836;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6316);}while(r); } S_6839:; if ((-(*__LONG_B== 32 ))||new_error){ if(qbevent){evnt(6317);if(r)goto S_6839;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6317);}while(r); } S_6842:; if ((-(*__LONG_B== 64 ))||new_error){ if(qbevent){evnt(6318);if(r)goto S_6842;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6318);}while(r); } S_6845:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(6319);if(r)goto S_6845;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6319);}while(r); } S_6848:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(6320);if(r)goto S_6848;} do{ qbs_set(__STRING_CT,qbs_add(qbs_new_txt_len("u",1),__STRING_CT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6320);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 27 ; if (new_error) goto skip902; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING_CT),qbs_new_txt_len("*)&i64);",8)), 0 , 0 , 1 ); if (new_error) goto skip902; skip902: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6321);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,__LONG_I,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6323);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6324);}while(r); S_6854:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6325);if(r)goto S_6854;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6325);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6326);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass903=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6327);}while(r); S_6859:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6328);if(r)goto S_6859;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6328);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip904; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip904; skip904: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6329);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 27 ; if (new_error) goto skip905; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip905; skip905: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6333);}while(r); S_6865:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(6334);if(r)goto S_6865;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6334);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6334);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6335);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6336);}while(r); } } } S_6875:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(6369);if(r)goto S_6875;} S_6876:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SHARED",6))))||new_error){ if(qbevent){evnt(6370);if(r)goto S_6876;} S_6877:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(6371);if(r)goto S_6877;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SHARED ...",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6371);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6371);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(6372);}while(r); S_6882:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(6373);if(r)goto S_6882;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SHARED must be used within a SUB/FUNCTION",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6373);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6373);}while(r); } do{ qbs_set(__STRING_L,qbs_new_txt_len("SHARED",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6377);}while(r); LABEL_SUBFUNCSHR:; if(qbevent){evnt(6378);r=0;} do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6381);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6381);}while(r); S_6889:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6383);if(r)goto S_6889;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SHARED variable-name",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6383);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6383);}while(r); } do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6385);}while(r); S_6894:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6386);if(r)goto S_6894;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6386);}while(r); } do{ qbs_set(__STRING_L2,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6387);}while(r); do{ *__LONG_A= 0 ; if(!qbevent)break;evnt(6390);}while(r); S_6899:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6391);if(r)goto S_6899;} S_6900:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass907=*__LONG_I+ 1 )),qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6392);if(r)goto S_6900;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ()",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6392);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6392);}while(r); } do{ *__LONG_I=*__LONG_I+ 2 ; if(!qbevent)break;evnt(6393);}while(r); do{ *__LONG_A= 1 ; if(!qbevent)break;evnt(6394);}while(r); do{ qbs_set(__STRING_L2,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L2,__STRING1_SP2),qbs_new_txt_len("(",1)),__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6395);}while(r); } do{ *__LONG_METHOD= 1 ; if(!qbevent)break;evnt(6398);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6401);}while(r); do{ qbs_set(__STRING_TS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6402);}while(r); do{ qbs_set(__STRING_T3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6403);}while(r); S_6912:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(6404);if(r)goto S_6912;} do{ qbs_set(__STRING_L2,qbs_add(qbs_add(__STRING_L2,__STRING1_SP),qbs_new_txt_len("AS",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6405);}while(r); LABEL_GETSHRTYP:; if(qbevent){evnt(6406);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6407);}while(r); do{ qbs_set(__STRING_T2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6408);}while(r); S_6916:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_T2,qbs_new_txt_len(",",1)))&(qbs_notequal(__STRING_T2,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(6409);if(r)goto S_6916;} S_6917:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6410);if(r)goto S_6917;} do{ qbs_set(__STRING_T,__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6410);}while(r); }else{ do{ qbs_set(__STRING_T,qbs_add(qbs_add(__STRING_T,qbs_new_txt_len(" ",1)),__STRING_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6410);}while(r); } S_6922:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6411);if(r)goto S_6922;} do{ qbs_set(__STRING_T3,__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6411);}while(r); }else{ do{ qbs_set(__STRING_T3,qbs_add(qbs_add(__STRING_T3,__STRING1_SP),__STRING_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6411);}while(r); } do{ goto LABEL_GETSHRTYP; if(!qbevent)break;evnt(6412);}while(r); } S_6929:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6414);if(r)goto S_6929;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected AS type",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6414);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6414);}while(r); } do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6416);}while(r); S_6934:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6417);if(r)goto S_6934;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6417);}while(r); } S_6937:; if ((*__LONG_T&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(6418);if(r)goto S_6937;} do{ *__LONG_T=*__LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(6418);}while(r); } S_6940:; if ((*__LONG_T&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(6419);if(r)goto S_6940;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(6419);}while(r); } S_6943:; if ((*__LONG_T&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(6420);if(r)goto S_6943;} do{ *__LONG_T=*__LONG_T-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(6420);}while(r); } do{ *__LONG_TSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(6421);}while(r); do{ *__LONG_METHOD= 0 ; if(!qbevent)break;evnt(6422);}while(r); S_6948:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(6423);if(r)goto S_6948;} do{ qbs_set(__STRING_TS,FUNC_TYPE2SYMBOL(__STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6423);}while(r); }else{ do{ qbs_set(__STRING_T3,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*__LONG_T& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6423);}while(r); } S_6953:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6424);if(r)goto S_6953;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6424);}while(r); } do{ qbs_set(__STRING_L2,qbs_add(qbs_add(__STRING_L2,__STRING1_SP),__STRING_T3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6425);}while(r); } S_6958:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_S->len!= 0 ))&(-(__STRING_T->len!= 0 ))))||new_error){ if(qbevent){evnt(6429);if(r)goto S_6958;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected symbol or AS type after variable name",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6429);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6429);}while(r); } S_6962:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_S,qbs_new_txt_len("",0)))&(qbs_equal(__STRING_T,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(6432);if(r)goto S_6962;} S_6963:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(6433);if(r)goto S_6963;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(6433);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6433);}while(r); } do{ qbs_set(__STRING_S,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*__LONG_V)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6434);}while(r); } do{ qbs_set(__STRING_OLDSUBFUNC,__STRING_SUBFUNC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6438);}while(r); do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6439);}while(r); do{ *__INTEGER_DEFDATAHANDLE= 18 ; if(!qbevent)break;evnt(6440);}while(r); do{ sub_close( 13 ,1); if(!qbevent)break;evnt(6441);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12)), 5 ,NULL,NULL, 13 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6441);}while(r); do{ sub_close( 19 ,1); if(!qbevent)break;evnt(6442);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12)), 5 ,NULL,NULL, 19 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6442);}while(r); do{ qbs_set(__STRING_N2,qbs_add(qbs_add(__STRING_N,__STRING_S),__STRING_TS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6445);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6446);}while(r); S_6979:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6447);if(r)goto S_6979;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6447);}while(r); } S_6982:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(6448);if(r)goto S_6982;} S_6983:; if ((*__LONG_A)||new_error){ if(qbevent){evnt(6449);if(r)goto S_6983;} S_6984:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(6452);if(r)goto S_6984;} S_6985:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_T->len== 0 )))||new_error){ if(qbevent){evnt(6453);if(r)goto S_6985;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(6453);}while(r); } do{ *__LONG_T2=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(6454);}while(r); do{ *__LONG_T2SIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(6454);}while(r); S_6990:; if ((*__LONG_T2&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(6455);if(r)goto S_6990;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(6455);}while(r); } S_6993:; if ((*__LONG_T2&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(6456);if(r)goto S_6993;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISPOINTER; if(!qbevent)break;evnt(6456);}while(r); } S_6996:; if ((*__LONG_T2&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(6457);if(r)goto S_6996;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(6457);}while(r); } S_6999:; if (((-(*__LONG_T==*__LONG_T2))&(-(*__LONG_TSIZE==*__LONG_T2SIZE)))||new_error){ if(qbevent){evnt(6458);if(r)goto S_6999;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(6458);}while(r); } } }else{ S_7004:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(6464);if(r)goto S_7004;} S_7005:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_T->len== 0 )))||new_error){ if(qbevent){evnt(6465);if(r)goto S_7005;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(6465);}while(r); } do{ *__LONG_T2=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(6466);}while(r); do{ *__LONG_T2SIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(6466);}while(r); S_7010:; if ((*__LONG_T2&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(6467);if(r)goto S_7010;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(6467);}while(r); } S_7013:; if ((*__LONG_T2&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(6468);if(r)goto S_7013;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISPOINTER; if(!qbevent)break;evnt(6468);}while(r); } S_7016:; if ((*__LONG_T2&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(6469);if(r)goto S_7016;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(6469);}while(r); } S_7019:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(6471);if(r)goto S_7019;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip913; sub_file_print(tmp_fileno,qbs_new_txt_len("SHARED:comparing:",17), 0 , 0 , 0 ); if (new_error) goto skip913; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_T)), 1 , 0 , 0 ); if (new_error) goto skip913; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_T2)), 1 , 1 , 0 ); if (new_error) goto skip913; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_TSIZE)), 1 , 0 , 0 ); if (new_error) goto skip913; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_T2SIZE)), 1 , 0 , 1 ); if (new_error) goto skip913; skip913: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6471);}while(r); } S_7022:; if (((-(*__LONG_T==*__LONG_T2))&(-(*__LONG_TSIZE==*__LONG_T2SIZE)))||new_error){ if(qbevent){evnt(6473);if(r)goto S_7022;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(6473);}while(r); } } } S_7027:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(6478);if(r)goto S_7027;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(6478);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6478);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(6478);}while(r); } S_7033:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6479);if(r)goto S_7033;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6479);}while(r); } } dl_exit_910:; S_7037:; if ((*__LONG_A)||new_error){ if(qbevent){evnt(6482);if(r)goto S_7037;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Array not defined",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6482);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6482);}while(r); } S_7041:; if ((qbs_cleanup(qbs_tmp_base,__STRING_S->len))||new_error){ if(qbevent){evnt(6484);if(r)goto S_7041;} do{ qbs_set(__STRING_TYP,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6484);}while(r); }else{ do{ qbs_set(__STRING_TYP,__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6484);}while(r); } do{ *__LONG_RETVAL=FUNC_DIM2(__STRING_N,__STRING_TYP,__LONG_METHOD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6485);}while(r); S_7047:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6486);if(r)goto S_7047;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6486);}while(r); } LABEL_SHRFOUND:; if(qbevent){evnt(6489);r=0;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))),__STRING_L2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6490);}while(r); do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2642))=*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2642))| 2 ; if(!qbevent)break;evnt(6492);}while(r); do{ *__LONG_LMAY=((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1)))->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6495);}while(r); do{ *__LONG_LMUST=((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6495);}while(r); S_7054:; if (((-(*__LONG_LMAY!= 0 ))|(-(*__LONG_LMUST!= 0 )))||new_error){ if(qbevent){evnt(6496);if(r)goto S_7054;} S_7055:; if ((((-(*__LONG_METHOD== 1 ))&(-(*__LONG_LMUST== 0 )))|((-(*__LONG_METHOD== 0 ))&(-(*__LONG_LMAY== 0 ))))||new_error){ if(qbevent){evnt(6497);if(r)goto S_7055;} do{ *__LONG_REVERTMAYMUSTHAVEN=*__LONG_REVERTMAYMUSTHAVEN+ 1 ; if(!qbevent)break;evnt(6498);}while(r); do{ tmp_long=array_check((*__LONG_REVERTMAYMUSTHAVEN)-__ARRAY_LONG_REVERTMAYMUSTHAVE[4],__ARRAY_LONG_REVERTMAYMUSTHAVE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_REVERTMAYMUSTHAVE[0]))[tmp_long]=*__LONG_CURRENTID; if(!qbevent)break;evnt(6499);}while(r); do{ swap_string(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1),qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+520)),8,1)); if(!qbevent)break;evnt(6500);}while(r); } } do{ qbs_set(__STRING_SUBFUNC,__STRING_OLDSUBFUNC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6505);}while(r); do{ *__INTEGER_DEFDATAHANDLE= 13 ; if(!qbevent)break;evnt(6506);}while(r); do{ sub_close( 13 ,1); if(!qbevent)break;evnt(6507);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)), 5 ,NULL,NULL, 13 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6507);}while(r); do{ sub_close( 19 ,1); if(!qbevent)break;evnt(6508);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("free",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)), 5 ,NULL,NULL, 19 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6508);}while(r); S_7067:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(6510);if(r)goto S_7067;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6510);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6510);}while(r); do{ goto LABEL_SUBFUNCSHR; if(!qbevent)break;evnt(6510);}while(r); } S_7072:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6511);if(r)goto S_7072;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6511);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6511);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6513);}while(r); S_7077:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6513);if(r)goto S_7077;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6513);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6513);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6514);}while(r); } } S_7085:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(6519);if(r)goto S_7085;} S_7086:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("EXIT",4))))||new_error){ if(qbevent){evnt(6520);if(r)goto S_7086;} do{ *__LONG_SF= 0 ; if(!qbevent)break;evnt(6521);}while(r); S_7088:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("FUNCTION",8))))||new_error){ if(qbevent){evnt(6522);if(r)goto S_7088;} do{ *__LONG_SF= 1 ; if(!qbevent)break;evnt(6522);}while(r); } S_7091:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("SUB",3))))||new_error){ if(qbevent){evnt(6523);if(r)goto S_7091;} do{ *__LONG_SF= 2 ; if(!qbevent)break;evnt(6523);}while(r); } S_7094:; if ((*__LONG_SF)||new_error){ if(qbevent){evnt(6524);if(r)goto S_7094;} S_7095:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_SUBFUNC->len== 0 )))||new_error){ if(qbevent){evnt(6526);if(r)goto S_7095;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("EXIT ",5),__STRING_SECONDELEMENT),qbs_new_txt_len(" must be used within a SUB/FUNCTION",35))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6526);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6526);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip917; sub_file_print(tmp_fileno,qbs_new_txt_len("goto exit_subfunc;",18), 0 , 0 , 1 ); if (new_error) goto skip917; skip917: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6528);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_FIRSTELEMENT,__STRING1_SP),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6529);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6530);}while(r); S_7102:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6530);if(r)goto S_7102;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6530);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6530);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6531);}while(r); } } } S_7111:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(6541);if(r)goto S_7111;} S_7112:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ASC",3))))||new_error){ if(qbevent){evnt(6542);if(r)goto S_7112;} S_7113:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass919= 2 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6543);if(r)goto S_7113;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( after ASC",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6543);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6543);}while(r); } do{ *__LONG_USEPOSITION= 0 ; if(!qbevent)break;evnt(6546);}while(r); do{ *__LONG_PART= 1 ; if(!qbevent)break;evnt(6547);}while(r); do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(6548);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6549);}while(r); do{ qbs_set(__STRING_STRINGVARIABLE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6550);}while(r); do{ qbs_set(__STRING_POSITION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6551);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6552);}while(r); S_7124:; do{ if(qbevent){evnt(6553);if(r)goto S_7124;} S_7125:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6555);if(r)goto S_7125;} S_7126:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_PART!= 3 ))|(-(__STRING_A3->len== 0 ))))||new_error){ if(qbevent){evnt(6556);if(r)goto S_7126;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ASC ( ... , ... ) = ...",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6556);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6556);}while(r); } do{ qbs_set(__STRING_EXPRESSION,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6557);}while(r); do{ goto dl_exit_920; if(!qbevent)break;evnt(6558);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6561);}while(r); S_7134:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6562);if(r)goto S_7134;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6562);}while(r); } S_7137:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6563);if(r)goto S_7137;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6563);}while(r); } S_7140:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(6565);if(r)goto S_7140;} S_7141:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(6567);if(r)goto S_7141;} S_7142:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass922=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(6568);if(r)goto S_7142;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6568);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6568);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6569);}while(r); do{ qbs_set(__STRING_POSITION,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6570);}while(r); do{ *__LONG_PART= 3 ; if(!qbevent)break;evnt(6571);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6571);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6571);}while(r); do{ goto LABEL_ASCGOTPART; if(!qbevent)break;evnt(6571);}while(r); } S_7153:; if ((-(*__LONG_PART== 2 ))||new_error){ if(qbevent){evnt(6574);if(r)goto S_7153;} S_7154:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass923=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(6575);if(r)goto S_7154;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6575);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6575);}while(r); } do{ *__LONG_USEPOSITION= 1 ; if(!qbevent)break;evnt(6576);}while(r); do{ qbs_set(__STRING_POSITION,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6577);}while(r); do{ *__LONG_PART= 3 ; if(!qbevent)break;evnt(6578);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6578);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6578);}while(r); do{ goto LABEL_ASCGOTPART; if(!qbevent)break;evnt(6578);}while(r); } } S_7166:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(6585);if(r)goto S_7166;} S_7167:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(6586);if(r)goto S_7167;} do{ qbs_set(__STRING_STRINGVARIABLE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6586);}while(r); do{ *__LONG_PART= 2 ; if(!qbevent)break;evnt(6586);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6586);}while(r); do{ goto LABEL_ASCGOTPART; if(!qbevent)break;evnt(6586);}while(r); } } S_7174:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A3->len))||new_error){ if(qbevent){evnt(6589);if(r)goto S_7174;} do{ qbs_set(__STRING_A3,qbs_add(qbs_add(__STRING_A3,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6589);}while(r); }else{ do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6589);}while(r); } LABEL_ASCGOTPART:; if(qbevent){evnt(6590);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6591);}while(r); }while(1); dl_exit_920:; S_7181:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_STRINGVARIABLE->len== 0 ))|(-(__STRING_POSITION->len== 0 ))))||new_error){ if(qbevent){evnt(6593);if(r)goto S_7181;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ASC ( ... , ... ) = ...",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6593);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6593);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,FUNC_FIXOPERATIONORDER(__STRING_STRINGVARIABLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6596);}while(r); S_7186:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6597);if(r)goto S_7186;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6597);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ASC",3),__STRING1_SP2),qbs_new_txt_len("(",1)),__STRING1_SP2),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6598);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_STRINGVARIABLE,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6600);}while(r); S_7191:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6601);if(r)goto S_7191;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6601);}while(r); } S_7194:; if (((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(6602);if(r)goto S_7194;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ASC ( string-variable , ...",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6602);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6602);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,FUNC_EVALUATETOTYP(__STRING_STRINGVARIABLE,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6603);}while(r); S_7199:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6604);if(r)goto S_7199;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6604);}while(r); } S_7202:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_POSITION,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(6608);if(r)goto S_7202;} S_7203:; if ((*__LONG_USEPOSITION)||new_error){ if(qbevent){evnt(6609);if(r)goto S_7203;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),qbs_new_txt_len("1",1)),__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len("=",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6609);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len("=",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6609);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip927; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tqbs=",5),__STRING_STRINGVARIABLE),qbs_new_txt_len("; if (!new_error){",18)), 0 , 0 , 1 ); if (new_error) goto skip927; skip927: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6611);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_EXPRESSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6612);}while(r); S_7210:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6613);if(r)goto S_7210;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6613);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6614);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass928= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6615);}while(r); S_7215:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6616);if(r)goto S_7215;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6616);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip929; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_E),qbs_new_txt_len("; if (!new_error){",18)), 0 , 0 , 1 ); if (new_error) goto skip929; skip929: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6617);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip930; sub_file_print(tmp_fileno,qbs_new_txt_len("if (tqbs->len){tqbs->chr[0]=tmp_long;}else{error(5);}",53), 0 , 0 , 1 ); if (new_error) goto skip930; skip930: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6618);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip931; sub_file_print(tmp_fileno,qbs_new_txt_len("}}",2), 0 , 0 , 1 ); if (new_error) goto skip931; skip931: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6619);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip932; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tqbs=",5),__STRING_STRINGVARIABLE),qbs_new_txt_len("; if (!new_error){",18)), 0 , 0 , 1 ); if (new_error) goto skip932; skip932: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6623);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_POSITION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6624);}while(r); S_7224:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6625);if(r)goto S_7224;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6625);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len("=",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6626);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass933= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6627);}while(r); S_7229:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6628);if(r)goto S_7229;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6628);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip934; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_fileno=",11),__STRING_E),qbs_new_txt_len("; if (!new_error){",18)), 0 , 0 , 1 ); if (new_error) goto skip934; skip934: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6629);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_EXPRESSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6630);}while(r); S_7234:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6631);if(r)goto S_7234;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6631);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6632);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass935= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6633);}while(r); S_7239:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6634);if(r)goto S_7239;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6634);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip936; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_E),qbs_new_txt_len("; if (!new_error){",18)), 0 , 0 , 1 ); if (new_error) goto skip936; skip936: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6635);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip937; sub_file_print(tmp_fileno,qbs_new_txt_len("if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);}",94), 0 , 0 , 1 ); if (new_error) goto skip937; skip937: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6636);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip938; sub_file_print(tmp_fileno,qbs_new_txt_len("}}}",3), 0 , 0 , 1 ); if (new_error) goto skip938; skip938: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6637);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6640);}while(r); S_7247:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6640);if(r)goto S_7247;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6640);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6640);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6641);}while(r); } } S_7255:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(6649);if(r)goto S_7255;} S_7256:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("MID$",4))))||new_error){ if(qbevent){evnt(6650);if(r)goto S_7256;} S_7257:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass940= 2 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6651);if(r)goto S_7257;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( after MID$",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6651);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6651);}while(r); } do{ qbs_set(__STRING_LENGTH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6653);}while(r); do{ *__LONG_PART= 1 ; if(!qbevent)break;evnt(6654);}while(r); do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(6655);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6656);}while(r); do{ qbs_set(__STRING_STRINGVARIABLE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6657);}while(r); do{ qbs_set(__STRING_START,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6658);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6659);}while(r); S_7268:; do{ if(qbevent){evnt(6660);if(r)goto S_7268;} S_7269:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6661);if(r)goto S_7269;} S_7270:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_PART!= 4 ))|(qbs_equal(__STRING_A3,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(6662);if(r)goto S_7270;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected MID$(...)=...",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6662);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6662);}while(r); } do{ qbs_set(__STRING_STRINGEXPRESSION,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6663);}while(r); do{ goto dl_exit_941; if(!qbevent)break;evnt(6664);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6666);}while(r); S_7278:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6667);if(r)goto S_7278;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6667);}while(r); } S_7281:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6668);if(r)goto S_7281;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6668);}while(r); } S_7284:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(6669);if(r)goto S_7284;} S_7285:; if ((-(*__LONG_PART== 2 ))||new_error){ if(qbevent){evnt(6670);if(r)goto S_7285;} S_7286:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass942=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(6671);if(r)goto S_7286;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected = after )",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6671);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6671);}while(r); } do{ qbs_set(__STRING_START,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6672);}while(r); do{ *__LONG_PART= 4 ; if(!qbevent)break;evnt(6672);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6672);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6672);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(6672);}while(r); } S_7296:; if ((-(*__LONG_PART== 3 ))||new_error){ if(qbevent){evnt(6674);if(r)goto S_7296;} S_7297:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass943=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(6675);if(r)goto S_7297;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected = after )",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6675);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6675);}while(r); } S_7301:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6676);if(r)goto S_7301;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Omit , before ) if omitting length in MID$ statement",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6676);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6676);}while(r); } do{ qbs_set(__STRING_LENGTH,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6677);}while(r); do{ *__LONG_PART= 4 ; if(!qbevent)break;evnt(6677);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6677);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6677);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(6677);}while(r); } } S_7312:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(6680);if(r)goto S_7312;} S_7313:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(6681);if(r)goto S_7313;} do{ qbs_set(__STRING_STRINGVARIABLE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6681);}while(r); do{ *__LONG_PART= 2 ; if(!qbevent)break;evnt(6681);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6681);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(6681);}while(r); } S_7319:; if ((-(*__LONG_PART== 2 ))||new_error){ if(qbevent){evnt(6682);if(r)goto S_7319;} do{ qbs_set(__STRING_START,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6682);}while(r); do{ *__LONG_PART= 3 ; if(!qbevent)break;evnt(6682);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6682);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(6682);}while(r); } } S_7326:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A3->len))||new_error){ if(qbevent){evnt(6684);if(r)goto S_7326;} do{ qbs_set(__STRING_A3,qbs_add(qbs_add(__STRING_A3,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6684);}while(r); }else{ do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6684);}while(r); } LABEL_MIDGOTPART:; if(qbevent){evnt(6685);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6686);}while(r); }while(1); dl_exit_941:; S_7333:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_STRINGVARIABLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6688);if(r)goto S_7333;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6688);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6688);}while(r); } S_7337:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_START,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6689);if(r)goto S_7337;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6689);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6689);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,FUNC_FIXOPERATIONORDER(__STRING_STRINGVARIABLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6691);}while(r); S_7342:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6692);if(r)goto S_7342;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6692);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("MID$",4),__STRING1_SP2),qbs_new_txt_len("(",1)),__STRING1_SP2),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6693);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_STRINGVARIABLE,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6694);}while(r); S_7347:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6695);if(r)goto S_7347;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6695);}while(r); } S_7350:; if (((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(6696);if(r)goto S_7350;} do{ qbs_set(__STRING_A,qbs_new_txt_len("MID$ expects a string variable/array-element as its first argument",66)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6696);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6696);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,FUNC_EVALUATETOTYP(__STRING_STRINGVARIABLE,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6697);}while(r); S_7355:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6698);if(r)goto S_7355;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6698);}while(r); } do{ qbs_set(__STRING_START,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_START),&(pass945= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6700);}while(r); S_7359:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6701);if(r)goto S_7359;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6701);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6702);}while(r); do{ qbs_set(__STRING_STRINGEXPRESSION,FUNC_FIXOPERATIONORDER(__STRING_STRINGEXPRESSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6704);}while(r); S_7364:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6705);if(r)goto S_7364;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6705);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6706);}while(r); do{ qbs_set(__STRING_STRINGEXPRESSION,FUNC_EVALUATETOTYP(__STRING_STRINGEXPRESSION,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6707);}while(r); S_7369:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6708);if(r)goto S_7369;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6708);}while(r); } S_7372:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LENGTH->len))||new_error){ if(qbevent){evnt(6710);if(r)goto S_7372;} do{ qbs_set(__STRING_LENGTH,FUNC_FIXOPERATIONORDER(__STRING_LENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6711);}while(r); S_7374:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6712);if(r)goto S_7374;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6712);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6713);}while(r); do{ qbs_set(__STRING_LENGTH,FUNC_EVALUATETOTYP(__STRING_LENGTH,&(pass947= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6714);}while(r); S_7379:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6715);if(r)goto S_7379;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6715);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip948; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_mid(",8),__STRING_STRINGVARIABLE),qbs_new_txt_len(",",1)),__STRING_START),qbs_new_txt_len(",",1)),__STRING_LENGTH),qbs_new_txt_len(",",1)),__STRING_STRINGEXPRESSION),qbs_new_txt_len(",1);",4)), 0 , 0 , 1 ); if (new_error) goto skip948; skip948: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6716);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip949; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_mid(",8),__STRING_STRINGVARIABLE),qbs_new_txt_len(",",1)),__STRING_START),qbs_new_txt_len(",0,",3)),__STRING_STRINGEXPRESSION),qbs_new_txt_len(",0);",4)), 0 , 0 , 1 ); if (new_error) goto skip949; skip949: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6718);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len("=",1)),__STRING1_SP),__STRING_L2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6721);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6722);}while(r); S_7388:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6722);if(r)goto S_7388;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6722);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6722);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6723);}while(r); } } S_7396:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(6728);if(r)goto S_7396;} S_7397:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ERASE",5))))||new_error){ if(qbevent){evnt(6729);if(r)goto S_7397;} do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(6730);}while(r); do{ qbs_set(__STRING_L,qbs_new_txt_len("ERASE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6731);}while(r); LABEL_ERASENEXTARRAY:; if(qbevent){evnt(6732);r=0;} do{ qbs_set(__STRING_VAR,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6733);}while(r); do{ qbs_set(__STRING_X,__STRING_VAR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6734);}while(r); do{ qbs_set(__STRING_LS,FUNC_REMOVESYMBOL(__STRING_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6734);}while(r); S_7403:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6735);if(r)goto S_7403;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6735);}while(r); } S_7406:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VAR)))||new_error){ if(qbevent){evnt(6737);if(r)goto S_7406;} S_7407:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6738);if(r)goto S_7407;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6738);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))),__STRING_LS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6739);}while(r); LABEL_CLEARERASE:; if(qbevent){evnt(6741);r=0;} do{ qbs_set(__STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6742);}while(r); do{ qbs_set(__STRING_BYTESPERELEMENT,FUNC_STR2(&(pass951=(*(int32*)(((char*)__UDT_ID)+(512))& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6743);}while(r); S_7413:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(6744);if(r)goto S_7413;} do{ qbs_set(__STRING_BYTESPERELEMENT,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6744);}while(r); } S_7416:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(6745);if(r)goto S_7416;} do{ qbs_set(__STRING_BYTESPERELEMENT,qbs_add(FUNC_STR2(&(pass952=(*(int32*)(((char*)__UDT_ID)+(512))& 511 ))),qbs_new_txt_len("/8+1",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6745);}while(r); } S_7419:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(6746);if(r)goto S_7419;} do{ qbs_set(__STRING_BYTESPERELEMENT,FUNC_STR2(&(pass953=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*(int32*)(((char*)__UDT_ID)+(512))& 511 )-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6747);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip954; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N),qbs_new_txt_len("[2]&1){",7)), 0 , 0 , 1 ); if (new_error) goto skip954; skip954: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6749);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip955; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N),qbs_new_txt_len("[2]&2){",7)), 0 , 0 , 1 ); if (new_error) goto skip955; skip955: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6750);}while(r); S_7424:; if (((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)== 0 )))||new_error){ if(qbevent){evnt(6751);if(r)goto S_7424;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip956; sub_file_print(tmp_fileno,qbs_new_txt_len("tmp_long=",9), 0 , 0 , 0 ); if (new_error) goto skip956; skip956: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6752);}while(r); S_7426:; fornext_value958= 1 ; fornext_finalvalue958=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); fornext_step958= 1 ; if (fornext_step958<0) fornext_step_negative958=1; else fornext_step_negative958=0; if (new_error) goto fornext_error958; goto fornext_entrylabel958; while(1){ fornext_value958=fornext_step958+(*__LONG_I2); fornext_entrylabel958: *__LONG_I2=fornext_value958; if (fornext_step_negative958){ if (fornext_value958fornext_finalvalue958) break; } fornext_error958:; if(qbevent){evnt(6753);if(r)goto S_7426;} S_7427:; if ((-(*__LONG_I2!= 1 ))||new_error){ if(qbevent){evnt(6754);if(r)goto S_7427;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip959; sub_file_print(tmp_fileno,qbs_new_txt_len("*",1), 0 , 0 , 0 ); if (new_error) goto skip959; skip959: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6754);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip960; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass961=(*__LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1)), 0 , 0 , 0 ); if (new_error) goto skip960; skip960: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6755);}while(r); } fornext_exit_957:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip962; sub_file_print(tmp_fileno,qbs_new_txt_len(";",1), 0 , 0 , 1 ); if (new_error) goto skip962; skip962: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6757);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip963; sub_file_print(tmp_fileno,qbs_new_txt_len("while(tmp_long--){",18), 0 , 0 , 1 ); if (new_error) goto skip963; skip963: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6758);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip964; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("((qbs*)(((uint64*)(",19),__STRING_N),qbs_new_txt_len("[0]))[tmp_long]))->len=0;",25)), 0 , 0 , 1 ); if (new_error) goto skip964; skip964: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6759);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip965; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip965; skip965: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6760);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip966; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("memset((void*)(",15),__STRING_N),qbs_new_txt_len("[0]),0,",7)), 0 , 0 , 0 ); if (new_error) goto skip966; skip966: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6764);}while(r); S_7438:; fornext_value968= 1 ; fornext_finalvalue968=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); fornext_step968= 1 ; if (fornext_step968<0) fornext_step_negative968=1; else fornext_step_negative968=0; if (new_error) goto fornext_error968; goto fornext_entrylabel968; while(1){ fornext_value968=fornext_step968+(*__LONG_I2); fornext_entrylabel968: *__LONG_I2=fornext_value968; if (fornext_step_negative968){ if (fornext_value968fornext_finalvalue968) break; } fornext_error968:; if(qbevent){evnt(6765);if(r)goto S_7438;} S_7439:; if ((-(*__LONG_I2!= 1 ))||new_error){ if(qbevent){evnt(6766);if(r)goto S_7439;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip969; sub_file_print(tmp_fileno,qbs_new_txt_len("*",1), 0 , 0 , 0 ); if (new_error) goto skip969; skip969: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6766);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip970; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass971=(*__LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1)), 0 , 0 , 0 ); if (new_error) goto skip970; skip970: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6767);}while(r); } fornext_exit_967:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip972; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("*",1),__STRING_BYTESPERELEMENT),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip972; skip972: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6769);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip973; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip973; skip973: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6771);}while(r); S_7447:; if (((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)== 0 )))||new_error){ if(qbevent){evnt(6773);if(r)goto S_7447;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip974; sub_file_print(tmp_fileno,qbs_new_txt_len("tmp_long=",9), 0 , 0 , 0 ); if (new_error) goto skip974; skip974: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6775);}while(r); S_7449:; fornext_value976= 1 ; fornext_finalvalue976=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); fornext_step976= 1 ; if (fornext_step976<0) fornext_step_negative976=1; else fornext_step_negative976=0; if (new_error) goto fornext_error976; goto fornext_entrylabel976; while(1){ fornext_value976=fornext_step976+(*__LONG_I2); fornext_entrylabel976: *__LONG_I2=fornext_value976; if (fornext_step_negative976){ if (fornext_value976fornext_finalvalue976) break; } fornext_error976:; if(qbevent){evnt(6776);if(r)goto S_7449;} S_7450:; if ((-(*__LONG_I2!= 1 ))||new_error){ if(qbevent){evnt(6777);if(r)goto S_7450;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip977; sub_file_print(tmp_fileno,qbs_new_txt_len("*",1), 0 , 0 , 0 ); if (new_error) goto skip977; skip977: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6777);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip978; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass979=(*__LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1)), 0 , 0 , 0 ); if (new_error) goto skip978; skip978: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6778);}while(r); } fornext_exit_975:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip980; sub_file_print(tmp_fileno,qbs_new_txt_len(";",1), 0 , 0 , 1 ); if (new_error) goto skip980; skip980: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6780);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip981; sub_file_print(tmp_fileno,qbs_new_txt_len("while(tmp_long--){",18), 0 , 0 , 1 ); if (new_error) goto skip981; skip981: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6781);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip982; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_free((qbs*)(((uint64*)(",27),__STRING_N),qbs_new_txt_len("[0]))[tmp_long]));",18)), 0 , 0 , 1 ); if (new_error) goto skip982; skip982: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6782);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip983; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip983; skip983: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6783);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip984; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("free((void*)(",13),__STRING_N),qbs_new_txt_len("[0]));",6)), 0 , 0 , 1 ); if (new_error) goto skip984; skip984: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6785);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip985; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N),qbs_new_txt_len("[2]&4){",7)), 0 , 0 , 1 ); if (new_error) goto skip985; skip985: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6788);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip986; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("cmem_dynamic_free((uint8*)(",27),__STRING_N),qbs_new_txt_len("[0]));",6)), 0 , 0 , 1 ); if (new_error) goto skip986; skip986: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6789);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip987; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip987; skip987: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6790);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip988; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("free((void*)(",13),__STRING_N),qbs_new_txt_len("[0]));",6)), 0 , 0 , 1 ); if (new_error) goto skip988; skip988: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6791);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip989; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip989; skip989: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6792);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip990; sub_file_print(tmp_fileno,qbs_add(__STRING_N,qbs_new_txt_len("[2]^=1;",7)), 0 , 0 , 1 ); if (new_error) goto skip990; skip990: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6795);}while(r); S_7468:; fornext_value992= 1 ; fornext_finalvalue992=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); fornext_step992= 1 ; if (fornext_step992<0) fornext_step_negative992=1; else fornext_step_negative992=0; if (new_error) goto fornext_error992; goto fornext_entrylabel992; while(1){ fornext_value992=fornext_step992+(*__LONG_I2); fornext_entrylabel992: *__LONG_I2=fornext_value992; if (fornext_step_negative992){ if (fornext_value992fornext_finalvalue992) break; } fornext_error992:; if(qbevent){evnt(6797);if(r)goto S_7468;} do{ *__LONG_B=*__LONG_I2* 4 ; if(!qbevent)break;evnt(6798);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip993; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(__LONG_B)),qbs_new_txt_len("]=2147483647;",13)), 0 , 0 , 1 ); if (new_error) goto skip993; skip993: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6799);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip994; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass995=*__LONG_B+ 1 ))),qbs_new_txt_len("]=0;",4)), 0 , 0 , 1 ); if (new_error) goto skip994; skip994: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6800);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip996; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass997=*__LONG_B+ 2 ))),qbs_new_txt_len("]=0;",4)), 0 , 0 , 1 ); if (new_error) goto skip996; skip996: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6801);}while(r); } fornext_exit_991:; S_7474:; if (((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)== 0 )))||new_error){ if(qbevent){evnt(6803);if(r)goto S_7474;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip998; sub_file_print(tmp_fileno,qbs_add(__STRING_N,qbs_new_txt_len("[0]=(ptrszint)¬hingstring;",29)), 0 , 0 , 1 ); if (new_error) goto skip998; skip998: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6804);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip999; sub_file_print(tmp_fileno,qbs_add(__STRING_N,qbs_new_txt_len("[0]=(ptrszint)nothingvalue;",27)), 0 , 0 , 1 ); if (new_error) goto skip999; skip999: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6806);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1000; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1000; skip1000: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6808);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1001; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1001; skip1001: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6809);}while(r); S_7481:; if ((-(*__LONG_CLEARERASERETURN== 1 ))||new_error){ if(qbevent){evnt(6810);if(r)goto S_7481;} do{ *__LONG_CLEARERASERETURN= 0 ; if(!qbevent)break;evnt(6810);}while(r); do{ goto LABEL_CLEARERASERETURNED; if(!qbevent)break;evnt(6810);}while(r); } do{ goto LABEL_ERASEDARRAY; if(!qbevent)break;evnt(6811);}while(r); } S_7487:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6813);if(r)goto S_7487;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6813);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined array passed to ERASE",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6814);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6814);}while(r); LABEL_ERASEDARRAY:; if(qbevent){evnt(6816);r=0;} S_7492:; if ((-(*__LONG_I<*__LONG_N))||new_error){ if(qbevent){evnt(6817);if(r)goto S_7492;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6818);}while(r); do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6818);}while(r); S_7495:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_N,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(6818);if(r)goto S_7495;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6818);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6818);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6819);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6820);}while(r); S_7501:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6820);if(r)goto S_7501;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6820);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6820);}while(r); } do{ goto LABEL_ERASENEXTARRAY; if(!qbevent)break;evnt(6821);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6824);}while(r); S_7508:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6824);if(r)goto S_7508;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6824);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6824);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6825);}while(r); } } S_7516:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(6831);if(r)goto S_7516;} do{ *__INTEGER_DIMOPTION= 0 ; if(!qbevent)break;evnt(6832);}while(r); do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(6832);}while(r); do{ *__LONG_COMMONOPTION= 0 ; if(!qbevent)break;evnt(6832);}while(r); S_7520:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DIM",3))))||new_error){ if(qbevent){evnt(6833);if(r)goto S_7520;} do{ *__INTEGER_DIMOPTION= 1 ; if(!qbevent)break;evnt(6833);}while(r); } S_7523:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("REDIM",5))))||new_error){ if(qbevent){evnt(6834);if(r)goto S_7523;} do{ *__INTEGER_DIMOPTION= 2 ; if(!qbevent)break;evnt(6835);}while(r); do{ *__INTEGER_REDIMOPTION= 1 ; if(!qbevent)break;evnt(6835);}while(r); S_7526:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("_PRESERVE",9))))||new_error){ if(qbevent){evnt(6836);if(r)goto S_7526;} do{ *__INTEGER_REDIMOPTION= 2 ; if(!qbevent)break;evnt(6837);}while(r); S_7528:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(6838);if(r)goto S_7528;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected REDIM _PRESERVE ...",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6838);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6838);}while(r); } } } S_7534:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(6841);if(r)goto S_7534;} do{ *__INTEGER_DIMOPTION= 3 ; if(!qbevent)break;evnt(6841);}while(r); } S_7537:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("COMMON",6))))||new_error){ if(qbevent){evnt(6842);if(r)goto S_7537;} do{ *__INTEGER_DIMOPTION= 1 ; if(!qbevent)break;evnt(6842);}while(r); do{ *__LONG_COMMONOPTION= 1 ; if(!qbevent)break;evnt(6842);}while(r); } S_7541:; if ((*__INTEGER_DIMOPTION)||new_error){ if(qbevent){evnt(6843);if(r)goto S_7541;} do{ qbs_set(__STRING_L,__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6845);}while(r); S_7543:; if (((-(*__INTEGER_DIMOPTION== 3 ))&(-(*__LONG_SUBFUNCN== 0 )))||new_error){ if(qbevent){evnt(6847);if(r)goto S_7543;} do{ qbs_set(__STRING_A,qbs_new_txt_len("STATIC must be used within a SUB/FUNCTION",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6847);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6847);}while(r); } S_7547:; if (((-(*__LONG_COMMONOPTION== 1 ))&(-(*__LONG_SUBFUNCN!= 0 )))||new_error){ if(qbevent){evnt(6848);if(r)goto S_7547;} do{ qbs_set(__STRING_A,qbs_new_txt_len("COMMON cannot be used within a SUB/FUNCTION",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6848);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6848);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(6850);}while(r); S_7552:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(6851);if(r)goto S_7552;} do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(6851);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("_PRESERVE",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6851);}while(r); } S_7556:; if ((-(*__INTEGER_DIMOPTION!= 3 ))||new_error){ if(qbevent){evnt(6853);if(r)goto S_7556;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6854);}while(r); S_7558:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("SHARED",6))))||new_error){ if(qbevent){evnt(6855);if(r)goto S_7558;} S_7559:; if ((-(*__LONG_SUBFUNCN!= 0 ))||new_error){ if(qbevent){evnt(6856);if(r)goto S_7559;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DIM/REDIM SHARED invalid within a SUB/FUNCTION",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6856);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6856);}while(r); } do{ *__INTEGER_DIMSHARED= 1 ; if(!qbevent)break;evnt(6857);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6858);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6859);}while(r); } } S_7568:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(6863);if(r)goto S_7568;} do{ *__LONG_DIMSTATIC= 1 ; if(!qbevent)break;evnt(6863);}while(r); do{ *__LONG_ALLOWLOCALNAME= 1 ; if(!qbevent)break;evnt(6863);}while(r); } LABEL_DIMNEXT:; if(qbevent){evnt(6865);r=0;} do{ *__LONG_NOTYPE= 0 ; if(!qbevent)break;evnt(6866);}while(r); do{ *__LONG_LISTARRAY= 0 ; if(!qbevent)break;evnt(6867);}while(r); do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6873);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6873);}while(r); S_7576:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6874);if(r)goto S_7576;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable-name",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6874);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6874);}while(r); } S_7580:; if ((-(*__LONG_I>=(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(6877);if(r)goto S_7580;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6877);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6877);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6877);}while(r); } do{ qbs_set(__STRING_ELEMENTS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6880);}while(r); S_7587:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6882);if(r)goto S_7587;} do{ *__LONG_B= 1 ; if(!qbevent)break;evnt(6883);}while(r); S_7589:; fornext_value1004=*__LONG_I; fornext_finalvalue1004=*__LONG_N; fornext_step1004= 1 ; if (fornext_step1004<0) fornext_step_negative1004=1; else fornext_step_negative1004=0; if (new_error) goto fornext_error1004; goto fornext_entrylabel1004; while(1){ fornext_value1004=fornext_step1004+(*__LONG_I); fornext_entrylabel1004: *__LONG_I=fornext_value1004; if (fornext_step_negative1004){ if (fornext_value1004fornext_finalvalue1004) break; } fornext_error1004:; if(qbevent){evnt(6884);if(r)goto S_7589;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6885);}while(r); S_7591:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6886);if(r)goto S_7591;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6886);}while(r); } S_7594:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6887);if(r)goto S_7594;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6887);}while(r); } S_7597:; if ((-(*__LONG_B== 0 ))||new_error){ if(qbevent){evnt(6888);if(r)goto S_7597;} do{ goto fornext_exit_1003; if(!qbevent)break;evnt(6888);}while(r); } S_7600:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(6889);if(r)goto S_7600;} do{ qbs_set(__STRING_ELEMENTS,qbs_add(qbs_add(__STRING_ELEMENTS,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6889);}while(r); }else{ do{ qbs_set(__STRING_ELEMENTS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6889);}while(r); } } fornext_exit_1003:; S_7606:; if ((-(*__LONG_B!= 0 ))||new_error){ if(qbevent){evnt(6891);if(r)goto S_7606;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6891);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6891);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6892);}while(r); S_7611:; if ((*__LONG_COMMONOPTION)||new_error){ if(qbevent){evnt(6894);if(r)goto S_7611;} do{ qbs_set(__STRING_ELEMENTS,qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6894);}while(r); } S_7614:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(6897);if(r)goto S_7614;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1006; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("DIM2:array:elements$:[",22),__STRING_ELEMENTS),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip1006; skip1006: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(6897);}while(r); } S_7617:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(6902);if(r)goto S_7617;} S_7618:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_ELEMENTS->len== 0 )))||new_error){ if(qbevent){evnt(6903);if(r)goto S_7618;} do{ *__LONG_LISTARRAY= 1 ; if(!qbevent)break;evnt(6904);}while(r); } } S_7622:; if ((-(*__LONG_I>=(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(6910);if(r)goto S_7622;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6910);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6910);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6910);}while(r); } } do{ qbs_set(__STRING_D,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6912);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(6914);}while(r); do{ qbs_set(__STRING_APPENDNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6916);}while(r); do{ qbs_set(__STRING_APPENDTYPE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6917);}while(r); do{ qbs_set(__STRING_DIM2TYPEPASSBACK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6918);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6921);}while(r); S_7635:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6922);if(r)goto S_7635;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6922);}while(r); } S_7638:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_VARNAME)== 0 )))||new_error){ if(qbevent){evnt(6923);if(r)goto S_7638;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid variable name",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6923);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6923);}while(r); } S_7642:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6925);if(r)goto S_7642;} do{ qbs_set(__STRING_TYP,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6926);}while(r); do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(6927);}while(r); do{ qbs_set(__STRING_APPENDNAME,__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6928);}while(r); do{ goto LABEL_DIMGOTTYP; if(!qbevent)break;evnt(6929);}while(r); } S_7648:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_D,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(6932);if(r)goto S_7648;} do{ qbs_set(__STRING_APPENDTYPE,qbs_add(__STRING1_SP,qbs_new_txt_len("AS",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6933);}while(r); do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6934);}while(r); S_7651:; fornext_value1009=*__LONG_I; fornext_finalvalue1009=*__LONG_N; fornext_step1009= 1 ; if (fornext_step1009<0) fornext_step_negative1009=1; else fornext_step_negative1009=0; if (new_error) goto fornext_error1009; goto fornext_entrylabel1009; while(1){ fornext_value1009=fornext_step1009+(*__LONG_I); fornext_entrylabel1009: *__LONG_I=fornext_value1009; if (fornext_step_negative1009){ if (fornext_value1009fornext_finalvalue1009) break; } fornext_error1009:; if(qbevent){evnt(6935);if(r)goto S_7651;} do{ qbs_set(__STRING_D,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6936);}while(r); S_7653:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_D,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(6937);if(r)goto S_7653;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6937);}while(r); do{ goto fornext_exit_1008; if(!qbevent)break;evnt(6937);}while(r); } do{ qbs_set(__STRING_TYP,qbs_add(qbs_add(__STRING_TYP,__STRING_D),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6938);}while(r); do{ qbs_set(__STRING_APPENDTYPE,qbs_add(qbs_add(__STRING_APPENDTYPE,__STRING1_SP),__STRING_D)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6939);}while(r); do{ qbs_set(__STRING_D,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6940);}while(r); } fornext_exit_1008:; do{ qbs_set(__STRING_APPENDTYPE,qbs_ucase(__STRING_APPENDTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6942);}while(r); do{ qbs_set(__STRING_TYP,qbs_rtrim(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6943);}while(r); do{ goto LABEL_DIMGOTTYP; if(!qbevent)break;evnt(6944);}while(r); } do{ *__LONG_NOTYPE= 1 ; if(!qbevent)break;evnt(6948);}while(r); S_7666:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_VARNAME, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(6949);if(r)goto S_7666;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(6949);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_VARNAME))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6949);}while(r); } do{ qbs_set(__STRING_TYP,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEAZ[0]))[array_check((*__LONG_V)-__ARRAY_STRING_DEFINEAZ[4],__ARRAY_STRING_DEFINEAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6950);}while(r); do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(6951);}while(r); do{ goto LABEL_DIMGOTTYP; if(!qbevent)break;evnt(6952);}while(r); LABEL_DIMGOTTYP:; if(qbevent){evnt(6954);r=0;} S_7674:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_D,qbs_new_txt_len("",0)))&(qbs_notequal(__STRING_D,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(6955);if(r)goto S_7674;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DIM: Expected comma!",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6955);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6955);}while(r); } S_7678:; if (((-(*__LONG_NOTYPE!= 0 ))&(-(*__INTEGER_DIMOPTION!= 3 ))&(-(*__INTEGER_DIMOPTION!= 1 )))||new_error){ if(qbevent){evnt(6958);if(r)goto S_7678;} S_7679:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(6959);if(r)goto S_7679;} S_7680:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VARNAME)))||new_error){ if(qbevent){evnt(6960);if(r)goto S_7680;} S_7681:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1)))->len)))||new_error){ if(qbevent){evnt(6961);if(r)goto S_7681;} do{ qbs_set(__STRING_TYP,FUNC_ID2FULLTYPENAME()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6962);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(6963);}while(r); } } } } S_7688:; if ((qbs_cleanup(qbs_tmp_base,(-(*__INTEGER_DIMOPTION== 3 ))&(__STRING_ELEMENTS->len)))||new_error){ if(qbevent){evnt(6969);if(r)goto S_7688;} do{ qbs_set(__STRING_TYP2,FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6971);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6972);}while(r); do{ *__LONG_TS=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(6972);}while(r); S_7692:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VARNAME)))||new_error){ if(qbevent){evnt(6974);if(r)goto S_7692;} S_7693:; if ((-(*(int32*)(((char*)__UDT_ID)+(2638))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(6975);if(r)goto S_7693;} S_7694:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(6976);if(r)goto S_7694;} S_7695:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(6978);if(r)goto S_7695;} S_7696:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(6979);if(r)goto S_7696;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6980);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6980);}while(r); } } }else{ S_7702:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(6984);if(r)goto S_7702;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6985);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6985);}while(r); }else{ S_7706:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(6988);if(r)goto S_7706;} S_7707:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(6989);if(r)goto S_7707;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6990);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6990);}while(r); } } } } } } S_7716:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(6998);if(r)goto S_7716;} do{ qbs_set(__STRING_S2,FUNC_TYPE2SYMBOL(__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6999);}while(r); S_7718:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7000);if(r)goto S_7718;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7000);}while(r); } S_7721:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(qbs_add(__STRING_VARNAME,__STRING_S2))))||new_error){ if(qbevent){evnt(7001);if(r)goto S_7721;} S_7722:; if ((-(*(int32*)(((char*)__UDT_ID)+(2638))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(7002);if(r)goto S_7722;} S_7723:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(7003);if(r)goto S_7723;} S_7724:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(7005);if(r)goto S_7724;} S_7725:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(7006);if(r)goto S_7725;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7007);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7007);}while(r); } } }else{ S_7731:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(7011);if(r)goto S_7731;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7012);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7012);}while(r); }else{ S_7735:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(7015);if(r)goto S_7735;} S_7736:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(7016);if(r)goto S_7736;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7017);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7017);}while(r); } } } } } } } } S_7747:; if ((*__LONG_LISTARRAY)||new_error){ if(qbevent){evnt(7027);if(r)goto S_7747;} do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(7032);}while(r); S_7749:; fornext_value1013= 1 ; fornext_finalvalue1013=*__LONG_STATICARRAYLISTN; fornext_step1013= 1 ; if (fornext_step1013<0) fornext_step_negative1013=1; else fornext_step_negative1013=0; if (new_error) goto fornext_error1013; goto fornext_entrylabel1013; while(1){ fornext_value1013=fornext_step1013+(*__LONG_X); fornext_entrylabel1013: *__LONG_X=fornext_value1013; if (fornext_step_negative1013){ if (fornext_value1013fornext_finalvalue1013) break; } fornext_error1013:; if(qbevent){evnt(7033);if(r)goto S_7749;} do{ qbs_set(__STRING_VARNAME2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7034);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7034);}while(r); do{ qbs_set(__STRING_TYP2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7035);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7035);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7036);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7036);}while(r); S_7756:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_VARNAME),qbs_ucase(__STRING_VARNAME2))))||new_error){ if(qbevent){evnt(7038);if(r)goto S_7756;} S_7757:; if ((-(*__LONG_DIMMETHOD2== 1 ))||new_error){ if(qbevent){evnt(7039);if(r)goto S_7757;} S_7758:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(7041);if(r)goto S_7758;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7041);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7041);}while(r); } }else{ S_7763:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(7044);if(r)goto S_7763;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7045);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7045);}while(r); }else{ S_7767:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(7047);if(r)goto S_7767;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7047);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7047);}while(r); } } } } } fornext_exit_1012:; do{ qbs_set(__STRING_TYP2,FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7054);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7055);}while(r); do{ *__LONG_TS=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(7055);}while(r); S_7778:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VARNAME)))||new_error){ if(qbevent){evnt(7057);if(r)goto S_7778;} S_7779:; if ((-(*(int32*)(((char*)__UDT_ID)+(2638))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(7058);if(r)goto S_7779;} S_7780:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(7059);if(r)goto S_7780;} S_7781:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(7061);if(r)goto S_7781;} S_7782:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(7062);if(r)goto S_7782;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7063);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7063);}while(r); } } }else{ S_7788:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(7067);if(r)goto S_7788;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7068);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7068);}while(r); }else{ S_7792:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(7071);if(r)goto S_7792;} S_7793:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(7072);if(r)goto S_7793;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7073);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7073);}while(r); } } } } } } S_7802:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(7081);if(r)goto S_7802;} do{ qbs_set(__STRING_S2,FUNC_TYPE2SYMBOL(__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7082);}while(r); S_7804:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7083);if(r)goto S_7804;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7083);}while(r); } S_7807:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(qbs_add(__STRING_VARNAME,__STRING_S2))))||new_error){ if(qbevent){evnt(7084);if(r)goto S_7807;} S_7808:; if ((-(*(int32*)(((char*)__UDT_ID)+(2638))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(7085);if(r)goto S_7808;} S_7809:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(7086);if(r)goto S_7809;} S_7810:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(7088);if(r)goto S_7810;} S_7811:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(7089);if(r)goto S_7811;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7090);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7090);}while(r); } } }else{ S_7817:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(7094);if(r)goto S_7817;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7095);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7095);}while(r); }else{ S_7821:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))==(*__LONG_T&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 511 +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH))))||new_error){ if(qbevent){evnt(7098);if(r)goto S_7821;} S_7822:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(7099);if(r)goto S_7822;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7100);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7100);}while(r); } } } } } } } S_7832:; if ((qbs_cleanup(qbs_tmp_base,__STRING_STATICARRAYLIST->len))||new_error){ if(qbevent){evnt(7110);if(r)goto S_7832;} do{ qbs_set(__STRING_STATICARRAYLIST,qbs_add(__STRING_STATICARRAYLIST,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7110);}while(r); } do{ qbs_set(__STRING_STATICARRAYLIST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_STATICARRAYLIST,__STRING_VARNAME),__STRING1_SP),FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)),__STRING1_SP),FUNC_STR2(__LONG_DIMMETHOD))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7111);}while(r); S_7836:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7112);if(r)goto S_7836;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7112);}while(r); } do{ *__LONG_STATICARRAYLISTN=*__LONG_STATICARRAYLISTN+ 1 ; if(!qbevent)break;evnt(7113);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_VARNAME),__STRING_APPENDNAME),__STRING1_SP2),qbs_new_txt_len("(",1)),__STRING1_SP2),qbs_new_txt_len(")",1)),__STRING_APPENDTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7114);}while(r); }else{ do{ *__LONG_OLDDIMSTATIC=*__LONG_DIMSTATIC; if(!qbevent)break;evnt(7119);}while(r); S_7843:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(7122);if(r)goto S_7843;} S_7844:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(7123);if(r)goto S_7844;} do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(7124);}while(r); S_7846:; fornext_value1017= 1 ; fornext_finalvalue1017=*__LONG_STATICARRAYLISTN; fornext_step1017= 1 ; if (fornext_step1017<0) fornext_step_negative1017=1; else fornext_step_negative1017=0; if (new_error) goto fornext_error1017; goto fornext_entrylabel1017; while(1){ fornext_value1017=fornext_step1017+(*__LONG_X); fornext_entrylabel1017: *__LONG_X=fornext_value1017; if (fornext_step_negative1017){ if (fornext_value1017fornext_finalvalue1017) break; } fornext_error1017:; if(qbevent){evnt(7125);if(r)goto S_7846;} do{ qbs_set(__STRING_VARNAME2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7126);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7126);}while(r); do{ qbs_set(__STRING_TYP2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7127);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7127);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7128);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7128);}while(r); S_7853:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_VARNAME),qbs_ucase(__STRING_VARNAME2))))||new_error){ if(qbevent){evnt(7130);if(r)goto S_7853;} S_7854:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(7131);if(r)goto S_7854;} S_7855:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7132);if(r)goto S_7855;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7132);}while(r); } S_7858:; if ((-(*__LONG_DIMMETHOD==*__LONG_DIMMETHOD2))||new_error){ if(qbevent){evnt(7133);if(r)goto S_7858;} do{ qbs_set(__STRING_VARNAME,__STRING_VARNAME2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7135);}while(r); do{ *__LONG_DIMSTATIC= 3 ; if(!qbevent)break;evnt(7136);}while(r); S_7861:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(7137);if(r)goto S_7861;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Array already listed as STATIC",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7137);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7137);}while(r); } } } } } fornext_exit_1016:; } } S_7871:; if ((*__LONG_COMMONOPTION)||new_error){ if(qbevent){evnt(7148);if(r)goto S_7871;} S_7872:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(7149);if(r)goto S_7872;} S_7873:; if ((qbs_cleanup(qbs_tmp_base,__STRING_COMMONARRAYLIST->len))||new_error){ if(qbevent){evnt(7152);if(r)goto S_7873;} do{ qbs_set(__STRING_COMMONARRAYLIST,qbs_add(__STRING_COMMONARRAYLIST,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7152);}while(r); } do{ qbs_set(__STRING_COMMONARRAYLIST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_COMMONARRAYLIST,__STRING_VARNAME),__STRING1_SP),FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)),__STRING1_SP),FUNC_STR2(__LONG_DIMMETHOD)),__STRING1_SP),FUNC_STR2(&(pass1020=*__INTEGER_DIMSHARED)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7154);}while(r); S_7877:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7155);if(r)goto S_7877;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7155);}while(r); } do{ *__LONG_COMMONARRAYLISTN=*__LONG_COMMONARRAYLISTN+ 1 ; if(!qbevent)break;evnt(7156);}while(r); S_7881:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(7157);if(r)goto S_7881;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1021; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("common listed:",14),__STRING_VARNAME),__STRING1_SP),FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)),__STRING1_SP),FUNC_STR2(__LONG_DIMMETHOD)),__STRING1_SP),FUNC_STR2(&(pass1022=*__INTEGER_DIMSHARED))), 0 , 0 , 1 ); if (new_error) goto skip1021; skip1021: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7157);}while(r); } S_7884:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7158);if(r)goto S_7884;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7158);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7160);}while(r); do{ qbs_set(__STRING_V,__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7162);}while(r); S_7889:; if ((-(*__LONG_DIMMETHOD== 1 ))||new_error){ if(qbevent){evnt(7163);if(r)goto S_7889;} do{ qbs_set(__STRING_V,qbs_add(__STRING_V,__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7163);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7164);}while(r); S_7893:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7165);if(r)goto S_7893;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7165);}while(r); } S_7896:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(7166);if(r)goto S_7896;} S_7897:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(7167);if(r)goto S_7897;} do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7169);}while(r); S_7899:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7170);if(r)goto S_7899;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7170);}while(r); } do{ *__LONG_S=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(7171);}while(r); do{ *__LONG_MATCH= 1 ; if(!qbevent)break;evnt(7172);}while(r); S_7904:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(7174);if(r)goto S_7904;} do{ *__LONG_T2=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(7175);}while(r); do{ *__LONG_S2=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(7176);}while(r); S_7907:; if ((-((*__LONG_T&*__LONG_ISFLOAT)!=(*__LONG_T2&*__LONG_ISFLOAT)))||new_error){ if(qbevent){evnt(7177);if(r)goto S_7907;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7177);}while(r); } S_7910:; if ((-((*__LONG_T&*__LONG_ISUNSIGNED)!=(*__LONG_T2&*__LONG_ISUNSIGNED)))||new_error){ if(qbevent){evnt(7178);if(r)goto S_7910;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7178);}while(r); } S_7913:; if ((-((*__LONG_T&*__LONG_ISSTRING)!=(*__LONG_T2&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(7179);if(r)goto S_7913;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7179);}while(r); } S_7916:; if ((-((*__LONG_T&*__LONG_ISFIXEDLENGTH)!=(*__LONG_T2&*__LONG_ISFIXEDLENGTH)))||new_error){ if(qbevent){evnt(7180);if(r)goto S_7916;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7180);}while(r); } S_7919:; if ((-((*__LONG_T&*__LONG_ISOFFSETINBITS)!=(*__LONG_T2&*__LONG_ISOFFSETINBITS)))||new_error){ if(qbevent){evnt(7181);if(r)goto S_7919;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7181);}while(r); } S_7922:; if ((-((*__LONG_T&*__LONG_ISUDT)!=(*__LONG_T2&*__LONG_ISUDT)))||new_error){ if(qbevent){evnt(7182);if(r)goto S_7922;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7182);}while(r); } S_7925:; if ((-((*__LONG_T& 511 )!=(*__LONG_T2& 511 )))||new_error){ if(qbevent){evnt(7183);if(r)goto S_7925;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7183);}while(r); } S_7928:; if ((-(*__LONG_S!=*__LONG_S2))||new_error){ if(qbevent){evnt(7184);if(r)goto S_7928;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7184);}while(r); } do{ *__LONG_OLDMETHOD= 0 ; if(!qbevent)break;evnt(7186);}while(r); S_7932:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(7186);if(r)goto S_7932;} do{ *__LONG_OLDMETHOD= 1 ; if(!qbevent)break;evnt(7186);}while(r); } S_7935:; if ((-(*__LONG_OLDMETHOD!=*__LONG_DIMMETHOD))||new_error){ if(qbevent){evnt(7187);if(r)goto S_7935;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(7187);}while(r); } } S_7939:; if ((*__LONG_MATCH)||new_error){ if(qbevent){evnt(7190);if(r)goto S_7939;} do{ *__LONG_X=*__LONG_CURRENTID; if(!qbevent)break;evnt(7191);}while(r); S_7941:; if ((*__INTEGER_DIMSHARED)||new_error){ if(qbevent){evnt(7192);if(r)goto S_7941;} do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_X)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2642))= 1 ; if(!qbevent)break;evnt(7192);}while(r); } do{ qbs_set(__STRING_TLAYOUT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7193);}while(r); S_7945:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(7195);if(r)goto S_7945;} S_7946:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(7196);if(r)goto S_7946;} do{ qbs_set(__STRING_DIM2TYPEPASSBACK,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*__LONG_T& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7197);}while(r); }else{ do{ qbs_set(__STRING_DIM2TYPEPASSBACK,__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7199);}while(r); S_7950:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_DIM2TYPEPASSBACK,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(7200);if(r)goto S_7950;} do{ tqbs=__STRING_DIM2TYPEPASSBACK; if (!new_error){ tmp_fileno=func_instr(NULL,__STRING_DIM2TYPEPASSBACK,qbs_new_txt_len(" ",1),0); if (!new_error){ tmp_long=qbs_asc(__STRING1_SP); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(7201);}while(r); } dl_exit_1024:; do{ qbs_set(__STRING_DIM2TYPEPASSBACK,qbs_ucase(__STRING_DIM2TYPEPASSBACK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7203);}while(r); } } do{ goto dl_exit_1023; if(!qbevent)break;evnt(7207);}while(r); } } S_7959:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(7211);if(r)goto S_7959;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(7211);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7211);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(7211);}while(r); } S_7965:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7212);if(r)goto S_7965;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7212);}while(r); } } dl_exit_1023:; S_7969:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(7215);if(r)goto S_7969;} do{ *__LONG_X=*__LONG_IDN+ 1 ; if(!qbevent)break;evnt(7215);}while(r); } do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain.txt",9)), 5 ,NULL,NULL, 22 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7218);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 22 ; if (new_error) goto skip1025; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("chain",5)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip1025; skip1025: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7220);}while(r); do{ sub_close( 22 ,1); if(!qbevent)break;evnt(7221);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain",5)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 22 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7223);}while(r); do{ sub_close( 22 ,1); if(!qbevent)break;evnt(7223);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain.txt",12)), 5 ,NULL,NULL, 22 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7225);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 22 ; if (new_error) goto skip1026; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("inpchain",8)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip1026; skip1026: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7227);}while(r); do{ sub_close( 22 ,1); if(!qbevent)break;evnt(7228);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain",8)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 22 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7230);}while(r); do{ sub_close( 22 ,1); if(!qbevent)break;evnt(7230);}while(r); S_7982:; if ((-(*__LONG_X!=(*__LONG_IDN+ 1 )))||new_error){ if(qbevent){evnt(7233);if(r)goto S_7982;} do{ goto LABEL_SKIPDIM; if(!qbevent)break;evnt(7233);}while(r); } do{ goto LABEL_DIMCOMMONARRAY; if(!qbevent)break;evnt(7234);}while(r); } } S_7988:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(7241);if(r)goto S_7988;} S_7989:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(7242);if(r)goto S_7989;} S_7990:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(7244);if(r)goto S_7990;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1028; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("common checking:",16),__STRING_VARNAME), 0 , 0 , 1 ); if (new_error) goto skip1028; skip1028: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7244);}while(r); } do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(7246);}while(r); S_7994:; fornext_value1030= 1 ; fornext_finalvalue1030=*__LONG_COMMONARRAYLISTN; fornext_step1030= 1 ; if (fornext_step1030<0) fornext_step_negative1030=1; else fornext_step_negative1030=0; if (new_error) goto fornext_error1030; goto fornext_entrylabel1030; while(1){ fornext_value1030=fornext_step1030+(*__LONG_X); fornext_entrylabel1030: *__LONG_X=fornext_value1030; if (fornext_step_negative1030){ if (fornext_value1030fornext_finalvalue1030) break; } fornext_error1030:; if(qbevent){evnt(7247);if(r)goto S_7994;} do{ qbs_set(__STRING_VARNAME2,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7248);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7248);}while(r); do{ qbs_set(__STRING_TYP2,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7249);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7249);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7250);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7250);}while(r); do{ *__LONG_DIMSHARED2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7251);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(7251);}while(r); S_8003:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(7252);if(r)goto S_8003;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1031; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("common checking against:",24),__STRING_VARNAME2),__STRING1_SP),__STRING_TYP2),__STRING1_SP),FUNC_STR2(__LONG_DIMMETHOD2)),__STRING1_SP),FUNC_STR2(__LONG_DIMSHARED2)), 0 , 0 , 1 ); if (new_error) goto skip1031; skip1031: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7252);}while(r); } S_8006:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARNAME,__STRING_VARNAME2)))||new_error){ if(qbevent){evnt(7254);if(r)goto S_8006;} S_8007:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(7255);if(r)goto S_8007;} S_8008:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7256);if(r)goto S_8008;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7256);}while(r); } S_8011:; if ((-(*__LONG_DIMMETHOD==*__LONG_DIMMETHOD2))||new_error){ if(qbevent){evnt(7257);if(r)goto S_8011;} S_8012:; if ((*__LONG_DIMSHARED2)||new_error){ if(qbevent){evnt(7261);if(r)goto S_8012;} do{ *__INTEGER_DIMSHARED=*__INTEGER_DIMSHARED| 2 ; if(!qbevent)break;evnt(7261);}while(r); } } } } } fornext_exit_1029:; } } LABEL_DIMCOMMONARRAY:; if(qbevent){evnt(7273);r=0;} do{ *__LONG_RETVAL=FUNC_DIM2(__STRING_VARNAME,__STRING_TYP,__LONG_DIMMETHOD,__STRING_ELEMENTS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7274);}while(r); S_8022:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7275);if(r)goto S_8022;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7275);}while(r); } LABEL_SKIPDIM:; if(qbevent){evnt(7276);r=0;} S_8025:; if ((-(*__INTEGER_DIMSHARED>= 2 ))||new_error){ if(qbevent){evnt(7277);if(r)goto S_8025;} do{ *__INTEGER_DIMSHARED=*__INTEGER_DIMSHARED- 2 ; if(!qbevent)break;evnt(7277);}while(r); } S_8028:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_COMMONOPTION!= 0 ))&(-(__STRING_ELEMENTS->len== 0 ))))||new_error){ if(qbevent){evnt(7280);if(r)goto S_8028;} do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 1 ; if(!qbevent)break;evnt(7284);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(7287);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain.txt",9)), 5 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7288);}while(r); do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7289);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1033; sub_file_print(tmp_fileno,qbs_new_txt_len("int32val=1;",11), 0 , 0 , 1 ); if (new_error) goto skip1033; skip1033: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7291);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1034; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1034; skip1034: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7292);}while(r); do{ *__LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(7294);}while(r); do{ *__LONG_BITS=*__LONG_T& 511 ; if(!qbevent)break;evnt(7295);}while(r); S_8037:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(7296);if(r)goto S_8037;} do{ *__LONG_BITS=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_T& 511 )-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(7296);}while(r); } S_8040:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(7297);if(r)goto S_8040;} S_8041:; if ((*__LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(7298);if(r)goto S_8041;} do{ *__LONG_BITS=*(int32*)(((char*)__UDT_ID)+(540))* 8 ; if(!qbevent)break;evnt(7299);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1035; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int64val=__STRING_",18),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))),qbs_new_txt_len("->len*8;",8)), 0 , 0 , 1 ); if (new_error) goto skip1035; skip1035: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7301);}while(r); do{ *__LONG_BITS= 0 ; if(!qbevent)break;evnt(7302);}while(r); } } S_8048:; if ((*__LONG_BITS)||new_error){ if(qbevent){evnt(7306);if(r)goto S_8048;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1036; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),FUNC_STR2(__LONG_BITS)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1036; skip1036: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7307);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1037; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1037; skip1037: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7309);}while(r); do{ qbs_set(__STRING_E,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7312);}while(r); S_8053:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(7314);if(r)goto S_8053;} S_8054:; if ((*__LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(7315);if(r)goto S_8054;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,qbs_new_txt_len("$",1)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7316);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(__STRING_E,FUNC_TYPEVALUE2SYMBOL(__LONG_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7318);}while(r); S_8058:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7319);if(r)goto S_8058;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7319);}while(r); } } } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1038= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7322);}while(r); S_8064:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7323);if(r)goto S_8064;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7323);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1039; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4)), 0 , 0 , 1 ); if (new_error) goto skip1039; skip1039: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7325);}while(r); do{ qbs_set(__STRING_TLAYOUT,__STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7327);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(7329);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("main.txt",8)), 5 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7330);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(7336);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain.txt",12)), 5 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7337);}while(r); do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7338);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1040; sub_file_print(tmp_fileno,qbs_new_txt_len("if (int32val==1){",17), 0 , 0 , 1 ); if (new_error) goto skip1040; skip1040: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7341);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1041; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1041; skip1041: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7343);}while(r); do{ qbs_set(__STRING_E,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7346);}while(r); do{ *__LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(7347);}while(r); S_8078:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(7348);if(r)goto S_8078;} S_8079:; if ((*__LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(7349);if(r)goto S_8079;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,qbs_new_txt_len("$",1)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7350);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(__STRING_E,FUNC_TYPEVALUE2SYMBOL(__LONG_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7352);}while(r); S_8083:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7353);if(r)goto S_8083;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7353);}while(r); } } } S_8088:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(7357);if(r)goto S_8088;} S_8089:; if ((-((*__LONG_T&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(7358);if(r)goto S_8089;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1042; sub_file_print(tmp_fileno,qbs_new_txt_len("tqbs=qbs_new(int64val>>3,1);",28), 0 , 0 , 1 ); if (new_error) goto skip1042; skip1042: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7359);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1043; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_set(__STRING_",17),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))),qbs_new_txt_len(",tqbs);",7)), 0 , 0 , 1 ); if (new_error) goto skip1043; skip1043: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7360);}while(r); } } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1044= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7365);}while(r); S_8095:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7366);if(r)goto S_8095;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7366);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1045; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4)), 0 , 0 , 1 ); if (new_error) goto skip1045; skip1045: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7367);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1046; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1046; skip1046: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7369);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1047; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1047; skip1047: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7370);}while(r); do{ qbs_set(__STRING_TLAYOUT,__STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7372);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(7374);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("main.txt",8)), 5 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7375);}while(r); do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(7377);}while(r); } LABEL_COMMONARRAYLISTED:; if(qbevent){evnt(7381);r=0;} do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7383);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_GETELEMENT(__STRING_TLAYOUT,&(pass1048= 1 ))),__STRING_APPENDNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7384);}while(r); S_8108:; if ((-(*__LONG_N2> 1 ))||new_error){ if(qbevent){evnt(7385);if(r)goto S_8108;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),FUNC_GETELEMENTS(__STRING_TLAYOUT,&(pass1049= 2 ),__LONG_N2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7386);}while(r); } S_8111:; if ((qbs_cleanup(qbs_tmp_base,__STRING_APPENDTYPE->len))||new_error){ if(qbevent){evnt(7389);if(r)goto S_8111;} S_8112:; if ((qbs_cleanup(qbs_tmp_base,__STRING_DIM2TYPEPASSBACK->len))||new_error){ if(qbevent){evnt(7390);if(r)goto S_8112;} do{ qbs_set(__STRING_APPENDTYPE,qbs_add(qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len("AS",2)),__STRING1_SP),__STRING_DIM2TYPEPASSBACK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7390);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_APPENDTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7391);}while(r); } do{ *__LONG_DIMSTATIC=*__LONG_OLDDIMSTATIC; if(!qbevent)break;evnt(7396);}while(r); } S_8119:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_D,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(7400);if(r)goto S_8119;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7400);}while(r); do{ goto LABEL_DIMNEXT; if(!qbevent)break;evnt(7400);}while(r); } do{ *__INTEGER_DIMOPTION= 0 ; if(!qbevent)break;evnt(7402);}while(r); do{ *__INTEGER_DIMSHARED= 0 ; if(!qbevent)break;evnt(7403);}while(r); do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(7404);}while(r); S_8126:; if ((-(*__LONG_DIMSTATIC== 1 ))||new_error){ if(qbevent){evnt(7405);if(r)goto S_8126;} do{ *__LONG_DIMSTATIC= 0 ; if(!qbevent)break;evnt(7405);}while(r); } do{ *__LONG_ALLOWLOCALNAME= 0 ; if(!qbevent)break;evnt(7406);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7408);}while(r); S_8131:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(7409);if(r)goto S_8131;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7409);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7409);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7411);}while(r); } } S_8139:; if ((-(*__LONG_THENGOTO== 1 ))||new_error){ if(qbevent){evnt(7426);if(r)goto S_8139;} S_8140:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(7427);if(r)goto S_8140;} do{ qbs_set(__STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7428);}while(r); do{ *__LONG_A=qbs_asc(qbs_left(__STRING_FIRSTELEMENT, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7429);}while(r); S_8143:; if (((-(*__LONG_A== 46 ))|(((-(*__LONG_A>= 48 ))&(-(*__LONG_A<= 57 )))))||new_error){ if(qbevent){evnt(7430);if(r)goto S_8143;} do{ qbs_set(__STRING_A2,__STRING_CA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7430);}while(r); do{ goto LABEL_THENGOTO; if(!qbevent)break;evnt(7430);}while(r); } } } S_8149:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(7435);if(r)goto S_8149;} S_8150:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1053= 1 )),qbs_new_txt_len("GOTO",4))))||new_error){ if(qbevent){evnt(7436);if(r)goto S_8150;} do{ qbs_set(__STRING_L,qbs_new_txt_len("GOTO",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7437);}while(r); do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,&(pass1054= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7438);}while(r); LABEL_THENGOTO:; if(qbevent){evnt(7439);r=0;} S_8153:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(7440);if(r)goto S_8153;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7440);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7440);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass1055= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7442);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7443);}while(r); LABEL_LABCHK2:; if(qbevent){evnt(7444);r=0;} S_8159:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7445);if(r)goto S_8159;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(7446);}while(r); S_8161:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(7447);if(r)goto S_8161;} S_8162:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(7448);if(r)goto S_8162;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(7448);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7449);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7450);}while(r); }else{ S_8168:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(7452);if(r)goto S_8168;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(7452);}while(r); do{ goto LABEL_LABCHK2; if(!qbevent)break;evnt(7452);}while(r); } } } S_8174:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7455);if(r)goto S_8174;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7457);}while(r); S_8176:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7457);if(r)goto S_8176;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7457);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(7467);if(r)goto S_8188;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7467);}while(r); }else{ do{ qbs_set(__STRING_L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7467);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7468);}while(r); S_8194:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7468);if(r)goto S_8194;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7468);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7468);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1059; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),__STRING_A2),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1059; skip1059: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7469);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7470);}while(r); } } S_8203:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RUN",3))))||new_error){ if(qbevent){evnt(7476);if(r)goto S_8203;} do{ qbs_set(__STRING_L,qbs_new_txt_len("RUN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7477);}while(r); S_8205:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(7478);if(r)goto S_8205;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1060; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_run_init();",15), 0 , 0 , 1 ); if (new_error) goto skip1060; skip1060: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7480);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1061; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_clear(NULL,NULL,NULL,NULL);",31), 0 , 0 , 1 ); if (new_error) goto skip1061; skip1061: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7481);}while(r); S_8208:; if ((qbs_cleanup(qbs_tmp_base,__STRING_SUBFUNC->len))||new_error){ if(qbevent){evnt(7482);if(r)goto S_8208;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1063; sub_file_print(tmp_fileno,qbs_new_txt_len("QBMAIN(NULL);",13), 0 , 0 , 1 ); if (new_error) goto skip1063; skip1063: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7483);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1064; sub_file_print(tmp_fileno,qbs_new_txt_len("goto S_0;",9), 0 , 0 , 1 ); if (new_error) goto skip1064; skip1064: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7485);}while(r); } }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1065= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7489);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7490);}while(r); S_8216:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7491);if(r)goto S_8216;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7491);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7492);}while(r); do{ qbs_set(__STRING_IGNORE,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7493);}while(r); S_8221:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7494);if(r)goto S_8221;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7494);}while(r); } S_8224:; if (((-(*__LONG_N== 2 ))&((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))))||new_error){ if(qbevent){evnt(7495);if(r)goto S_8224;} do{ qbs_set(__STRING_LBL,FUNC_GETELEMENT(__STRING_CA,&(pass1066= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7497);}while(r); S_8226:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_LBL)== 0 )))||new_error){ if(qbevent){evnt(7498);if(r)goto S_8226;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7498);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7498);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_LBL,&(pass1067= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7500);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7501);}while(r); LABEL_LABCHK501:; if(qbevent){evnt(7502);r=0;} S_8232:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7503);if(r)goto S_8232;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(7504);}while(r); S_8234:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(7505);if(r)goto S_8234;} S_8235:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(7506);if(r)goto S_8235;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))= 0 ; if(!qbevent)break;evnt(7506);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7507);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7508);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(7509);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(7510);}while(r); }else{ S_8243:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(7512);if(r)goto S_8243;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(7512);}while(r); do{ goto LABEL_LABCHK501; if(!qbevent)break;evnt(7512);}while(r); } } } S_8249:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7515);if(r)goto S_8249;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7517);}while(r); S_8251:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7517);if(r)goto S_8251;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7517);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(7531);if(r)goto S_8267;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 21 ; if (new_error) goto skip1072; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (run_from_line==",19),FUNC_STR2(__LONG_NEXTRUNLINEINDEX)),qbs_new_txt_len("){run_from_line=0;goto LABEL_",29)),__STRING_LBL),qbs_new_txt_len(";}",2)), 0 , 0 , 1 ); if (new_error) goto skip1072; skip1072: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7532);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1073; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("run_from_line=",14),FUNC_STR2(__LONG_NEXTRUNLINEINDEX)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1073; skip1073: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7533);}while(r); do{ *__LONG_NEXTRUNLINEINDEX=*__LONG_NEXTRUNLINEINDEX+ 1 ; if(!qbevent)break;evnt(7534);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1074; sub_file_print(tmp_fileno,qbs_new_txt_len("QBMAIN(NULL);",13), 0 , 0 , 1 ); if (new_error) goto skip1074; skip1074: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7535);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1075; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),__STRING_LBL),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1075; skip1075: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7537);}while(r); } }else{ do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7541);}while(r); S_8277:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7542);if(r)goto S_8277;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7542);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1076; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_run(",8),__STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1076; skip1076: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7543);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_L2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7544);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7547);}while(r); S_8285:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7547);if(r)goto S_8285;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7547);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7547);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7548);}while(r); } S_8292:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(7555);if(r)goto S_8292;} do{ qbs_set(__STRING_L,qbs_new_txt_len("END",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7556);}while(r); S_8294:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(7557);if(r)goto S_8294;} do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1078= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7558);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7559);}while(r); S_8297:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7559);if(r)goto S_8297;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7559);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7560);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISINTEGER64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7561);}while(r); S_8302:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7561);if(r)goto S_8302;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7561);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1079; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){evnt(",17),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len(");}",3)), 0 , 0 , 1 ); if (new_error) goto skip1079; skip1079: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7562);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1080; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("exit_code=",10),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1080; skip1080: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7563);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_L2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7564);}while(r); } do{ SUB_XEND(); if(!qbevent)break;evnt(7566);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7567);}while(r); S_8311:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7567);if(r)goto S_8311;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7567);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7567);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7568);}while(r); } S_8318:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SYSTEM",6))))||new_error){ if(qbevent){evnt(7571);if(r)goto S_8318;} do{ qbs_set(__STRING_L,qbs_new_txt_len("SYSTEM",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7572);}while(r); S_8320:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(7573);if(r)goto S_8320;} do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1082= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7574);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7575);}while(r); S_8323:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7575);if(r)goto S_8323;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7575);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7576);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISINTEGER64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7577);}while(r); S_8328:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7577);if(r)goto S_8328;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7577);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1083; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){evnt(",17),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len(");}",3)), 0 , 0 , 1 ); if (new_error) goto skip1083; skip1083: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7578);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1084; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("exit_code=",10),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1084; skip1084: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7579);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_L2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7580);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1085; sub_file_print(tmp_fileno,qbs_new_txt_len("if (sub_gl_called) error(271);",30), 0 , 0 , 1 ); if (new_error) goto skip1085; skip1085: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7584);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1086; sub_file_print(tmp_fileno,qbs_new_txt_len("close_program=1;",16), 0 , 0 , 1 ); if (new_error) goto skip1086; skip1086: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7585);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1087; sub_file_print(tmp_fileno,qbs_new_txt_len("end();",6), 0 , 0 , 1 ); if (new_error) goto skip1087; skip1087: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7586);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7587);}while(r); S_8339:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7587);if(r)goto S_8339;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7587);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7587);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7588);}while(r); } S_8346:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7591);if(r)goto S_8346;} S_8347:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("STOP",4))))||new_error){ if(qbevent){evnt(7592);if(r)goto S_8347;} do{ qbs_set(__STRING_L,qbs_new_txt_len("STOP",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7593);}while(r); S_8349:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(7594);if(r)goto S_8349;} do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1089= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7595);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7596);}while(r); S_8352:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7597);if(r)goto S_8352;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7597);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("STOP",4),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7598);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1090= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7599);}while(r); S_8357:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7600);if(r)goto S_8357;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7600);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7603);}while(r); S_8362:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7603);if(r)goto S_8362;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7603);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7603);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1092; sub_file_print(tmp_fileno,qbs_new_txt_len("close_program=1;",16), 0 , 0 , 1 ); if (new_error) goto skip1092; skip1092: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7604);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1093; sub_file_print(tmp_fileno,qbs_new_txt_len("end();",6), 0 , 0 , 1 ); if (new_error) goto skip1093; skip1093: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7605);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7606);}while(r); } } S_8372:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(7610);if(r)goto S_8372;} S_8373:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(7611);if(r)goto S_8373;} do{ SUB_XGOSUB(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7612);}while(r); S_8375:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7613);if(r)goto S_8375;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7613);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7615);}while(r); } } S_8381:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7619);if(r)goto S_8381;} S_8382:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RETURN",6))))||new_error){ if(qbevent){evnt(7620);if(r)goto S_8382;} S_8383:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(7621);if(r)goto S_8383;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1094; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),qbs_new_txt_len("ret",3)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4)),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip1094; skip1094: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7622);}while(r); do{ qbs_set(__STRING_L,qbs_new_txt_len("RETURN",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7623);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7624);}while(r); S_8387:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7624);if(r)goto S_8387;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7624);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7624);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7625);}while(r); }else{ S_8394:; if ((-(*__LONG_SUBFUNCN!= 0 ))||new_error){ if(qbevent){evnt(7628);if(r)goto S_8394;} do{ qbs_set(__STRING_A,qbs_new_txt_len("RETURN linelabel/linenumber invalid within a SUB/FUNCTION",57)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7628);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7628);}while(r); } S_8398:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(7629);if(r)goto S_8398;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected linelabel/linenumber after RETURN",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7629);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7629);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1096; sub_file_print(tmp_fileno,qbs_new_txt_len("if (!next_return_point) error(3);",33), 0 , 0 , 1 ); if (new_error) goto skip1096; skip1096: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7630);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1097; sub_file_print(tmp_fileno,qbs_new_txt_len("next_return_point--;",20), 0 , 0 , 1 ); if (new_error) goto skip1097; skip1097: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7631);}while(r); do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,&(pass1098= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7632);}while(r); S_8405:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(7633);if(r)goto S_8405;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7633);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7633);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass1099= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7635);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7636);}while(r); LABEL_LABCHK505:; if(qbevent){evnt(7637);r=0;} S_8411:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7638);if(r)goto S_8411;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(7639);}while(r); S_8413:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(7640);if(r)goto S_8413;} S_8414:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(7641);if(r)goto S_8414;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(7641);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7642);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7643);}while(r); }else{ S_8420:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(7645);if(r)goto S_8420;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(7645);}while(r); do{ goto LABEL_LABCHK505; if(!qbevent)break;evnt(7645);}while(r); } } } S_8426:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7648);if(r)goto S_8426;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7650);}while(r); S_8428:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7650);if(r)goto S_8428;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7650);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(7662);if(r)goto S_8443;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7662);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7662);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7663);}while(r); } } } S_8452:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7668);if(r)goto S_8452;} S_8453:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RESUME",6))))||new_error){ if(qbevent){evnt(7669);if(r)goto S_8453;} do{ qbs_set(__STRING_L,qbs_new_txt_len("RESUME",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7670);}while(r); S_8455:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(7671);if(r)goto S_8455;} LABEL_RESUMEPREV:; if(qbevent){evnt(7672);r=0;} S_8456:; if ((-(*__LONG_C_CORE== 0 ))||new_error){ if(qbevent){evnt(7674);if(r)goto S_8456;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1103; sub_file_print(tmp_fileno,qbs_new_txt_len("if (!error_handling){error(20);}else{error_retry=1; qbevent=1; error_handling=0; error_err=0; return NULL;}",107), 0 , 0 , 1 ); if (new_error) goto skip1103; skip1103: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7674);}while(r); } S_8459:; if ((-(*__LONG_C_CORE== 1 ))||new_error){ if(qbevent){evnt(7675);if(r)goto S_8459;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1104; sub_file_print(tmp_fileno,qbs_new_txt_len("if (!error_handling){error(20);}else{error_retry=1; qbevent=1; error_handling=0; error_err=0; return;}",102), 0 , 0 , 1 ); if (new_error) goto skip1104; skip1104: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7675);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7677);}while(r); S_8463:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7677);if(r)goto S_8463;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7677);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7677);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7678);}while(r); } S_8470:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(7680);if(r)goto S_8470;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many parameters",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7680);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7680);}while(r); } do{ qbs_set(__STRING_S,FUNC_GETELEMENT(__STRING_CA,&(pass1106= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7681);}while(r); S_8475:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_S),qbs_new_txt_len("NEXT",4))))||new_error){ if(qbevent){evnt(7682);if(r)goto S_8475;} S_8476:; if ((-(*__LONG_C_CORE== 0 ))||new_error){ if(qbevent){evnt(7684);if(r)goto S_8476;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1107; sub_file_print(tmp_fileno,qbs_new_txt_len("if (!error_handling){error(20);}else{error_handling=0; error_err=0; return NULL;}",81), 0 , 0 , 1 ); if (new_error) goto skip1107; skip1107: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7684);}while(r); } S_8479:; if ((-(*__LONG_C_CORE== 1 ))||new_error){ if(qbevent){evnt(7685);if(r)goto S_8479;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1108; sub_file_print(tmp_fileno,qbs_new_txt_len("if (!error_handling){error(20);}else{error_handling=0; error_err=0; return;}",76), 0 , 0 , 1 ); if (new_error) goto skip1108; skip1108: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7685);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("NEXT",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7687);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7688);}while(r); S_8484:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7688);if(r)goto S_8484;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7688);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7688);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7689);}while(r); } S_8491:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_S,qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(7691);if(r)goto S_8491;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("0",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7691);}while(r); do{ goto LABEL_RESUMEPREV; if(!qbevent)break;evnt(7691);}while(r); } S_8495:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_S)== 0 )))||new_error){ if(qbevent){evnt(7692);if(r)goto S_8495;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label passed to RESUME",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7692);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7692);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_S,&(pass1110= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7694);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7695);}while(r); LABEL_LABCHK506:; if(qbevent){evnt(7696);r=0;} S_8501:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7697);if(r)goto S_8501;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(7698);}while(r); S_8503:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(7699);if(r)goto S_8503;} S_8504:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(7700);if(r)goto S_8504;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(7700);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7701);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7702);}while(r); }else{ S_8510:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(7704);if(r)goto S_8510;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(7704);}while(r); do{ goto LABEL_LABCHK506; if(!qbevent)break;evnt(7704);}while(r); } } } S_8516:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7707);if(r)goto S_8516;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7709);}while(r); S_8518:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7709);if(r)goto S_8518;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7709);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(7720);if(r)goto S_8532;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7720);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7720);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1113; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_",79),__STRING_S),qbs_new_txt_len(";}",2)), 0 , 0 , 1 ); if (new_error) goto skip1113; skip1113: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7721);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7722);}while(r); } } S_8541:; if ((-(*__LONG_N== 4 ))||new_error){ if(qbevent){evnt(7726);if(r)goto S_8541;} S_8542:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENTS(__STRING_A,&(pass1114= 1 ),&(pass1115= 3 )),(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ON",2),__STRING1_SP),qbs_new_txt_len("ERROR",5)),__STRING1_SP),qbs_new_txt_len("GOTO",4))))))||new_error){ if(qbevent){evnt(7727);if(r)goto S_8542;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ON",2),__STRING1_SP),qbs_new_txt_len("ERROR",5)),__STRING1_SP),qbs_new_txt_len("GOTO",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7728);}while(r); do{ qbs_set(__STRING_LBL,FUNC_GETELEMENT(__STRING_CA,&(pass1116= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7729);}while(r); S_8545:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_LBL,qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(7730);if(r)goto S_8545;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1117; sub_file_print(tmp_fileno,qbs_new_txt_len("error_goto_line=0;",18), 0 , 0 , 1 ); if (new_error) goto skip1117; skip1117: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7731);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len("0",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7732);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7733);}while(r); S_8549:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7733);if(r)goto S_8549;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7733);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7733);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7734);}while(r); } S_8556:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_LBL)== 0 )))||new_error){ if(qbevent){evnt(7736);if(r)goto S_8556;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7736);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7736);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_LBL,&(pass1119= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7738);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7739);}while(r); LABEL_LABCHK6:; if(qbevent){evnt(7740);r=0;} S_8562:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7741);if(r)goto S_8562;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(7742);}while(r); S_8564:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(7743);if(r)goto S_8564;} S_8565:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(7744);if(r)goto S_8565;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))= 0 ; if(!qbevent)break;evnt(7744);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7745);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7746);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(7747);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(7748);}while(r); }else{ S_8573:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(7750);if(r)goto S_8573;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(7750);}while(r); do{ goto LABEL_LABCHK6; if(!qbevent)break;evnt(7750);}while(r); } } } S_8579:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7753);if(r)goto S_8579;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7755);}while(r); S_8581:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7755);if(r)goto S_8581;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7755);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(7768);if(r)goto S_8596;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7768);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7768);}while(r); } do{ *__LONG_ERRORLABELS=*__LONG_ERRORLABELS+ 1 ; if(!qbevent)break;evnt(7769);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1122; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("error_goto_line=",16),FUNC_STR2(__LONG_ERRORLABELS)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1122; skip1122: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7770);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 14 ; if (new_error) goto skip1123; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (error_goto_line==",21),FUNC_STR2(__LONG_ERRORLABELS)),qbs_new_txt_len("){error_handling=1; goto LABEL_",31)),__STRING_LBL),qbs_new_txt_len(";}",2)), 0 , 0 , 1 ); if (new_error) goto skip1123; skip1123: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7771);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7772);}while(r); } } S_8607:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7776);if(r)goto S_8607;} S_8608:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RESTORE",7))))||new_error){ if(qbevent){evnt(7777);if(r)goto S_8608;} do{ qbs_set(__STRING_L,qbs_new_txt_len("RESTORE",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7778);}while(r); S_8610:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(7779);if(r)goto S_8610;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1124; sub_file_print(tmp_fileno,qbs_new_txt_len("data_offset=0;",14), 0 , 0 , 1 ); if (new_error) goto skip1124; skip1124: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7780);}while(r); }else{ S_8613:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(7782);if(r)goto S_8613;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7782);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7782);}while(r); } do{ qbs_set(__STRING_LBL,FUNC_GETELEMENT(__STRING_CA,&(pass1125= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7783);}while(r); S_8618:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_LBL)== 0 )))||new_error){ if(qbevent){evnt(7784);if(r)goto S_8618;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7784);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7784);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_LBL,&(pass1126= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7788);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7789);}while(r); S_8624:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7790);if(r)goto S_8624;} do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7791);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7792);}while(r); do{ *(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+269))= 1 ; if(!qbevent)break;evnt(7793);}while(r); S_8628:; if ((-(*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270))== 0 ))||new_error){ if(qbevent){evnt(7794);if(r)goto S_8628;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(7794);}while(r); } } S_8632:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7796);if(r)goto S_8632;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7797);}while(r); S_8634:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7797);if(r)goto S_8634;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7797);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(7811);if(r)goto S_8651;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7811);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7811);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7812);}while(r); } } S_8659:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7819);if(r)goto S_8659;} S_8660:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ON",2))))||new_error){ if(qbevent){evnt(7820);if(r)goto S_8660;} do{ SUB_XONGOTOGOSUB(__STRING_A,__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7821);}while(r); S_8662:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7822);if(r)goto S_8662;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7822);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7823);}while(r); } } S_8668:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7829);if(r)goto S_8668;} S_8669:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMGET",7))))||new_error){ if(qbevent){evnt(7830);if(r)goto S_8669;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7832);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(7833);}while(r); do{ *__LONG_NE= 0 ; if(!qbevent)break;evnt(7834);}while(r); S_8673:; fornext_value1131= 2 ; fornext_finalvalue1131=*__LONG_N; fornext_step1131= 1 ; if (fornext_step1131<0) fornext_step_negative1131=1; else fornext_step_negative1131=0; if (new_error) goto fornext_error1131; goto fornext_entrylabel1131; while(1){ fornext_value1131=fornext_step1131+(*__LONG_I2); fornext_entrylabel1131: *__LONG_I2=fornext_value1131; if (fornext_step_negative1131){ if (fornext_value1131fornext_finalvalue1131) break; } fornext_error1131:; if(qbevent){evnt(7835);if(r)goto S_8673;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7836);}while(r); S_8675:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7837);if(r)goto S_8675;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(7837);}while(r); } S_8678:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(7838);if(r)goto S_8678;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(7838);}while(r); } S_8681:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(7839);if(r)goto S_8681;} do{ *__LONG_NE=*__LONG_NE+ 1 ; if(!qbevent)break;evnt(7840);}while(r); S_8683:; if ((-(*__LONG_NE== 1 ))||new_error){ if(qbevent){evnt(7841);if(r)goto S_8683;} do{ qbs_set(__STRING_BLK,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7841);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7841);}while(r); } S_8687:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(7842);if(r)goto S_8687;} do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7842);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7842);}while(r); } S_8691:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(7843);if(r)goto S_8691;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7843);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7843);}while(r); } }else{ S_8696:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(7845);if(r)goto S_8696;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7845);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7845);}while(r); } } } fornext_exit_1130:; do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7848);}while(r); S_8704:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("",0)))|(-(*__LONG_NE!= 2 ))))||new_error){ if(qbevent){evnt(7849);if(r)goto S_8704;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEMGET mem-reference,offset,variable",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7849);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7849);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_new_txt_len("_MEMGET",7),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7851);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BLK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7853);}while(r); S_8710:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7853);if(r)goto S_8710;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7853);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7854);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7856);}while(r); S_8715:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7856);if(r)goto S_8715;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7856);}while(r); } S_8718:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))|(-((*__LONG_TYP& 511 )!= 1 )))||new_error){ if(qbevent){evnt(7857);if(r)goto S_8718;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEM type",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7857);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7857);}while(r); } do{ qbs_set(__STRING_BLKOFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1133= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7858);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OFFS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7865);}while(r); S_8724:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7865);if(r)goto S_8724;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7865);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7866);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1134=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7867);}while(r); S_8729:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7867);if(r)goto S_8729;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7867);}while(r); } do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7868);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7871);}while(r); S_8734:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7871);if(r)goto S_8734;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7871);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7872);}while(r); do{ qbs_set(__STRING_VARSIZE,FUNC_EVALUATETOTYP(__STRING_E,&(pass1135= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7873);}while(r); S_8739:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7873);if(r)goto S_8739;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7873);}while(r); } do{ qbs_set(__STRING_VAROFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1136= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7874);}while(r); S_8743:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7874);if(r)goto S_8743;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7874);}while(r); } do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(7884);}while(r); S_8747:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(7885);if(r)goto S_8747;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(7885);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7885);}while(r); } S_8751:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("2",1))))||new_error){ if(qbevent){evnt(7886);if(r)goto S_8751;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(7886);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7886);}while(r); } S_8755:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("4",1))))||new_error){ if(qbevent){evnt(7887);if(r)goto S_8755;} do{ *__LONG_S= 4 ; if(!qbevent)break;evnt(7887);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7887);}while(r); } S_8759:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("8",1))))||new_error){ if(qbevent){evnt(7888);if(r)goto S_8759;} do{ *__LONG_S= 8 ; if(!qbevent)break;evnt(7888);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7888);}while(r); } S_8763:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(7890);if(r)goto S_8763;} S_8764:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(7892);if(r)goto S_8764;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1137; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(",2),__STRING_ST),qbs_new_txt_len("*)",2)),__STRING_VAROFFS),qbs_new_txt_len("=*(",3)),__STRING_ST),qbs_new_txt_len("*)(",3)),__STRING_OFFS),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1137; skip1137: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7893);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1138; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memmove(",8),__STRING_VAROFFS),qbs_new_txt_len(",(void*)",8)),__STRING_OFFS),qbs_new_txt_len(",",1)),__STRING_VARSIZE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1138; skip1138: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7895);}while(r); } }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1139; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_OFFS),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1139; skip1139: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7899);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1140; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if ( ((mem_block*)(",19),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset ){",18)), 0 , 0 , 1 ); if (new_error) goto skip1140; skip1140: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7901);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1141; sub_file_print(tmp_fileno,qbs_new_txt_len("if (",4), 0 , 0 , 1 ); if (new_error) goto skip1141; skip1141: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7903);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1142; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long < ((mem_block*)(",25),__STRING_BLKOFFS),qbs_new_txt_len("))->offset ||",14)), 0 , 0 , 1 ); if (new_error) goto skip1142; skip1142: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7904);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1143; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(tmp_long+(",11),__STRING_VARSIZE),qbs_new_txt_len(")) > ( ((mem_block*)(",21)),__STRING_BLKOFFS),qbs_new_txt_len("))->offset + ((mem_block*)(",27)),__STRING_BLKOFFS),qbs_new_txt_len("))->size) ||",13)), 0 , 0 , 1 ); if (new_error) goto skip1143; skip1143: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7905);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1144; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((mem_lock*)((mem_block*)(",26),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset)->id != ((mem_block*)(",38)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_id ){",15)), 0 , 0 , 1 ); if (new_error) goto skip1144; skip1144: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7906);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1145; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (",4),qbs_new_txt_len("((mem_lock*)((mem_block*)(",26)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset)->id != ((mem_block*)(",38)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_id",11)),qbs_new_txt_len(") error(308); else error(300);",30)), 0 , 0 , 1 ); if (new_error) goto skip1145; skip1145: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7908);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1146; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip1146; skip1146: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7909);}while(r); S_8778:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(7910);if(r)goto S_8778;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1147; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(",2),__STRING_ST),qbs_new_txt_len("*)",2)),__STRING_VAROFFS),qbs_new_txt_len("=*(",3)),__STRING_ST),qbs_new_txt_len("*)tmp_long;",11)), 0 , 0 , 1 ); if (new_error) goto skip1147; skip1147: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7911);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1148; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memmove(",8),__STRING_VAROFFS),qbs_new_txt_len(",(void*)tmp_long,",17)),__STRING_VARSIZE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1148; skip1148: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7913);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1149; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1149; skip1149: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7915);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1150; sub_file_print(tmp_fileno,qbs_new_txt_len("}else error(309);",17), 0 , 0 , 1 ); if (new_error) goto skip1150; skip1150: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7916);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7919);}while(r); S_8787:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7919);if(r)goto S_8787;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7919);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7919);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7920);}while(r); } } S_8795:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7928);if(r)goto S_8795;} S_8796:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMPUT",7))))||new_error){ if(qbevent){evnt(7929);if(r)goto S_8796;} do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7931);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7932);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(7933);}while(r); do{ *__LONG_NE= 0 ; if(!qbevent)break;evnt(7934);}while(r); S_8801:; fornext_value1153= 2 ; fornext_finalvalue1153=*__LONG_N; fornext_step1153= 1 ; if (fornext_step1153<0) fornext_step_negative1153=1; else fornext_step_negative1153=0; if (new_error) goto fornext_error1153; goto fornext_entrylabel1153; while(1){ fornext_value1153=fornext_step1153+(*__LONG_I2); fornext_entrylabel1153: *__LONG_I2=fornext_value1153; if (fornext_step_negative1153){ if (fornext_value1153fornext_finalvalue1153) break; } fornext_error1153:; if(qbevent){evnt(7935);if(r)goto S_8801;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7936);}while(r); S_8803:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7937);if(r)goto S_8803;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(7937);}while(r); } S_8806:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(7938);if(r)goto S_8806;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(7938);}while(r); } S_8809:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))|(qbs_equal(qbs_ucase(__STRING_E2),qbs_new_txt_len("AS",2)))))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(7939);if(r)goto S_8809;} do{ *__LONG_NE=*__LONG_NE+ 1 ; if(!qbevent)break;evnt(7940);}while(r); S_8811:; if ((-(*__LONG_NE== 1 ))||new_error){ if(qbevent){evnt(7941);if(r)goto S_8811;} do{ qbs_set(__STRING_BLK,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7941);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7941);}while(r); } S_8815:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(7942);if(r)goto S_8815;} do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7942);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7942);}while(r); } S_8819:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(7943);if(r)goto S_8819;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7943);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7943);}while(r); } S_8823:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(qbs_ucase(__STRING_E2),qbs_new_txt_len("AS",2)))&(-(*__LONG_NE!= 3 ))))|(((-(*__LONG_NE== 3 ))&(qbs_notequal(qbs_ucase(__STRING_E2),qbs_new_txt_len("AS",2)))))|(-(*__LONG_NE== 4 ))))||new_error){ if(qbevent){evnt(7944);if(r)goto S_8823;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEMPUT mem-reference,offset,variable|value[AS type]",61)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7944);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7944);}while(r); } }else{ S_8828:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(7946);if(r)goto S_8828;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7946);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7946);}while(r); } } } fornext_exit_1152:; S_8835:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_NE< 2 ))|(qbs_equal(__STRING_E,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(7949);if(r)goto S_8835;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEMPUT mem-reference,offset,variable|value[AS type]",61)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7949);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7949);}while(r); } S_8839:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(7950);if(r)goto S_8839;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7950);}while(r); }else{ do{ qbs_set(__STRING_TYP,qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7950);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_new_txt_len("_MEMPUT",7),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7952);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BLK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7954);}while(r); S_8846:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7954);if(r)goto S_8846;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7954);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7955);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7957);}while(r); S_8851:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7957);if(r)goto S_8851;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7957);}while(r); } S_8854:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))|(-((*__LONG_TYP& 511 )!= 1 )))||new_error){ if(qbevent){evnt(7958);if(r)goto S_8854;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEM type",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7958);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7958);}while(r); } do{ qbs_set(__STRING_BLKOFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1155= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7959);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OFFS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7961);}while(r); S_8860:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7961);if(r)goto S_8860;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7961);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7962);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1156=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7963);}while(r); S_8865:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7963);if(r)goto S_8865;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7963);}while(r); } do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7964);}while(r); S_8869:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(7966);if(r)goto S_8869;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7967);}while(r); S_8871:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7967);if(r)goto S_8871;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7967);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7968);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7970);}while(r); S_8876:; if (((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))&((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(7971);if(r)goto S_8876;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1157; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("g_tmp_str=",10),__STRING_TEST),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1157; skip1157: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7972);}while(r); do{ qbs_set(__STRING_VARSIZE,qbs_new_txt_len("g_tmp_str->len",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7973);}while(r); do{ qbs_set(__STRING_VAROFFS,qbs_new_txt_len("g_tmp_str->chr",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7974);}while(r); }else{ do{ qbs_set(__STRING_VARSIZE,FUNC_EVALUATETOTYP(__STRING_E,&(pass1158= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7976);}while(r); S_8882:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7976);if(r)goto S_8882;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7976);}while(r); } do{ qbs_set(__STRING_VAROFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1159= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7977);}while(r); S_8886:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7977);if(r)goto S_8886;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7977);}while(r); } } do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(7981);}while(r); S_8891:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(7982);if(r)goto S_8891;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(7982);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7982);}while(r); } S_8895:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("2",1))))||new_error){ if(qbevent){evnt(7983);if(r)goto S_8895;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(7983);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7983);}while(r); } S_8899:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("4",1))))||new_error){ if(qbevent){evnt(7984);if(r)goto S_8899;} do{ *__LONG_S= 4 ; if(!qbevent)break;evnt(7984);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7984);}while(r); } S_8903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("8",1))))||new_error){ if(qbevent){evnt(7985);if(r)goto S_8903;} do{ *__LONG_S= 8 ; if(!qbevent)break;evnt(7985);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7985);}while(r); } S_8907:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(7987);if(r)goto S_8907;} S_8908:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(7989);if(r)goto S_8908;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1160; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(",2),__STRING_ST),qbs_new_txt_len("*)(",3)),__STRING_OFFS),qbs_new_txt_len(")=*(",4)),__STRING_ST),qbs_new_txt_len("*)",2)),__STRING_VAROFFS),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1160; skip1160: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7990);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1161; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memmove((void*)",15),__STRING_OFFS),qbs_new_txt_len(",",1)),__STRING_VAROFFS),qbs_new_txt_len(",",1)),__STRING_VARSIZE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1161; skip1161: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7992);}while(r); } }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1162; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_OFFS),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1162; skip1162: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7996);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1163; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if ( ((mem_block*)(",19),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset ){",18)), 0 , 0 , 1 ); if (new_error) goto skip1163; skip1163: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7998);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1164; sub_file_print(tmp_fileno,qbs_new_txt_len("if (",4), 0 , 0 , 1 ); if (new_error) goto skip1164; skip1164: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8000);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1165; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long < ((mem_block*)(",25),__STRING_BLKOFFS),qbs_new_txt_len("))->offset ||",14)), 0 , 0 , 1 ); if (new_error) goto skip1165; skip1165: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8001);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1166; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(tmp_long+(",11),__STRING_VARSIZE),qbs_new_txt_len(")) > ( ((mem_block*)(",21)),__STRING_BLKOFFS),qbs_new_txt_len("))->offset + ((mem_block*)(",27)),__STRING_BLKOFFS),qbs_new_txt_len("))->size) ||",13)), 0 , 0 , 1 ); if (new_error) goto skip1166; skip1166: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8002);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1167; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((mem_lock*)((mem_block*)(",26),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset)->id != ((mem_block*)(",38)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_id ){",15)), 0 , 0 , 1 ); if (new_error) goto skip1167; skip1167: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8003);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1168; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (",4),qbs_new_txt_len("((mem_lock*)((mem_block*)(",26)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset)->id != ((mem_block*)(",38)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_id",11)),qbs_new_txt_len(") error(308); else error(300);",30)), 0 , 0 , 1 ); if (new_error) goto skip1168; skip1168: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8005);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1169; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip1169; skip1169: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8006);}while(r); S_8922:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(8007);if(r)goto S_8922;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1170; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(",2),__STRING_ST),qbs_new_txt_len("*)tmp_long=*(",13)),__STRING_ST),qbs_new_txt_len("*)",2)),__STRING_VAROFFS),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1170; skip1170: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8008);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1171; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memmove((void*)tmp_long,",24),__STRING_VAROFFS),qbs_new_txt_len(",",1)),__STRING_VARSIZE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1171; skip1171: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8010);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1172; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1172; skip1172: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8012);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1173; sub_file_print(tmp_fileno,qbs_new_txt_len("}else error(309);",17), 0 , 0 , 1 ); if (new_error) goto skip1173; skip1173: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8013);}while(r); } }else{ do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8021);}while(r); S_8932:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(8022);if(r)goto S_8932;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid type",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8022);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8022);}while(r); } S_8936:; if (((-((*__LONG_T&*__LONG_ISOFFSETINBITS)!= 0 ))|(-((*__LONG_T&*__LONG_ISUDT)!= 0 ))|((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(8023);if(r)goto S_8936;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_MEMPUT requires numeric type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8023);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8023);}while(r); } S_8940:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(8024);if(r)goto S_8940;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(8024);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8026);}while(r); S_8944:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8026);if(r)goto S_8944;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8026);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8027);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8028);}while(r); S_8949:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8028);if(r)goto S_8949;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8028);}while(r); } do{ qbs_set(__STRING_ST,FUNC_TYP2CTYP(__LONG_T,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8029);}while(r); do{ qbs_set(__STRING_VARSIZE,FUNC_STR2(&(pass1174=(*__LONG_T& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8030);}while(r); S_8954:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(8031);if(r)goto S_8954;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1175; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(",2),__STRING_ST),qbs_new_txt_len("*)(",3)),__STRING_OFFS),qbs_new_txt_len(")=",2)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1175; skip1175: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8033);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1176; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_OFFS),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1176; skip1176: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8036);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1177; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if ( ((mem_block*)(",19),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset ){",18)), 0 , 0 , 1 ); if (new_error) goto skip1177; skip1177: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8038);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1178; sub_file_print(tmp_fileno,qbs_new_txt_len("if (",4), 0 , 0 , 1 ); if (new_error) goto skip1178; skip1178: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8040);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1179; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long < ((mem_block*)(",25),__STRING_BLKOFFS),qbs_new_txt_len("))->offset ||",14)), 0 , 0 , 1 ); if (new_error) goto skip1179; skip1179: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8041);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1180; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(tmp_long+(",11),__STRING_VARSIZE),qbs_new_txt_len(")) > ( ((mem_block*)(",21)),__STRING_BLKOFFS),qbs_new_txt_len("))->offset + ((mem_block*)(",27)),__STRING_BLKOFFS),qbs_new_txt_len("))->size) ||",13)), 0 , 0 , 1 ); if (new_error) goto skip1180; skip1180: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8042);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1181; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((mem_lock*)((mem_block*)(",26),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset)->id != ((mem_block*)(",38)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_id ){",15)), 0 , 0 , 1 ); if (new_error) goto skip1181; skip1181: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8043);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1182; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (",4),qbs_new_txt_len("((mem_lock*)((mem_block*)(",26)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset)->id != ((mem_block*)(",38)),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_id",11)),qbs_new_txt_len(") error(308); else error(300);",30)), 0 , 0 , 1 ); if (new_error) goto skip1182; skip1182: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8045);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1183; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip1183; skip1183: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8046);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1184; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(",2),__STRING_ST),qbs_new_txt_len("*)tmp_long=",11)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1184; skip1184: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8047);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1185; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1185; skip1185: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8048);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1186; sub_file_print(tmp_fileno,qbs_new_txt_len("}else error(309);",17), 0 , 0 , 1 ); if (new_error) goto skip1186; skip1186: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8049);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8054);}while(r); S_8971:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8054);if(r)goto S_8971;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8054);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8054);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8055);}while(r); } } S_8979:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(8064);if(r)goto S_8979;} S_8980:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMFILL",8))))||new_error){ if(qbevent){evnt(8065);if(r)goto S_8980;} do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8067);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8068);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8069);}while(r); do{ *__LONG_NE= 0 ; if(!qbevent)break;evnt(8070);}while(r); S_8985:; fornext_value1189= 2 ; fornext_finalvalue1189=*__LONG_N; fornext_step1189= 1 ; if (fornext_step1189<0) fornext_step_negative1189=1; else fornext_step_negative1189=0; if (new_error) goto fornext_error1189; goto fornext_entrylabel1189; while(1){ fornext_value1189=fornext_step1189+(*__LONG_I2); fornext_entrylabel1189: *__LONG_I2=fornext_value1189; if (fornext_step_negative1189){ if (fornext_value1189fornext_finalvalue1189) break; } fornext_error1189:; if(qbevent){evnt(8071);if(r)goto S_8985;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8072);}while(r); S_8987:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8073);if(r)goto S_8987;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8073);}while(r); } S_8990:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8074);if(r)goto S_8990;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8074);}while(r); } S_8993:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))|(qbs_equal(qbs_ucase(__STRING_E2),qbs_new_txt_len("AS",2)))))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8075);if(r)goto S_8993;} do{ *__LONG_NE=*__LONG_NE+ 1 ; if(!qbevent)break;evnt(8076);}while(r); S_8995:; if ((-(*__LONG_NE== 1 ))||new_error){ if(qbevent){evnt(8077);if(r)goto S_8995;} do{ qbs_set(__STRING_BLK,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8077);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8077);}while(r); } S_8999:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(8078);if(r)goto S_8999;} do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8078);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8078);}while(r); } S_9003:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(8079);if(r)goto S_9003;} do{ qbs_set(__STRING_BYTES,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8079);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8079);}while(r); } S_9007:; if ((-(*__LONG_NE== 4 ))||new_error){ if(qbevent){evnt(8080);if(r)goto S_9007;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8080);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8080);}while(r); } S_9011:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(qbs_ucase(__STRING_E2),qbs_new_txt_len("AS",2)))&(-(*__LONG_NE!= 4 ))))|(((-(*__LONG_NE== 4 ))&(qbs_notequal(qbs_ucase(__STRING_E2),qbs_new_txt_len("AS",2)))))|(-(*__LONG_NE== 5 ))))||new_error){ if(qbevent){evnt(8081);if(r)goto S_9011;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEMFILL mem-reference,offset,bytes,variable|value[AS type]",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8081);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8081);}while(r); } }else{ S_9016:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(8083);if(r)goto S_9016;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8083);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8083);}while(r); } } } fornext_exit_1188:; S_9023:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_NE< 3 ))|(qbs_equal(__STRING_E,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(8086);if(r)goto S_9023;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEMFILL mem-reference,offset,bytes,variable|value[AS type]",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8086);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8086);}while(r); } S_9027:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(8087);if(r)goto S_9027;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8087);}while(r); }else{ do{ qbs_set(__STRING_TYP,qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8087);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_new_txt_len("_MEMFILL",8),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8089);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BLK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8091);}while(r); S_9034:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8091);if(r)goto S_9034;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8091);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8092);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8094);}while(r); S_9039:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8094);if(r)goto S_9039;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8094);}while(r); } S_9042:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))|(-((*__LONG_TYP& 511 )!= 1 )))||new_error){ if(qbevent){evnt(8095);if(r)goto S_9042;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected _MEM type",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8095);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8095);}while(r); } do{ qbs_set(__STRING_BLKOFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1191= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8096);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OFFS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8098);}while(r); S_9048:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8098);if(r)goto S_9048;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8098);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8099);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1192=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8100);}while(r); S_9053:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8100);if(r)goto S_9053;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8100);}while(r); } do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8101);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BYTES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8103);}while(r); S_9058:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8103);if(r)goto S_9058;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8103);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8104);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1193=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8105);}while(r); S_9063:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8105);if(r)goto S_9063;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8105);}while(r); } do{ qbs_set(__STRING_BYTES,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8106);}while(r); S_9067:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(8108);if(r)goto S_9067;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8109);}while(r); S_9069:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8109);if(r)goto S_9069;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8109);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8110);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8111);}while(r); S_9074:; if (((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))&((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(8112);if(r)goto S_9074;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1194; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=(ptrszint)",19),__STRING_TEST),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1194; skip1194: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8113);}while(r); do{ qbs_set(__STRING_VARSIZE,qbs_new_txt_len("((qbs*)tmp_long)->len",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8114);}while(r); do{ qbs_set(__STRING_VAROFFS,qbs_new_txt_len("((qbs*)tmp_long)->chr",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8115);}while(r); }else{ do{ qbs_set(__STRING_VARSIZE,FUNC_EVALUATETOTYP(__STRING_E,&(pass1195= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8117);}while(r); S_9080:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8117);if(r)goto S_9080;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8117);}while(r); } do{ qbs_set(__STRING_VAROFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1196= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8118);}while(r); S_9084:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8118);if(r)goto S_9084;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8118);}while(r); } } S_9088:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(8121);if(r)goto S_9088;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1197; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub__memfill_nochecks(",22),__STRING_OFFS),qbs_new_txt_len(",",1)),__STRING_BYTES),qbs_new_txt_len(",(ptrszint)",11)),__STRING_VAROFFS),qbs_new_txt_len(",",1)),__STRING_VARSIZE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1197; skip1197: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8122);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1198; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub__memfill((mem_block*)",25),__STRING_BLKOFFS),qbs_new_txt_len(",",1)),__STRING_OFFS),qbs_new_txt_len(",",1)),__STRING_BYTES),qbs_new_txt_len(",(ptrszint)",11)),__STRING_VAROFFS),qbs_new_txt_len(",",1)),__STRING_VARSIZE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1198; skip1198: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8124);}while(r); } }else{ do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8130);}while(r); S_9095:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(8131);if(r)goto S_9095;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid type",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8131);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8131);}while(r); } S_9099:; if (((-((*__LONG_T&*__LONG_ISOFFSETINBITS)!= 0 ))|(-((*__LONG_T&*__LONG_ISUDT)!= 0 ))|((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(8132);if(r)goto S_9099;} do{ qbs_set(__STRING_A,qbs_new_txt_len("_MEMFILL requires numeric type",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8132);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8132);}while(r); } S_9103:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(8133);if(r)goto S_9103;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(8133);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8135);}while(r); S_9107:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8135);if(r)goto S_9107;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8135);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP),qbs_new_txt_len("AS",2)),__STRING1_SP),__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8136);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8137);}while(r); S_9112:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8137);if(r)goto S_9112;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8137);}while(r); } do{ qbs_set(__STRING_C,qbs_new_txt_len("sub__memfill_",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8139);}while(r); S_9116:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(8140);if(r)goto S_9116;} do{ qbs_set(__STRING_C,qbs_new_txt_len("sub__memfill_nochecks_",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8140);}while(r); } S_9119:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(8141);if(r)goto S_9119;} do{ qbs_set(__STRING_C,qbs_add(__STRING_C,qbs_new_txt_len("OFFSET",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8142);}while(r); }else{ S_9122:; if ((*__LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(8144);if(r)goto S_9122;} S_9123:; if ((-((*__LONG_T& 511 )== 32 ))||new_error){ if(qbevent){evnt(8145);if(r)goto S_9123;} do{ qbs_set(__STRING_C,qbs_add(__STRING_C,qbs_new_txt_len("SINGLE",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8145);}while(r); } S_9126:; if ((-((*__LONG_T& 511 )== 64 ))||new_error){ if(qbevent){evnt(8146);if(r)goto S_9126;} do{ qbs_set(__STRING_C,qbs_add(__STRING_C,qbs_new_txt_len("DOUBLE",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8146);}while(r); } S_9129:; if ((-((*__LONG_T& 511 )== 256 ))||new_error){ if(qbevent){evnt(8147);if(r)goto S_9129;} do{ qbs_set(__STRING_C,qbs_add(__STRING_C,qbs_new_txt_len("FLOAT",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8147);}while(r); } }else{ do{ qbs_set(__STRING_C,qbs_add(__STRING_C,FUNC_STR2(&(pass1199=(*__LONG_T& 511 )/ 8 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8149);}while(r); } } do{ qbs_set(__STRING_C,qbs_add(__STRING_C,qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8152);}while(r); S_9137:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(8153);if(r)goto S_9137;} do{ qbs_set(__STRING_C,qbs_add(qbs_add(qbs_add(__STRING_C,qbs_new_txt_len("(mem_block*)",12)),__STRING_BLKOFFS),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8153);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1200; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_C,__STRING_OFFS),qbs_new_txt_len(",",1)),__STRING_BYTES),qbs_new_txt_len(",",1)),__STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1200; skip1200: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8154);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8157);}while(r); S_9143:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8157);if(r)goto S_9143;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8157);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8157);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8158);}while(r); } } do{ *__LONG_CISPECIAL= 0 ; if(!qbevent)break;evnt(8176);}while(r); S_9152:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8177);if(r)goto S_9152;} S_9153:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("INTERRUPT",9)))|(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("INTERRUPTX",10)))))||new_error){ if(qbevent){evnt(8178);if(r)goto S_9153;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CALL",4),__STRING1_SP),__STRING_FIRSTELEMENT),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),FUNC_GETELEMENTS(__STRING_A,&(pass1202= 2 ),__LONG_N)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8179);}while(r); do{ qbs_set(__STRING_CA,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CALL",4),__STRING1_SP),__STRING_FIRSTELEMENT),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass1203= 2 ),__LONG_N)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8180);}while(r); do{ *__LONG_N=*__LONG_N+ 3 ; if(!qbevent)break;evnt(8181);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,qbs_new_txt_len("CALL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8182);}while(r); do{ *__LONG_CISPECIAL= 1 ; if(!qbevent)break;evnt(8183);}while(r); } } do{ *__LONG_USECALL= 0 ; if(!qbevent)break;evnt(8188);}while(r); S_9162:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CALL",4))))||new_error){ if(qbevent){evnt(8189);if(r)goto S_9162;} do{ *__LONG_USECALL= 1 ; if(!qbevent)break;evnt(8190);}while(r); S_9164:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(8191);if(r)goto S_9164;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name [(...)]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8191);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8191);}while(r); } do{ qbs_set(__STRING_CN,FUNC_GETELEMENT(__STRING_CA,&(pass1204= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8192);}while(r); do{ qbs_set(__STRING_N,qbs_ucase(__STRING_CN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8192);}while(r); S_9170:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(8194);if(r)goto S_9170;} S_9171:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(8196);if(r)goto S_9171;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name (...)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8196);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8196);}while(r); } S_9175:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1205= 3 )),qbs_new_txt_len("(",1)))|(qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_N),qbs_new_txt_len(")",1)))))||new_error){ if(qbevent){evnt(8197);if(r)goto S_9175;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name (...)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8197);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8197);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_add(__STRING_N,__STRING1_SP),FUNC_GETELEMENTS(__STRING_A,&(pass1206= 4 ),&(pass1207=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8198);}while(r); do{ qbs_set(__STRING_CA,qbs_add(qbs_add(__STRING_CN,__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass1208= 4 ),&(pass1209=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8199);}while(r); S_9181:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_N,qbs_new_txt_len("INTERRUPT",9)))|(qbs_equal(__STRING_N,qbs_new_txt_len("INTERRUPTX",10)))))||new_error){ if(qbevent){evnt(8202);if(r)goto S_9181;} S_9182:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_N,qbs_new_txt_len("INTERRUPT",9))))||new_error){ if(qbevent){evnt(8204);if(r)goto S_9182;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1210; sub_file_print(tmp_fileno,qbs_new_txt_len("call_interrupt(",15), 0 , 0 , 0 ); if (new_error) goto skip1210; skip1210: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8204);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1211; sub_file_print(tmp_fileno,qbs_new_txt_len("call_interruptx(",16), 0 , 0 , 0 ); if (new_error) goto skip1211; skip1211: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8204);}while(r); } do{ *__LONG_ARGN= 0 ; if(!qbevent)break;evnt(8205);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8206);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8207);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8208);}while(r); S_9191:; fornext_value1213= 2 ; fornext_finalvalue1213=*__LONG_N; fornext_step1213= 1 ; if (fornext_step1213<0) fornext_step_negative1213=1; else fornext_step_negative1213=0; if (new_error) goto fornext_error1213; goto fornext_entrylabel1213; while(1){ fornext_value1213=fornext_step1213+(*__LONG_I); fornext_entrylabel1213: *__LONG_I=fornext_value1213; if (fornext_step_negative1213){ if (fornext_value1213fornext_finalvalue1213) break; } fornext_error1213:; if(qbevent){evnt(8209);if(r)goto S_9191;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8210);}while(r); S_9193:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8211);if(r)goto S_9193;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8211);}while(r); } S_9196:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8212);if(r)goto S_9196;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8212);}while(r); } S_9199:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))|(-(*__LONG_I==*__LONG_N))))||new_error){ if(qbevent){evnt(8213);if(r)goto S_9199;} S_9200:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(8214);if(r)goto S_9200;} S_9201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8215);if(r)goto S_9201;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8215);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8215);}while(r); } } do{ *__LONG_ARGN=*__LONG_ARGN+ 1 ; if(!qbevent)break;evnt(8217);}while(r); S_9208:; if ((-(*__LONG_ARGN== 1 ))||new_error){ if(qbevent){evnt(8218);if(r)goto S_9208;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8219);}while(r); S_9210:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8220);if(r)goto S_9210;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8220);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CALL",4),__STRING1_SP),__STRING_N),__STRING1_SP2),qbs_new_txt_len("(",1)),__STRING1_SP2),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8221);}while(r); S_9214:; if ((-(*__LONG_CISPECIAL== 1 ))||new_error){ if(qbevent){evnt(8222);if(r)goto S_9214;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_N,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8222);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1214= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8223);}while(r); S_9218:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8224);if(r)goto S_9218;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8224);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1215; sub_file_print(tmp_fileno,__STRING_E, 0 , 0 , 0 ); if (new_error) goto skip1215; skip1215: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8226);}while(r); } S_9223:; if (((-(*__LONG_ARGN== 2 ))|(-(*__LONG_ARGN== 3 )))||new_error){ if(qbevent){evnt(8228);if(r)goto S_9223;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8229);}while(r); S_9225:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8230);if(r)goto S_9225;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8230);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8231);}while(r); do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8232);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1216= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8233);}while(r); S_9231:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8234);if(r)goto S_9231;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8234);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1217; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len(",",1),__STRING_E), 0 , 0 , 0 ); if (new_error) goto skip1217; skip1217: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8236);}while(r); } do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8238);}while(r); }else{ S_9238:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8240);if(r)goto S_9238;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8240);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8240);}while(r); } } } fornext_exit_1212:; S_9245:; if ((-(*__LONG_ARGN!= 3 ))||new_error){ if(qbevent){evnt(8243);if(r)goto S_9245;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL INTERRUPT (interrupt-no, inregs, outregs)",55)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8243);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8243);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1218; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip1218; skip1218: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8244);}while(r); S_9250:; if ((-(*__LONG_CISPECIAL== 0 ))||new_error){ if(qbevent){evnt(8245);if(r)goto S_9250;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8245);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8246);}while(r); S_9254:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8246);if(r)goto S_9254;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8246);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8246);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8248);}while(r); } S_9261:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_N,qbs_new_txt_len("ABSOLUTE",8))))||new_error){ if(qbevent){evnt(8259);if(r)goto S_9261;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CALL",4),__STRING1_SP),qbs_new_txt_len("ABSOLUTE",8)),__STRING1_SP2),qbs_new_txt_len("(",1)),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8260);}while(r); do{ *__LONG_ARGN= 0 ; if(!qbevent)break;evnt(8261);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8262);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8263);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8264);}while(r); S_9267:; fornext_value1221= 2 ; fornext_finalvalue1221=*__LONG_N; fornext_step1221= 1 ; if (fornext_step1221<0) fornext_step_negative1221=1; else fornext_step_negative1221=0; if (new_error) goto fornext_error1221; goto fornext_entrylabel1221; while(1){ fornext_value1221=fornext_step1221+(*__LONG_I); fornext_entrylabel1221: *__LONG_I=fornext_value1221; if (fornext_step_negative1221){ if (fornext_value1221fornext_finalvalue1221) break; } fornext_error1221:; if(qbevent){evnt(8265);if(r)goto S_9267;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8266);}while(r); S_9269:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8267);if(r)goto S_9269;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8267);}while(r); } S_9272:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8268);if(r)goto S_9272;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8268);}while(r); } S_9275:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))|(-(*__LONG_I==*__LONG_N))))||new_error){ if(qbevent){evnt(8269);if(r)goto S_9275;} S_9276:; if ((-(*__LONG_I<*__LONG_N))||new_error){ if(qbevent){evnt(8270);if(r)goto S_9276;} S_9277:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8271);if(r)goto S_9277;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected expression before , or )",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8271);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8271);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8273);}while(r); S_9282:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8274);if(r)goto S_9282;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8274);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8275);}while(r); do{ qbs_set(__STRING_IGNORE,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8276);}while(r); S_9287:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8277);if(r)goto S_9287;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8277);}while(r); } S_9290:; if (((-((*__LONG_TYP&*__LONG_ISPOINTER)!= 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(8279);if(r)goto S_9290;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("VARPTR",6),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),__STRING_E),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8283);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1222=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8284);}while(r); S_9293:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8285);if(r)goto S_9293;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8285);}while(r); } }else{ S_9297:; if ((*__LONG_TYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(8291);if(r)goto S_9297;} S_9298:; if ((-((*__LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(8292);if(r)goto S_9298;} do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1223=*__LONG_SINGLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8293);}while(r); S_9300:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8294);if(r)goto S_9300;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8294);}while(r); } do{ qbs_set(__STRING_V,qbs_add(qbs_new_txt_len("pass",4),FUNC_STR2(&(pass1224=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8295);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip1225; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("float *",7),__STRING_V),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip1225; skip1225: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8296);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1226; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),__STRING_V),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip1226; skip1226: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8297);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1227; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=4;",11), 0 , 0 , 1 ); if (new_error) goto skip1227; skip1227: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8298);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1228; sub_file_print(tmp_fileno,qbs_add(__STRING_V,qbs_new_txt_len("=(float*)(dblock+cmem_sp);",26)), 0 , 0 , 1 ); if (new_error) goto skip1228; skip1228: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8299);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1229; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen))||new_error){ if(qbevent){evnt(8346);if(r)goto S_9369;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8346);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8346);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8347);}while(r); } }else{ do{ qbs_set(__STRING_A,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8352);}while(r); do{ qbs_set(__STRING_CA,__STRING_CN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8353);}while(r); do{ *__LONG_USECALL= 2 ; if(!qbevent)break;evnt(8354);}while(r); } do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8358);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass1251= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8359);}while(r); do{ *__LONG_VALIDSUB= 0 ; if(!qbevent)break;evnt(8362);}while(r); do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8363);}while(r); S_9385:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(8363);if(r)goto S_9385;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1252= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8363);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8364);}while(r); S_9389:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8365);if(r)goto S_9389;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8365);}while(r); } S_9392:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(8366);if(r)goto S_9392;} S_9393:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(8367);if(r)goto S_9393;} do{ *__LONG_VALIDSUB= 1 ; if(!qbevent)break;evnt(8367);}while(r); do{ goto dl_exit_1253; if(!qbevent)break;evnt(8367);}while(r); } S_9397:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(8368);if(r)goto S_9397;} do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8369);}while(r); S_9399:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(8369);if(r)goto S_9399;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1254= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8369);}while(r); } do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(8370);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8371);}while(r); S_9404:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8372);if(r)goto S_9404;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8372);}while(r); } }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(8374);}while(r); } } dl_exit_1253:; S_9411:; if ((-(*__LONG_VALIDSUB== 0 ))||new_error){ if(qbevent){evnt(8377);if(r)goto S_9411;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name [(...)]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8377);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8377);}while(r); } } S_9416:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(8381);if(r)goto S_9416;} S_9417:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(8383);if(r)goto S_9417;} do{ qbs_set(__STRING_FIRSTELEMENT,qbs_new_txt_len("PRINT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8383);}while(r); } do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8385);}while(r); S_9421:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(8385);if(r)goto S_9421;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1255= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8385);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8386);}while(r); S_9425:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8387);if(r)goto S_9425;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8387);}while(r); } S_9428:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(8388);if(r)goto S_9428;} S_9429:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(8389);if(r)goto S_9429;} do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(qbs_add(__STRING_FIRSTELEMENT,qbs_new_txt_len("",0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8392);}while(r); S_9431:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8393);if(r)goto S_9431;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8393);}while(r); } S_9434:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))== 36 )))||new_error){ if(qbevent){evnt(8394);if(r)goto S_9434;} S_9435:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(8395);if(r)goto S_9435;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(8395);}while(r); } }else{ S_9439:; if ((qbs_cleanup(qbs_tmp_base,__STRING_S->len))||new_error){ if(qbevent){evnt(8397);if(r)goto S_9439;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(8397);}while(r); } } S_9443:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8400);if(r)goto S_9443;} S_9444:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1))!= 61 )))||new_error){ if(qbevent){evnt(8401);if(r)goto S_9444;} S_9445:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(FUNC_GETELEMENT(__STRING_A,&(pass1258= 2 )))== 61 )))||new_error){ if(qbevent){evnt(8402);if(r)goto S_9445;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(8402);}while(r); } } } S_9450:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(8406);if(r)goto S_9450;} S_9451:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1259= 2 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8407);if(r)goto S_9451;} do{ *__LONG_B= 1 ; if(!qbevent)break;evnt(8408);}while(r); S_9453:; fornext_value1261= 3 ; fornext_finalvalue1261=*__LONG_N; fornext_step1261= 1 ; if (fornext_step1261<0) fornext_step_negative1261=1; else fornext_step_negative1261=0; if (new_error) goto fornext_error1261; goto fornext_entrylabel1261; while(1){ fornext_value1261=fornext_step1261+(*__LONG_I); fornext_entrylabel1261: *__LONG_I=fornext_value1261; if (fornext_step_negative1261){ if (fornext_value1261fornext_finalvalue1261) break; } fornext_error1261:; if(qbevent){evnt(8409);if(r)goto S_9453;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8410);}while(r); S_9455:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8411);if(r)goto S_9455;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8411);}while(r); } S_9458:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8412);if(r)goto S_9458;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8413);}while(r); S_9460:; if ((-(*__LONG_B== 0 ))||new_error){ if(qbevent){evnt(8414);if(r)goto S_9460;} S_9461:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(8415);if(r)goto S_9461;} do{ goto fornext_exit_1260; if(!qbevent)break;evnt(8415);}while(r); } S_9464:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1262=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(8416);if(r)goto S_9464;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(8416);}while(r); } } } } fornext_exit_1260:; } } S_9472:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(8423);if(r)goto S_9472;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot call SUB _GL directly",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8423);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8423);}while(r); } S_9476:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("OPEN",4))))||new_error){ if(qbevent){evnt(8425);if(r)goto S_9476;} do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8427);}while(r); S_9478:; fornext_value1264= 2 ; fornext_finalvalue1264=*__LONG_N; fornext_step1264= 1 ; if (fornext_step1264<0) fornext_step_negative1264=1; else fornext_step_negative1264=0; if (new_error) goto fornext_error1264; goto fornext_entrylabel1264; while(1){ fornext_value1264=fornext_step1264+(*__LONG_X); fornext_entrylabel1264: *__LONG_X=fornext_value1264; if (fornext_step_negative1264){ if (fornext_value1264fornext_finalvalue1264) break; } fornext_error1264:; if(qbevent){evnt(8428);if(r)goto S_9478;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8429);}while(r); S_9480:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8430);if(r)goto S_9480;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8430);}while(r); } S_9483:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8431);if(r)goto S_9483;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8431);}while(r); } S_9486:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len("FOR",3)))|(qbs_equal(__STRING_A2,qbs_new_txt_len("AS",2)))))||new_error){ if(qbevent){evnt(8432);if(r)goto S_9486;} do{ goto fornext_exit_1263; if(!qbevent)break;evnt(8432);}while(r); } S_9489:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_B== 0 ))&(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(8433);if(r)goto S_9489;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(8434);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8435);}while(r); S_9492:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8436);if(r)goto S_9492;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8436);}while(r); } do{ goto fornext_exit_1263; if(!qbevent)break;evnt(8437);}while(r); } } fornext_exit_1263:; } S_9499:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CLOSE",5)))|(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RESET",5)))))||new_error){ if(qbevent){evnt(8447);if(r)goto S_9499;} S_9500:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RESET",5))))||new_error){ if(qbevent){evnt(8448);if(r)goto S_9500;} S_9501:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8449);if(r)goto S_9501;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8449);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8449);}while(r); } } do{ qbs_set(__STRING_L,__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8451);}while(r); S_9507:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(8452);if(r)goto S_9507;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1265; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_close(NULL,0);",18), 0 , 0 , 1 ); if (new_error) goto skip1265; skip1265: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8453);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8455);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8456);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(8457);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8458);}while(r); S_9514:; fornext_value1267= 2 ; fornext_finalvalue1267=*__LONG_N; fornext_step1267= 1 ; if (fornext_step1267<0) fornext_step_negative1267=1; else fornext_step_negative1267=0; if (new_error) goto fornext_error1267; goto fornext_entrylabel1267; while(1){ fornext_value1267=fornext_step1267+(*__LONG_X); fornext_entrylabel1267: *__LONG_X=fornext_value1267; if (fornext_step_negative1267){ if (fornext_value1267fornext_finalvalue1267) break; } fornext_error1267:; if(qbevent){evnt(8459);if(r)goto S_9514;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8460);}while(r); S_9516:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8461);if(r)goto S_9516;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8461);}while(r); } S_9519:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8462);if(r)goto S_9519;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8462);}while(r); } S_9522:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len("#",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8463);if(r)goto S_9522;} S_9523:; if ((-(*__LONG_S== 0 ))||new_error){ if(qbevent){evnt(8464);if(r)goto S_9523;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(8464);}while(r); }else{ do{ qbs_set(__STRING_A,qbs_new_txt_len("Unexpected #",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8464);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8464);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,qbs_new_txt_len("#",1)),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8465);}while(r); do{ goto LABEL_CLOSENEXTA; if(!qbevent)break;evnt(8466);}while(r); } S_9532:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8469);if(r)goto S_9532;} S_9533:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(8470);if(r)goto S_9533;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8471);}while(r); S_9535:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8472);if(r)goto S_9535;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8472);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8473);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1268= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8474);}while(r); S_9540:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8475);if(r)goto S_9540;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8475);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1269; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_close(",10),__STRING_E),qbs_new_txt_len(",1);",4)), 0 , 0 , 1 ); if (new_error) goto skip1269; skip1269: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8476);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8477);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(8478);}while(r); do{ goto LABEL_CLOSENEXTA; if(!qbevent)break;evnt(8479);}while(r); }else{ do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected expression before ,",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8481);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8481);}while(r); } } do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(8485);}while(r); S_9553:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8486);if(r)goto S_9553;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8486);}while(r); }else{ do{ qbs_set(__STRING_A3,qbs_add(qbs_add(__STRING_A3,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8486);}while(r); } LABEL_CLOSENEXTA:; if(qbevent){evnt(8488);r=0;} } fornext_exit_1266:; S_9559:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(8491);if(r)goto S_9559;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8492);}while(r); S_9561:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8493);if(r)goto S_9561;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8493);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8494);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1270= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8495);}while(r); S_9566:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8496);if(r)goto S_9566;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8496);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1271; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_close(",10),__STRING_E),qbs_new_txt_len(",1);",4)), 0 , 0 , 1 ); if (new_error) goto skip1271; skip1271: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8497);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_left(__STRING_L,__STRING_L->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8499);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8503);}while(r); S_9575:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8503);if(r)goto S_9575;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8503);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8503);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8504);}while(r); } S_9582:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("READ",4))))||new_error){ if(qbevent){evnt(8523);if(r)goto S_9582;} do{ SUB_XREAD(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8524);}while(r); S_9584:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8525);if(r)goto S_9584;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8525);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8527);}while(r); } do{ *__LONG_LINEINPUT= 0 ; if(!qbevent)break;evnt(8566);}while(r); S_9590:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(8567);if(r)goto S_9590;} S_9591:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LINE",4)))&(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("INPUT",5)))))||new_error){ if(qbevent){evnt(8568);if(r)goto S_9591;} do{ *__LONG_LINEINPUT= 1 ; if(!qbevent)break;evnt(8569);}while(r); do{ qbs_set(__STRING_A,qbs_right(__STRING_A,__STRING_A->len- 5 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8570);}while(r); do{ qbs_set(__STRING_CA,qbs_right(__STRING_CA,__STRING_CA->len- 5 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8570);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(8570);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,qbs_new_txt_len("INPUT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8571);}while(r); } } S_9599:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("INPUT",5))))||new_error){ if(qbevent){evnt(8575);if(r)goto S_9599;} S_9600:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8576);if(r)goto S_9600;} S_9601:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1276= 2 )),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(8577);if(r)goto S_9601;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("INPUT",5),__STRING1_SP),qbs_new_txt_len("#",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8578);}while(r); S_9603:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8578);if(r)goto S_9603;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("LINE",4),__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8578);}while(r); } do{ qbs_set(__STRING_U,FUNC_STR2(&(pass1277=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8580);}while(r); S_9607:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(8582);if(r)goto S_9607;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8582);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8582);}while(r); } do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8583);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8584);}while(r); S_9613:; fornext_value1279= 3 ; fornext_finalvalue1279=*__LONG_N; fornext_step1279= 1 ; if (fornext_step1279<0) fornext_step_negative1279=1; else fornext_step_negative1279=0; if (new_error) goto fornext_error1279; goto fornext_entrylabel1279; while(1){ fornext_value1279=fornext_step1279+(*__LONG_I); fornext_entrylabel1279: *__LONG_I=fornext_value1279; if (fornext_step_negative1279){ if (fornext_value1279fornext_finalvalue1279) break; } fornext_error1279:; if(qbevent){evnt(8585);if(r)goto S_9613;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8586);}while(r); S_9615:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8587);if(r)goto S_9615;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8587);}while(r); } S_9618:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8588);if(r)goto S_9618;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8588);}while(r); } S_9621:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8589);if(r)goto S_9621;} S_9622:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8590);if(r)goto S_9622;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8590);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8590);}while(r); } do{ goto LABEL_INPUTGOTFN; if(!qbevent)break;evnt(8591);}while(r); } S_9628:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8593);if(r)goto S_9628;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8593);}while(r); }else{ do{ qbs_set(__STRING_A3,qbs_add(qbs_add(__STRING_A3,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8593);}while(r); } } fornext_exit_1278:; LABEL_INPUTGOTFN:; if(qbevent){evnt(8595);r=0;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8596);}while(r); S_9635:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8597);if(r)goto S_9635;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8597);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8598);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1280= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8599);}while(r); S_9640:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8600);if(r)goto S_9640;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8600);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1281; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_fileno=",11),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1281; skip1281: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8601);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1282; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1282; skip1282: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8602);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8603);}while(r); S_9646:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(8604);if(r)goto S_9646;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8604);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8604);}while(r); } do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8605);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8606);}while(r); S_9652:; fornext_value1284=*__LONG_I; fornext_finalvalue1284=*__LONG_N; fornext_step1284= 1 ; if (fornext_step1284<0) fornext_step_negative1284=1; else fornext_step_negative1284=0; if (new_error) goto fornext_error1284; goto fornext_entrylabel1284; while(1){ fornext_value1284=fornext_step1284+(*__LONG_I); fornext_entrylabel1284: *__LONG_I=fornext_value1284; if (fornext_step_negative1284){ if (fornext_value1284fornext_finalvalue1284) break; } fornext_error1284:; if(qbevent){evnt(8607);if(r)goto S_9652;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8608);}while(r); S_9654:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8609);if(r)goto S_9654;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8609);}while(r); } S_9657:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8610);if(r)goto S_9657;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8610);}while(r); } S_9660:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(8611);if(r)goto S_9660;} S_9661:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8612);if(r)goto S_9661;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8612);}while(r); }else{ do{ qbs_set(__STRING_A3,qbs_add(qbs_add(__STRING_A3,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8612);}while(r); } do{ qbs_set(__STRING_A2,qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8613);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8613);}while(r); } S_9669:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8615);if(r)goto S_9669;} S_9670:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8616);if(r)goto S_9670;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8616);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8616);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8617);}while(r); S_9675:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8618);if(r)goto S_9675;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8618);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8619);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8620);}while(r); S_9680:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8621);if(r)goto S_9680;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8621);}while(r); } S_9683:; if ((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(8622);if(r)goto S_9683;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable-name",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8622);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8622);}while(r); } S_9687:; if (((*__LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(8623);if(r)goto S_9687;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_T,&(pass1285= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8624);}while(r); S_9689:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8625);if(r)goto S_9689;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8625);}while(r); } S_9692:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8626);if(r)goto S_9692;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1286; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_file_line_input_string(tmp_fileno,",38),__STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1286; skip1286: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8627);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1287; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1287; skip1287: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8628);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1288; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_file_input_string(tmp_fileno,",33),__STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1288; skip1288: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8630);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1289; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1289; skip1289: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8631);}while(r); } do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(8633);}while(r); }else{ S_9701:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8635);if(r)goto S_9701;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string-variable",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8635);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8635);}while(r); } S_9705:; if (((-((*__LONG_T&*__LONG_ISFLOAT)!= 0 ))|(-((*__LONG_T& 511 )!= 64 )))||new_error){ if(qbevent){evnt(8638);if(r)goto S_9705;} S_9706:; if (((*__LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(8639);if(r)goto S_9706;} do{ SUB_SETREFER(__STRING_E,__LONG_T,qbs_add(qbs_add(qbs_new_txt_len("((int64)func_file_input_float(tmp_fileno,",41),FUNC_STR2(__LONG_T)),qbs_new_txt_len("))",2)),&(pass1290= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8640);}while(r); S_9708:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8641);if(r)goto S_9708;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8641);}while(r); } }else{ do{ SUB_SETREFER(__STRING_E,__LONG_T,qbs_add(qbs_add(qbs_new_txt_len("func_file_input_float(tmp_fileno,",33),FUNC_STR2(__LONG_T)),qbs_new_txt_len(")",1)),&(pass1291= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8643);}while(r); S_9713:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8644);if(r)goto S_9713;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8644);}while(r); } } }else{ S_9718:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(8647);if(r)goto S_9718;} do{ SUB_SETREFER(__STRING_E,__LONG_T,qbs_new_txt_len("func_file_input_uint64(tmp_fileno)",34),&(pass1292= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8648);}while(r); S_9720:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8649);if(r)goto S_9720;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8649);}while(r); } }else{ do{ SUB_SETREFER(__STRING_E,__LONG_T,qbs_new_txt_len("func_file_input_int64(tmp_fileno)",33),&(pass1293= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8651);}while(r); S_9725:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8652);if(r)goto S_9725;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8652);}while(r); } } } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1294; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1294; skip1294: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8656);}while(r); } S_9732:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(8659);if(r)goto S_9732;} do{ goto fornext_exit_1283; if(!qbevent)break;evnt(8659);}while(r); } S_9735:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8660);if(r)goto S_9735;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many variables",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8660);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8660);}while(r); } do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8661);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8661);}while(r); } S_9742:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8663);if(r)goto S_9742;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8663);}while(r); }else{ do{ qbs_set(__STRING_A3,qbs_add(qbs_add(__STRING_A3,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8663);}while(r); } } fornext_exit_1283:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1295; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip",4),__STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip1295; skip1295: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8665);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1296; sub_file_print(tmp_fileno,qbs_new_txt_len("revert_input_check();",21), 0 , 0 , 1 ); if (new_error) goto skip1296; skip1296: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8666);}while(r); S_9750:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(8667);if(r)goto S_9750;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1297; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip1297; skip1297: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8667);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8668);}while(r); S_9754:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8668);if(r)goto S_9754;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8668);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8668);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8669);}while(r); } } } S_9763:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("INPUT",5))))||new_error){ if(qbevent){evnt(8675);if(r)goto S_9763;} do{ qbs_set(__STRING_L,qbs_new_txt_len("INPUT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8676);}while(r); S_9765:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8676);if(r)goto S_9765;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_new_txt_len("LINE",4),__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8676);}while(r); } do{ *__LONG_COMMANEEDED= 0 ; if(!qbevent)break;evnt(8677);}while(r); do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(8678);}while(r); do{ *__LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(8680);}while(r); S_9771:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(8680);if(r)goto S_9771;} do{ *__LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(8680);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8680);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8680);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8682);}while(r); S_9777:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_A2, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(8683);if(r)goto S_9777;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8684);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8684);}while(r); S_9780:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8685);if(r)goto S_9780;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8685);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1299; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_print(qbs_new_txt_len(",26),__STRING_A2),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1299; skip1299: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8686);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8687);}while(r); do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8689);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8690);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8691);}while(r); S_9788:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(8692);if(r)goto S_9788;} S_9789:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8693);if(r)goto S_9789;} do{ goto LABEL_FINISHEDPROMPTSTRING; if(!qbevent)break;evnt(8693);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1300; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_print(qbs_new_txt(",22),func_chr( 34 )),qbs_new_txt_len("? ",2)),func_chr( 34 )),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1300; skip1300: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8694);}while(r); do{ goto LABEL_FINISHEDPROMPTSTRING; if(!qbevent)break;evnt(8695);}while(r); } S_9795:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(8697);if(r)goto S_9795;} do{ goto LABEL_FINISHEDPROMPTSTRING; if(!qbevent)break;evnt(8698);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("INPUT STATEMENT: SYNTAX ERROR!",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8700);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8700);}while(r); } S_9801:; if ((-(*__LONG_LINEINPUT== 0 ))||new_error){ if(qbevent){evnt(8703);if(r)goto S_9801;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1301; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_print(qbs_new_txt(",22),func_chr( 34 )),qbs_new_txt_len("? ",2)),func_chr( 34 )),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1301; skip1301: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8703);}while(r); } LABEL_FINISHEDPROMPTSTRING:; if(qbevent){evnt(8704);r=0;} do{ *__LONG_NUMVAR= 0 ; if(!qbevent)break;evnt(8705);}while(r); S_9805:; fornext_value1303=*__LONG_I; fornext_finalvalue1303=*__LONG_N; fornext_step1303= 1 ; if (fornext_step1303<0) fornext_step_negative1303=1; else fornext_step_negative1303=0; if (new_error) goto fornext_error1303; goto fornext_entrylabel1303; while(1){ fornext_value1303=fornext_step1303+(*__LONG_I); fornext_entrylabel1303: *__LONG_I=fornext_value1303; if (fornext_step_negative1303){ if (fornext_value1303fornext_finalvalue1303) break; } fornext_error1303:; if(qbevent){evnt(8706);if(r)goto S_9805;} S_9806:; if ((-(*__LONG_COMMANEEDED== 1 ))||new_error){ if(qbevent){evnt(8707);if(r)goto S_9806;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8708);}while(r); S_9808:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(8709);if(r)goto S_9808;} do{ qbs_set(__STRING_A,qbs_new_txt_len("INPUT STATEMENT: SYNTAX ERROR! (COMMA EXPECTED)",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8709);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8709);}while(r); } }else{ do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8712);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8713);}while(r); S_9815:; fornext_value1305=*__LONG_I; fornext_finalvalue1305=*__LONG_N; fornext_step1305= 1 ; if (fornext_step1305<0) fornext_step_negative1305=1; else fornext_step_negative1305=0; if (new_error) goto fornext_error1305; goto fornext_entrylabel1305; while(1){ fornext_value1305=fornext_step1305+(*__LONG_I2); fornext_entrylabel1305: *__LONG_I2=fornext_value1305; if (fornext_step_negative1305){ if (fornext_value1305fornext_finalvalue1305) break; } fornext_error1305:; if(qbevent){evnt(8714);if(r)goto S_9815;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8715);}while(r); S_9817:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8716);if(r)goto S_9817;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8716);}while(r); } S_9820:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8717);if(r)goto S_9820;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8717);}while(r); } S_9823:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8718);if(r)goto S_9823;} do{ *__LONG_I2=*__LONG_I2- 1 ; if(!qbevent)break;evnt(8718);}while(r); do{ goto fornext_exit_1304; if(!qbevent)break;evnt(8718);}while(r); } do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8719);}while(r); } fornext_exit_1304:; do{ *__LONG_I=*__LONG_I2; if(!qbevent)break;evnt(8721);}while(r); S_9830:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(8721);if(r)goto S_9830;} do{ *__LONG_I=*__LONG_N; if(!qbevent)break;evnt(8721);}while(r); } S_9833:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8722);if(r)goto S_9833;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8722);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8722);}while(r); } do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8723);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8724);}while(r); S_9839:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8725);if(r)goto S_9839;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8725);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8726);}while(r); S_9843:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(8726);if(r)goto S_9843;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8726);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8727);}while(r); S_9847:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8728);if(r)goto S_9847;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8728);}while(r); } S_9850:; if ((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(8729);if(r)goto S_9850;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8729);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8729);}while(r); } S_9854:; if (((*__LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(8731);if(r)goto S_9854;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_T,&(pass1307= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8732);}while(r); S_9856:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8733);if(r)goto S_9856;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8733);}while(r); } do{ *__LONG_NUMVAR=*__LONG_NUMVAR+ 1 ; if(!qbevent)break;evnt(8734);}while(r); S_9860:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8735);if(r)goto S_9860;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1308; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_input_variabletypes[",24),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len("]=ISSTRING+512;",15)), 0 , 0 , 1 ); if (new_error) goto skip1308; skip1308: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8736);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1309; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_input_variabletypes[",24),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len("]=ISSTRING;",11)), 0 , 0 , 1 ); if (new_error) goto skip1309; skip1309: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8738);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1310; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_input_variableoffsets[",26),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len("]=",2)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1310; skip1310: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8740);}while(r); do{ goto LABEL_GOTINPUTVAR; if(!qbevent)break;evnt(8741);}while(r); } S_9868:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(8744);if(r)goto S_9868;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string variable",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8744);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8744);}while(r); } S_9872:; if (((*__LONG_T&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(8745);if(r)goto S_9872;} S_9873:; if (((*__LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(8746);if(r)goto S_9873;} do{ qbs_set(__STRING_A,qbs_new_txt_len("INPUT cannot handle BIT array elements yet",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8747);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8747);}while(r); } } do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("&(",2),FUNC_REFER(__STRING_E,__LONG_T,&(pass1311= 0 ))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8750);}while(r); S_9879:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8751);if(r)goto S_9879;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8751);}while(r); } S_9882:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(8754);if(r)goto S_9882;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(8754);}while(r); } S_9885:; if (((*__LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(8755);if(r)goto S_9885;} do{ *__LONG_T=*__LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(8755);}while(r); } S_9888:; if (((*__LONG_T&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(8756);if(r)goto S_9888;} do{ *__LONG_T=*__LONG_T-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(8756);}while(r); } do{ *__LONG_NUMVAR=*__LONG_NUMVAR+ 1 ; if(!qbevent)break;evnt(8767);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1312; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_input_variabletypes[",24),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len("]=",2)),FUNC_STR2(__LONG_T)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1312; skip1312: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8768);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1313; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_input_variableoffsets[",26),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len("]=",2)),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1313; skip1313: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8769);}while(r); do{ goto LABEL_GOTINPUTVAR; if(!qbevent)break;evnt(8770);}while(r); } LABEL_GOTINPUTVAR:; if(qbevent){evnt(8773);r=0;} do{ *__LONG_COMMANEEDED=*__LONG_COMMANEEDED+ 1 ; if(!qbevent)break;evnt(8774);}while(r); S_9897:; if ((-(*__LONG_COMMANEEDED== 2 ))||new_error){ if(qbevent){evnt(8774);if(r)goto S_9897;} do{ *__LONG_COMMANEEDED= 0 ; if(!qbevent)break;evnt(8774);}while(r); } } fornext_exit_1302:; S_9901:; if ((-(*__LONG_NUMVAR== 0 ))||new_error){ if(qbevent){evnt(8776);if(r)goto S_9901;} do{ qbs_set(__STRING_A,qbs_new_txt_len("INPUT STATEMENT: SYNTAX ERROR! (NO VARIABLES LISTED FOR INPUT)",62)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8776);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8776);}while(r); } S_9905:; if (((-(*__LONG_LINEINPUT== 1 ))&(-(*__LONG_NUMVAR> 1 )))||new_error){ if(qbevent){evnt(8777);if(r)goto S_9905;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many variables",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8777);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8777);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1314; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_input(",10),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len(",",1)),FUNC_STR2(__LONG_NEWLINE)),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1314; skip1314: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8778);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1315; sub_file_print(tmp_fileno,qbs_new_txt_len("if (stop_program) end();",24), 0 , 0 , 1 ); if (new_error) goto skip1315; skip1315: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8779);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1316; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip1316; skip1316: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8780);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8781);}while(r); S_9913:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8781);if(r)goto S_9913;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8781);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8781);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8782);}while(r); } S_9920:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WRITE",5))))||new_error){ if(qbevent){evnt(8787);if(r)goto S_9920;} S_9921:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8788);if(r)goto S_9921;} S_9922:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1318= 2 )),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(8789);if(r)goto S_9922;} do{ SUB_XFILEWRITE(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8790);}while(r); S_9924:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8791);if(r)goto S_9924;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8791);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8792);}while(r); } } } S_9931:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WRITE",5))))||new_error){ if(qbevent){evnt(8797);if(r)goto S_9931;} do{ SUB_XWRITE(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8798);}while(r); S_9933:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8799);if(r)goto S_9933;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8799);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8800);}while(r); } S_9938:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("PRINT",5))))||new_error){ if(qbevent){evnt(8803);if(r)goto S_9938;} S_9939:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8804);if(r)goto S_9939;} S_9940:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1319= 2 )),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(8805);if(r)goto S_9940;} do{ SUB_XFILEPRINT(__STRING_A,__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8806);}while(r); S_9942:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8807);if(r)goto S_9942;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8807);}while(r); } do{ qbs_set(__STRING_L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8808);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8809);}while(r); S_9947:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8809);if(r)goto S_9947;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8809);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8809);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8810);}while(r); } } } S_9956:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("PRINT",5)))|(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LPRINT",6)))))||new_error){ if(qbevent){evnt(8815);if(r)goto S_9956;} do{ SUB_XPRINT(__STRING_A,__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8816);}while(r); S_9958:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8817);if(r)goto S_9958;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8817);}while(r); } do{ qbs_set(__STRING_L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8818);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8819);}while(r); S_9963:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8819);if(r)goto S_9963;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8819);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8819);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8820);}while(r); } S_9970:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CLEAR",5))))||new_error){ if(qbevent){evnt(8823);if(r)goto S_9970;} S_9971:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8824);if(r)goto S_9971;} do{ qbs_set(__STRING_A,qbs_new_txt_len("CLEAR cannot be used inside a SUB/FUNCTION",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8824);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8824);}while(r); } } S_9976:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LSET",4)))|(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RSET",4)))))||new_error){ if(qbevent){evnt(8828);if(r)goto S_9976;} S_9977:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(8829);if(r)goto S_9977;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_FIRSTELEMENT),qbs_new_txt_len(" ...",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8829);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8829);}while(r); } do{ qbs_set(__STRING_L,__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8830);}while(r); do{ qbs_set(__STRING_DEST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8831);}while(r); do{ qbs_set(__STRING_SOURCE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8832);}while(r); do{ *__LONG_PART= 1 ; if(!qbevent)break;evnt(8833);}while(r); do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(8834);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8835);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8836);}while(r); S_9988:; do{ if(qbevent){evnt(8837);if(r)goto S_9988;} S_9989:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(8838);if(r)goto S_9989;} S_9990:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_PART!= 2 ))|(qbs_equal(__STRING_A3,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(8839);if(r)goto S_9990;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected LSET/RSET stringvariable=string",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8839);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8839);}while(r); } do{ qbs_set(__STRING_SOURCE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8840);}while(r); do{ goto dl_exit_1322; if(!qbevent)break;evnt(8841);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8843);}while(r); S_9998:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8844);if(r)goto S_9998;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8844);}while(r); } S_10001:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8845);if(r)goto S_10001;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8845);}while(r); } S_10004:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len("=",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8846);if(r)goto S_10004;} S_10005:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(8847);if(r)goto S_10005;} do{ qbs_set(__STRING_DEST,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8847);}while(r); do{ *__LONG_PART= 2 ; if(!qbevent)break;evnt(8847);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8847);}while(r); do{ goto LABEL_LRSETGOTPART; if(!qbevent)break;evnt(8847);}while(r); } } S_10012:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A3->len))||new_error){ if(qbevent){evnt(8849);if(r)goto S_10012;} do{ qbs_set(__STRING_A3,qbs_add(qbs_add(__STRING_A3,__STRING1_SP),__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8849);}while(r); }else{ do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8849);}while(r); } LABEL_LRSETGOTPART:; if(qbevent){evnt(8850);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8851);}while(r); }while(1); dl_exit_1322:; S_10019:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_DEST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8853);if(r)goto S_10019;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected LSET/RSET stringvariable=string",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8853);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8853);}while(r); } do{ qbs_set(__STRING_F,FUNC_FIXOPERATIONORDER(__STRING_DEST)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8855);}while(r); S_10024:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8856);if(r)goto S_10024;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8856);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP),qbs_new_txt_len("=",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8857);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_F,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8858);}while(r); S_10029:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8859);if(r)goto S_10029;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8859);}while(r); } S_10032:; if (((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(8860);if(r)goto S_10032;} do{ qbs_set(__STRING_A,qbs_new_txt_len("LSET/RSET expects a string variable/array-element as its first argument",71)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8860);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8860);}while(r); } do{ qbs_set(__STRING_DEST,FUNC_EVALUATETOTYP(__STRING_F,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8861);}while(r); S_10037:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8862);if(r)goto S_10037;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8862);}while(r); } do{ qbs_set(__STRING_SOURCE,FUNC_FIXOPERATIONORDER(__STRING_SOURCE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8863);}while(r); S_10041:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8864);if(r)goto S_10041;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8864);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8865);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8866);}while(r); S_10046:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8866);if(r)goto S_10046;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8866);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8866);}while(r); } do{ qbs_set(__STRING_SOURCE,FUNC_EVALUATETOTYP(__STRING_SOURCE,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8867);}while(r); S_10052:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8868);if(r)goto S_10052;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8868);}while(r); } S_10055:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LSET",4))))||new_error){ if(qbevent){evnt(8869);if(r)goto S_10055;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1325; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_lset(",9),__STRING_DEST),qbs_new_txt_len(",",1)),__STRING_SOURCE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1325; skip1325: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8870);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1326; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_rset(",9),__STRING_DEST),qbs_new_txt_len(",",1)),__STRING_SOURCE),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1326; skip1326: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8872);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8874);}while(r); } S_10062:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SWAP",4))))||new_error){ if(qbevent){evnt(8878);if(r)goto S_10062;} S_10063:; if ((-(*__LONG_N< 4 ))||new_error){ if(qbevent){evnt(8879);if(r)goto S_10063;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP ... , ...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8879);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8879);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(8880);}while(r); do{ *__LONG_ELE= 1 ; if(!qbevent)break;evnt(8881);}while(r); do{ qbs_set(__STRING_E1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8882);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8883);}while(r); S_10071:; fornext_value1328= 2 ; fornext_finalvalue1328=*__LONG_N; fornext_step1328= 1 ; if (fornext_step1328<0) fornext_step_negative1328=1; else fornext_step_negative1328=0; if (new_error) goto fornext_error1328; goto fornext_entrylabel1328; while(1){ fornext_value1328=fornext_step1328+(*__LONG_I); fornext_entrylabel1328: *__LONG_I=fornext_value1328; if (fornext_step_negative1328){ if (fornext_value1328fornext_finalvalue1328) break; } fornext_error1328:; if(qbevent){evnt(8884);if(r)goto S_10071;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8885);}while(r); S_10073:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8886);if(r)goto S_10073;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8886);}while(r); } S_10076:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8887);if(r)goto S_10076;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8887);}while(r); } S_10079:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(8888);if(r)goto S_10079;} S_10080:; if ((-(*__LONG_ELE== 2 ))||new_error){ if(qbevent){evnt(8889);if(r)goto S_10080;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP ... , ...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8889);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8889);}while(r); } do{ *__LONG_ELE= 2 ; if(!qbevent)break;evnt(8890);}while(r); }else{ S_10086:; if ((-(*__LONG_ELE== 1 ))||new_error){ if(qbevent){evnt(8892);if(r)goto S_10086;} do{ qbs_set(__STRING_E1,qbs_add(qbs_add(__STRING_E1,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8892);}while(r); }else{ do{ qbs_set(__STRING_E2,qbs_add(qbs_add(__STRING_E2,__STRING1_SP),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8892);}while(r); } } } fornext_exit_1327:; S_10093:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8895);if(r)goto S_10093;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP ... , ...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8895);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8895);}while(r); } do{ qbs_set(__STRING_E1,qbs_right(__STRING_E1,__STRING_E1->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8896);}while(r); do{ qbs_set(__STRING_E2,qbs_right(__STRING_E2,__STRING_E2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8896);}while(r); do{ qbs_set(__STRING_E1,FUNC_FIXOPERATIONORDER(__STRING_E1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8898);}while(r); S_10100:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8899);if(r)goto S_10100;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8899);}while(r); } do{ qbs_set(__STRING_E1L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8900);}while(r); do{ qbs_set(__STRING_E2,FUNC_FIXOPERATIONORDER(__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8901);}while(r); S_10105:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8902);if(r)goto S_10105;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8902);}while(r); } do{ qbs_set(__STRING_E2L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8903);}while(r); do{ qbs_set(__STRING_E1,FUNC_EVALUATE(__STRING_E1,__LONG_E1TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8904);}while(r); do{ qbs_set(__STRING_E2,FUNC_EVALUATE(__STRING_E2,__LONG_E2TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8904);}while(r); S_10111:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8905);if(r)goto S_10111;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8905);}while(r); } S_10114:; if (((-((*__LONG_E1TYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_E2TYP&*__LONG_ISREFERENCE)== 0 )))||new_error){ if(qbevent){evnt(8906);if(r)goto S_10114;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8906);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8906);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8908);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("SWAP",4),__STRING1_SP),__STRING_E1L),__STRING1_SP2),qbs_new_txt_len(",",1)),__STRING1_SP),__STRING_E2L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8909);}while(r); S_10120:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(8910);if(r)goto S_10120;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8910);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8910);}while(r); } S_10125:; if (((*__LONG_E1TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(8913);if(r)goto S_10125;} S_10126:; if ((-((*__LONG_E2TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(8914);if(r)goto S_10126;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8914);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8914);}while(r); } do{ qbs_set(__STRING_E1,FUNC_REFER(__STRING_E1,__LONG_E1TYP,&(pass1332= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8915);}while(r); do{ qbs_set(__STRING_E2,FUNC_REFER(__STRING_E2,__LONG_E2TYP,&(pass1333= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8915);}while(r); S_10132:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8916);if(r)goto S_10132;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8916);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1334; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("swap_string(",12),__STRING_E1),qbs_new_txt_len(",",1)),__STRING_E2),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1334; skip1334: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8917);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8918);}while(r); } S_10138:; if ((*__LONG_E1TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(8926);if(r)goto S_10138;} do{ qbs_set(__STRING_A,__STRING_E1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8927);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8929);}while(r); S_10141:; if ((*__LONG_I)||new_error){ if(qbevent){evnt(8930);if(r)goto S_10141;} do{ *__LONG_IDNUMBER=qbr(func_val(qbs_left(__STRING_A,*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8931);}while(r); do{ qbs_set(__STRING_A,qbs_right(__STRING_A,__STRING_A->len-*__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8931);}while(r); do{ SUB_GETID(__LONG_IDNUMBER); if(!qbevent)break;evnt(8932);}while(r); S_10145:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8933);if(r)goto S_10145;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8933);}while(r); } do{ *__LONG_U=qbr(func_val(__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8934);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8935);}while(r); do{ qbs_set(__STRING_A,qbs_right(__STRING_A,__STRING_A->len-*__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8935);}while(r); do{ *__LONG_E=qbr(func_val(__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8935);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8936);}while(r); do{ qbs_set(__STRING_O,qbs_right(__STRING_A,__STRING_A->len-*__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8936);}while(r); do{ qbs_set(__STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8937);}while(r); S_10155:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(8937);if(r)goto S_10155;} do{ qbs_set(__STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),__STRING_N),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8937);}while(r); } S_10158:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(8938);if(r)goto S_10158;} do{ qbs_set(__STRING_LHSSCOPE,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8939);}while(r); do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8940);}while(r); do{ *__LONG_T2=*__LONG_E2TYP; if(!qbevent)break;evnt(8940);}while(r); S_10162:; if ((-((*__LONG_T2&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(8941);if(r)goto S_10162;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP with similar user defined type",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8941);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8941);}while(r); } do{ *__LONG_IDNUMBER2=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8942);}while(r); do{ SUB_GETID(__LONG_IDNUMBER2); if(!qbevent)break;evnt(8943);}while(r); S_10168:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8944);if(r)goto S_10168;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8944);}while(r); } do{ qbs_set(__STRING_N2,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8945);}while(r); S_10172:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(8945);if(r)goto S_10172;} do{ qbs_set(__STRING_N2,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),__STRING_N2),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8945);}while(r); } do{ *__LONG_I=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8946);}while(r); do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len-*__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8946);}while(r); do{ *__LONG_U2=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8946);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8947);}while(r); do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len-*__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8947);}while(r); do{ *__LONG_E2=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8947);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8949);}while(r); do{ qbs_set(__STRING_O2,qbs_right(__STRING_E,__STRING_E->len-*__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8949);}while(r); S_10183:; if (((-(*__LONG_U!=*__LONG_U2))|(-(*__LONG_E2!= 0 )))||new_error){ if(qbevent){evnt(8951);if(r)goto S_10183;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP with similar user defined type",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8951);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8951);}while(r); } do{ qbs_set(__STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),__STRING_LHSSCOPE),__STRING_N),qbs_new_txt_len(")+(",3)),__STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8952);}while(r); do{ qbs_set(__STRING_SRC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),__STRING_N2),qbs_new_txt_len(")+(",3)),__STRING_O2),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8953);}while(r); do{ *__LONG_B=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ; if(!qbevent)break;evnt(8954);}while(r); do{ qbs_set(__STRING_SIZ,FUNC_STR2(__LONG_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8955);}while(r); S_10191:; if ((-(*__LONG_B== 1 ))||new_error){ if(qbevent){evnt(8956);if(r)goto S_10191;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1341; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("swap_8(",7),__STRING_SRC),qbs_new_txt_len(",",1)),__STRING_DST),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1341; skip1341: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8956);}while(r); } S_10194:; if ((-(*__LONG_B== 2 ))||new_error){ if(qbevent){evnt(8957);if(r)goto S_10194;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1342; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("swap_16(",8),__STRING_SRC),qbs_new_txt_len(",",1)),__STRING_DST),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1342; skip1342: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8957);}while(r); } S_10197:; if ((-(*__LONG_B== 4 ))||new_error){ if(qbevent){evnt(8958);if(r)goto S_10197;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1343; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("swap_32(",8),__STRING_SRC),qbs_new_txt_len(",",1)),__STRING_DST),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1343; skip1343: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8958);}while(r); } S_10200:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(8959);if(r)goto S_10200;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1344; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("swap_64(",8),__STRING_SRC),qbs_new_txt_len(",",1)),__STRING_DST),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1344; skip1344: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8959);}while(r); } S_10203:; if (((-(*__LONG_B!= 1 ))&(-(*__LONG_B!= 2 ))&(-(*__LONG_B!= 4 ))&(-(*__LONG_B!= 8 )))||new_error){ if(qbevent){evnt(8960);if(r)goto S_10203;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1345; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("swap_block(",11),__STRING_SRC),qbs_new_txt_len(",",1)),__STRING_DST),qbs_new_txt_len(",",1)),__STRING_SIZ),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1345; skip1345: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8960);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8961);}while(r); } } } do{ *__LONG_E1TYPC=*__LONG_E1TYP; if(!qbevent)break;evnt(8967);}while(r); S_10211:; if ((*__LONG_E1TYPC&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(8968);if(r)goto S_10211;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISPOINTER; if(!qbevent)break;evnt(8968);}while(r); } S_10214:; if ((*__LONG_E1TYPC&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(8969);if(r)goto S_10214;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(8969);}while(r); } S_10217:; if ((*__LONG_E1TYPC&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(8970);if(r)goto S_10217;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISARRAY; if(!qbevent)break;evnt(8970);}while(r); } S_10220:; if ((*__LONG_E1TYPC&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(8971);if(r)goto S_10220;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(8971);}while(r); } S_10223:; if ((*__LONG_E1TYPC&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(8972);if(r)goto S_10223;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISUDT; if(!qbevent)break;evnt(8972);}while(r); } do{ *__LONG_E2TYPC=*__LONG_E2TYP; if(!qbevent)break;evnt(8973);}while(r); S_10227:; if ((*__LONG_E2TYPC&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(8974);if(r)goto S_10227;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISPOINTER; if(!qbevent)break;evnt(8974);}while(r); } S_10230:; if ((*__LONG_E2TYPC&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(8975);if(r)goto S_10230;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(8975);}while(r); } S_10233:; if ((*__LONG_E2TYPC&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(8976);if(r)goto S_10233;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISARRAY; if(!qbevent)break;evnt(8976);}while(r); } S_10236:; if ((*__LONG_E2TYPC&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(8977);if(r)goto S_10236;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(8977);}while(r); } S_10239:; if ((*__LONG_E2TYPC&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(8978);if(r)goto S_10239;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISUDT; if(!qbevent)break;evnt(8978);}while(r); } S_10242:; if ((-(*__LONG_E1TYPC!=*__LONG_E2TYPC))||new_error){ if(qbevent){evnt(8979);if(r)goto S_10242;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8979);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8979);}while(r); } do{ *__LONG_T=*__LONG_E1TYP; if(!qbevent)break;evnt(8980);}while(r); S_10247:; if ((*__LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(8981);if(r)goto S_10247;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot SWAP bit-length variables",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8981);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8981);}while(r); } do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(8982);}while(r); do{ qbs_set(__STRING_T,FUNC_STR2(__LONG_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8983);}while(r); S_10253:; if ((-(*__LONG_B> 64 ))||new_error){ if(qbevent){evnt(8983);if(r)goto S_10253;} do{ qbs_set(__STRING_T,qbs_new_txt_len("longdouble",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8983);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1346; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("swap_",5),__STRING_T),qbs_new_txt_len("(&",2)),FUNC_REFER(__STRING_E1,__LONG_E1TYP,&(pass1347= 0 ))),qbs_new_txt_len(",&",2)),FUNC_REFER(__STRING_E2,__LONG_E2TYP,&(pass1348= 0 ))),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1346; skip1346: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8984);}while(r); S_10257:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8985);if(r)goto S_10257;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8985);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8986);}while(r); } S_10262:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("OPTION",6))))||new_error){ if(qbevent){evnt(8989);if(r)goto S_10262;} S_10263:; if ((-(*__LONG_N!= 3 ))||new_error){ if(qbevent){evnt(8990);if(r)goto S_10263;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected OPTION BASE 0 or 1",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8990);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8990);}while(r); } S_10267:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1349= 2 )),qbs_new_txt_len("BASE",4))))||new_error){ if(qbevent){evnt(8991);if(r)goto S_10267;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected OPTION BASE 0 or 1",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8991);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8991);}while(r); } do{ qbs_set(__STRING_L,FUNC_GETELEMENT(__STRING_A,&(pass1350= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8992);}while(r); S_10272:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_L,qbs_new_txt_len("0",1)))&(qbs_notequal(__STRING_L,qbs_new_txt_len("1",1)))))||new_error){ if(qbevent){evnt(8993);if(r)goto S_10272;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected OPTION BASE 0 or 1",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8993);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8993);}while(r); } S_10276:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_L,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(8994);if(r)goto S_10276;} do{ *__INTEGER_OPTIONBASE= 1 ; if(!qbevent)break;evnt(8994);}while(r); }else{ do{ *__INTEGER_OPTIONBASE= 0 ; if(!qbevent)break;evnt(8994);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("OPTION",6),__STRING1_SP),qbs_new_txt_len("BASE",4)),__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8995);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8996);}while(r); S_10283:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8996);if(r)goto S_10283;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8996);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8996);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8997);}while(r); } do{ memcpy((((char*)__UDT_ID2)+(0)),(((char*)__UDT_ID)+(0)),2860); if(!qbevent)break;evnt(9002);}while(r); do{ *__LONG_TARGETID=*__LONG_CURRENTID; if(!qbevent)break;evnt(9004);}while(r); S_10292:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_stub",8))))||new_error){ if(qbevent){evnt(9006);if(r)goto S_10292;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Command not implemented",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9006);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9006);}while(r); } S_10296:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(9008);if(r)goto S_10296;} S_10297:; if ((-(*(int16*)(((char*)__UDT_ID2)+(808))== 0 ))||new_error){ if(qbevent){evnt(9009);if(r)goto S_10297;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB does not require any arguments",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9009);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9009);}while(r); } } do{ SUB_SETDEPENDENCY(&(pass1352=*(int16*)(((char*)__UDT_ID2)+(546)))); if(!qbevent)break;evnt(9012);}while(r); do{ *__LONG_SEPERATEARGS_ERROR= 0 ; if(!qbevent)break;evnt(9014);}while(r); do{ *__LONG_PASSEDNEEDED=FUNC_SEPERATEARGS(FUNC_GETELEMENTS(__STRING_A,&(pass1353= 2 ),__LONG_N),FUNC_GETELEMENTS(__STRING_CA,&(pass1354= 2 ),__LONG_N),__LONG_PASSED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9015);}while(r); S_10305:; if ((*__LONG_SEPERATEARGS_ERROR)||new_error){ if(qbevent){evnt(9016);if(r)goto S_10305;} do{ qbs_set(__STRING_A,__STRING_SEPERATEARGS_ERROR_MESSAGE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9016);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9016);}while(r); } S_10309:; fornext_value1356= 1 ; fornext_finalvalue1356=*__LONG_OPTMAX; fornext_step1356= 1 ; if (fornext_step1356<0) fornext_step_negative1356=1; else fornext_step_negative1356=0; if (new_error) goto fornext_error1356; goto fornext_entrylabel1356; while(1){ fornext_value1356=fornext_step1356+(*__LONG_I); fornext_entrylabel1356: *__LONG_I=fornext_value1356; if (fornext_step_negative1356){ if (fornext_value1356fornext_finalvalue1356) break; } fornext_error1356:; if(qbevent){evnt(9019);if(r)goto S_10309;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(9019);}while(r); } fornext_exit_1355:; S_10312:; fornext_value1358= 1 ; fornext_finalvalue1358=*__LONG_OPTMAX+ 1 ; fornext_step1358= 1 ; if (fornext_step1358<0) fornext_step_negative1358=1; else fornext_step_negative1358=0; if (new_error) goto fornext_error1358; goto fornext_entrylabel1358; while(1){ fornext_value1358=fornext_step1358+(*__LONG_I); fornext_entrylabel1358: *__LONG_I=fornext_value1358; if (fornext_step_negative1358){ if (fornext_value1358fornext_finalvalue1358) break; } fornext_error1358:; if(qbevent){evnt(9020);if(r)goto S_10312;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT2[4],__ARRAY_STRING_SEPARGSLAYOUT2[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(9020);}while(r); } fornext_exit_1357:; S_10315:; fornext_value1360= 1 ; fornext_finalvalue1360=*(int16*)(((char*)__UDT_ID2)+(808)); fornext_step1360= 1 ; if (fornext_step1360<0) fornext_step_negative1360=1; else fornext_step_negative1360=0; if (new_error) goto fornext_error1360; goto fornext_entrylabel1360; while(1){ fornext_value1360=fornext_step1360+(*__LONG_I); fornext_entrylabel1360: *__LONG_I=fornext_value1360; if (fornext_step_negative1360){ if (fornext_value1360fornext_finalvalue1360) break; } fornext_error1360:; if(qbevent){evnt(9021);if(r)goto S_10315;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])]))); if(!qbevent)break;evnt(9021);}while(r); } fornext_exit_1359:; S_10318:; fornext_value1362= 1 ; fornext_finalvalue1362=*(int16*)(((char*)__UDT_ID2)+(808))+ 1 ; fornext_step1362= 1 ; if (fornext_step1362<0) fornext_step_negative1362=1; else fornext_step_negative1362=0; if (new_error) goto fornext_error1362; goto fornext_entrylabel1362; while(1){ fornext_value1362=fornext_step1362+(*__LONG_I); fornext_entrylabel1362: *__LONG_I=fornext_value1362; if (fornext_step_negative1362){ if (fornext_value1362fornext_finalvalue1362) break; } fornext_error1362:; if(qbevent){evnt(9022);if(r)goto S_10318;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT2[4],__ARRAY_STRING_SEPARGSLAYOUT2[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5])]))); if(!qbevent)break;evnt(9022);}while(r); } fornext_exit_1361:; S_10321:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9026);if(r)goto S_10321;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1363; sub_file_print(tmp_fileno,qbs_new_txt_len("separgs:",8), 0 , 0 , 1 ); if (new_error) goto skip1363; skip1363: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9027);}while(r); S_10323:; fornext_value1365= 1 ; fornext_finalvalue1365=*(int16*)(((char*)__UDT_ID2)+(808)); fornext_step1365= 1 ; if (fornext_step1365<0) fornext_step_negative1365=1; else fornext_step_negative1365=0; if (new_error) goto fornext_error1365; goto fornext_entrylabel1365; while(1){ fornext_value1365=fornext_step1365+(*__LONG_I); fornext_entrylabel1365: *__LONG_I=fornext_value1365; if (fornext_step_negative1365){ if (fornext_value1365fornext_finalvalue1365) break; } fornext_error1365:; if(qbevent){evnt(9027);if(r)goto S_10323;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1366; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip1366; sub_file_print(tmp_fileno,((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])])), 0 , 0 , 1 ); if (new_error) goto skip1366; skip1366: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9027);}while(r); } fornext_exit_1364:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1367; sub_file_print(tmp_fileno,qbs_new_txt_len("separgslayout:",14), 0 , 0 , 1 ); if (new_error) goto skip1367; skip1367: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9028);}while(r); S_10327:; fornext_value1369= 1 ; fornext_finalvalue1369=*(int16*)(((char*)__UDT_ID2)+(808))+ 1 ; fornext_step1369= 1 ; if (fornext_step1369<0) fornext_step_negative1369=1; else fornext_step_negative1369=0; if (new_error) goto fornext_error1369; goto fornext_entrylabel1369; while(1){ fornext_value1369=fornext_step1369+(*__LONG_I); fornext_entrylabel1369: *__LONG_I=fornext_value1369; if (fornext_step_negative1369){ if (fornext_value1369fornext_finalvalue1369) break; } fornext_error1369:; if(qbevent){evnt(9028);if(r)goto S_10327;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1370; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip1370; sub_file_print(tmp_fileno,((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT2[4],__ARRAY_STRING_SEPARGSLAYOUT2[5])])), 0 , 0 , 1 ); if (new_error) goto skip1370; skip1370: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9028);}while(r); } fornext_exit_1368:; } S_10331:; if ((*__LONG_USECALL)||new_error){ if(qbevent){evnt(9040);if(r)goto S_10331;} S_10332:; if ((-(*__LONG_USECALL== 1 ))||new_error){ if(qbevent){evnt(9041);if(r)goto S_10332;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CALL",4),__STRING1_SP),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))),__STRING1_SP2),qbs_new_txt_len("(",1)),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9041);}while(r); } S_10335:; if ((-(*__LONG_USECALL== 2 ))||new_error){ if(qbevent){evnt(9042);if(r)goto S_10335;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CALL",4),__STRING1_SP),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9042);}while(r); } }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9044);}while(r); } do{ qbs_set(__STRING_SUBCALL,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9047);}while(r); do{ *__LONG_ADDEDLAYOUT= 0 ; if(!qbevent)break;evnt(9048);}while(r); do{ *__LONG_FIELDCALL= 0 ; if(!qbevent)break;evnt(9050);}while(r); S_10344:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_get",7)))|(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_put",7)))))||new_error){ if(qbevent){evnt(9052);if(r)goto S_10344;} S_10345:; if ((*__LONG_PASSED& 2 )||new_error){ if(qbevent){evnt(9053);if(r)goto S_10345;} do{ *__LONG_PASSED=*__LONG_PASSED- 2 ; if(!qbevent)break;evnt(9055);}while(r); }else{ S_10348:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_get",7))))||new_error){ if(qbevent){evnt(9058);if(r)goto S_10348;} do{ *__LONG_FIELDCALL= 1 ; if(!qbevent)break;evnt(9059);}while(r); do{ qbs_set(__STRING_SUBCALL,qbs_new_txt_len("field_get(",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9060);}while(r); }else{ do{ *__LONG_FIELDCALL= 2 ; if(!qbevent)break;evnt(9062);}while(r); do{ qbs_set(__STRING_SUBCALL,qbs_new_txt_len("field_put(",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9063);}while(r); } } } S_10357:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_timer",9)))|(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_key",7)))))||new_error){ if(qbevent){evnt(9068);if(r)goto S_10357;} S_10358:; if ((-(*__LONG_USECALL== 0 ))||new_error){ if(qbevent){evnt(9069);if(r)goto S_10358;} do{ qbs_set(__STRING_L,qbs_add(qbs_left(__STRING_L,__STRING_L->len- 1 ),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9070);}while(r); } } S_10362:; fornext_value1373= 1 ; fornext_finalvalue1373=*(int16*)(((char*)__UDT_ID2)+(808)); fornext_step1373= 1 ; if (fornext_step1373<0) fornext_step_negative1373=1; else fornext_step_negative1373=0; if (new_error) goto fornext_error1373; goto fornext_entrylabel1373; while(1){ fornext_value1373=fornext_step1373+(*__LONG_I); fornext_entrylabel1373: *__LONG_I=fornext_value1373; if (fornext_step_negative1373){ if (fornext_value1373fornext_finalvalue1373) break; } fornext_error1373:; if(qbevent){evnt(9074);if(r)goto S_10362;} do{ *__LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(810)),400,1),( -3 )+(*__LONG_I* 4 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9075);}while(r); do{ *__LONG_NELE=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2644)),100,1),*__LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9076);}while(r); do{ *__LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2744)),100,1),*__LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9077);}while(r); do{ *__LONG_ADDLAYOUT= 1 ; if(!qbevent)break;evnt(9079);}while(r); do{ *__LONG_CONVERTSPACING= 0 ; if(!qbevent)break;evnt(9080);}while(r); do{ qbs_set(__STRING_X,((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT2[4],__ARRAY_STRING_SEPARGSLAYOUT2[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9081);}while(r); S_10369:; while((qbs_cleanup(qbs_tmp_base,__STRING_X->len))||new_error){ if(qbevent){evnt(9082);if(r)goto S_10369;} do{ *__LONG_X=qbs_asc(__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9083);}while(r); S_10371:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(9084);if(r)goto S_10371;} do{ *__LONG_CONVERTSPACING= 0 ; if(!qbevent)break;evnt(9085);}while(r); do{ qbs_set(__STRING_X2,func_mid(__STRING_X, 2 ,*__LONG_X,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9086);}while(r); do{ qbs_set(__STRING_X,qbs_right(__STRING_X,__STRING_X->len-*__LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9087);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(9089);}while(r); do{ *__LONG_AN= 0 ; if(!qbevent)break;evnt(9090);}while(r); do{ qbs_set(__STRING_X3,qbs_right(__STRING_L, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9091);}while(r); S_10378:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP)))||new_error){ if(qbevent){evnt(9092);if(r)goto S_10378;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9092);}while(r); } S_10381:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP2)))||new_error){ if(qbevent){evnt(9093);if(r)goto S_10381;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(9094);}while(r); S_10383:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(__STRING_L, 2 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(9095);if(r)goto S_10383;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(9095);}while(r); } }else{ S_10387:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(__STRING_X3))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(9097);if(r)goto S_10387;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(9097);}while(r); } } do{ *__LONG_S1=*__LONG_S; if(!qbevent)break;evnt(9099);}while(r); S_10392:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(__STRING_X2))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(9101);if(r)goto S_10392;} do{ *__LONG_CONVERTSPACING= 1 ; if(!qbevent)break;evnt(9101);}while(r); } S_10395:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("LPRINT",6))))||new_error){ if(qbevent){evnt(9104);if(r)goto S_10395;} } S_10397:; if ((qbs_cleanup(qbs_tmp_base,(((-(*__LONG_AN== 1 ))|(-(*__LONG_ADDEDLAYOUT== 1 ))))&(-(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(__STRING_X2))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]!= 0 ))))||new_error){ if(qbevent){evnt(9128);if(r)goto S_10397;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9132);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9133);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(9134);}while(r); } S_10402:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(9137);if(r)goto S_10402;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9138);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9139);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(9140);}while(r); } S_10407:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(9143);if(r)goto S_10407;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9144);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9145);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(9146);}while(r); } S_10412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(9149);if(r)goto S_10412;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9149);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(9149);}while(r); } S_10416:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X,func_chr( 0 ))))||new_error){ if(qbevent){evnt(9152);if(r)goto S_10416;} S_10417:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("STEP",4))))||new_error){ if(qbevent){evnt(9153);if(r)goto S_10417;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9153);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(9153);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9154);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(9154);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9158);}while(r); LABEL_CUSTOMLAYCHAR:; if(qbevent){evnt(9164);r=0;} S_10425:; if ((-(*__LONG_S== 0 ))||new_error){ if(qbevent){evnt(9165);if(r)goto S_10425;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(9165);}while(r); } S_10428:; if ((-(*__LONG_S!=*__LONG_S1))||new_error){ if(qbevent){evnt(9166);if(r)goto S_10428;} S_10429:; if ((*__LONG_S1)||new_error){ if(qbevent){evnt(9167);if(r)goto S_10429;} do{ qbs_set(__STRING_L,qbs_left(__STRING_L,__STRING_L->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9167);}while(r); } S_10432:; if ((-(*__LONG_S== 1 ))||new_error){ if(qbevent){evnt(9168);if(r)goto S_10432;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9168);}while(r); } S_10435:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(9169);if(r)goto S_10435;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9169);}while(r); } } S_10439:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_timer",9)))|(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_key",7)))))&(-(*__LONG_I==*(int16*)(((char*)__UDT_ID2)+(808))))))||new_error){ if(qbevent){evnt(9172);if(r)goto S_10439;} S_10440:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_X2,(qbs_add(qbs_new_txt_len(")",1),__STRING1_SP2)))))||new_error){ if(qbevent){evnt(9173);if(r)goto S_10440;} do{ qbs_set(__STRING_L,qbs_add(qbs_left(__STRING_L,__STRING_L->len- 1 ),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9174);}while(r); } } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_X2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9178);}while(r); }else{ do{ *__LONG_ADDLAYOUT= 0 ; if(!qbevent)break;evnt(9181);}while(r); do{ qbs_set(__STRING_X,qbs_right(__STRING_X,__STRING_X->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9182);}while(r); } do{ *__LONG_ADDEDLAYOUT= 0 ; if(!qbevent)break;evnt(9184);}while(r); } dl_exit_1375:; S_10451:; if ((-(*__LONG_TARGETTYP== -3 ))||new_error){ if(qbevent){evnt(9193);if(r)goto S_10451;} S_10452:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])])),qbs_new_txt_len("NULL",4))))||new_error){ if(qbevent){evnt(9194);if(r)goto S_10452;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected array name",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9194);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9194);}while(r); } do{ qbs_set(__STRING_E,((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9196);}while(r); S_10457:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_E,__STRING1_SP,0)== 0 )))||new_error){ if(qbevent){evnt(9198);if(r)goto S_10457;} do{ qbs_set(__STRING_TRY_STRING,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9199);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9200);}while(r); S_10460:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9201);if(r)goto S_10460;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9201);}while(r); } S_10463:; do{ if(qbevent){evnt(9202);if(r)goto S_10463;} S_10464:; if ((*__LONG_TRY)||new_error){ if(qbevent){evnt(9203);if(r)goto S_10464;} S_10465:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(9204);if(r)goto S_10465;} S_10466:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(9205);if(r)goto S_10466;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_E,__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9206);}while(r); do{ goto dl_exit_1380; if(!qbevent)break;evnt(9207);}while(r); } } S_10471:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(9211);if(r)goto S_10471;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(9211);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9211);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(9211);}while(r); } S_10477:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9212);if(r)goto S_10477;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9212);}while(r); } } S_10481:; if ((-(*__LONG_TRY== 0 ))||new_error){ if(qbevent){evnt(9214);if(r)goto S_10481;} S_10482:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(FUNC_REMOVESYMBOL(__STRING_TRY_STRING))->len)== 0 )))||new_error){ if(qbevent){evnt(9215);if(r)goto S_10482;} S_10483:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9216);if(r)goto S_10483;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9216);}while(r); } do{ *__LONG_A=qbs_asc(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9217);}while(r); S_10487:; if (((-(*__LONG_A>= 97 ))&(-(*__LONG_A<= 122 )))||new_error){ if(qbevent){evnt(9218);if(r)goto S_10487;} do{ *__LONG_A=*__LONG_A- 32 ; if(!qbevent)break;evnt(9218);}while(r); } S_10490:; if ((-(*__LONG_A== 95 ))||new_error){ if(qbevent){evnt(9219);if(r)goto S_10490;} do{ *__LONG_A= 91 ; if(!qbevent)break;evnt(9219);}while(r); } do{ *__LONG_A=*__LONG_A- 64 ; if(!qbevent)break;evnt(9220);}while(r); S_10494:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*__LONG_A)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])]))->len))||new_error){ if(qbevent){evnt(9221);if(r)goto S_10494;} do{ qbs_set(__STRING_TRY_STRING,qbs_add(__STRING_TRY_STRING,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*__LONG_A)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9221);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9221);}while(r); } S_10498:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9222);if(r)goto S_10498;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9222);}while(r); } } } S_10503:; }while((!(-(*__LONG_TRY== 0 )))&&(!new_error)); dl_exit_1380:; if(qbevent){evnt(9225);if(r)goto S_10503;} } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9230);}while(r); S_10506:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9231);if(r)goto S_10506;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9231);}while(r); } S_10509:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(9232);if(r)goto S_10509;} do{ qbs_set(__STRING_L,qbs_add(qbs_left(__STRING_L,__STRING_L->len- 1 ),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9232);}while(r); } S_10512:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(9233);if(r)goto S_10512;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9233);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(9233);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1383= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9234);}while(r); S_10517:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9235);if(r)goto S_10517;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9235);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(9236);}while(r); } S_10522:; if ((-(*__LONG_TARGETTYP== -2 ))||new_error){ if(qbevent){evnt(9240);if(r)goto S_10522;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9241);}while(r); S_10524:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9242);if(r)goto S_10524;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9242);}while(r); } S_10527:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(9243);if(r)goto S_10527;} do{ qbs_set(__STRING_L,qbs_add(qbs_left(__STRING_L,__STRING_L->len- 1 ),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9243);}while(r); } S_10530:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(9244);if(r)goto S_10530;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9244);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(9244);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1385= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9245);}while(r); S_10535:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9246);if(r)goto S_10535;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9246);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(9247);}while(r); } S_10540:; if ((-(*__LONG_TARGETTYP== -4 ))||new_error){ if(qbevent){evnt(9250);if(r)goto S_10540;} S_10541:; if ((*__LONG_FIELDCALL)||new_error){ if(qbevent){evnt(9252);if(r)goto S_10541;} do{ *__LONG_I=*(int16*)(((char*)__UDT_ID2)+(808))+ 1 ; if(!qbevent)break;evnt(9253);}while(r); do{ goto fornext_exit_1372; if(!qbevent)break;evnt(9254);}while(r); } S_10545:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])])),qbs_new_txt_len("NULL",4))))||new_error){ if(qbevent){evnt(9257);if(r)goto S_10545;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9257);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9257);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9258);}while(r); S_10550:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9259);if(r)goto S_10550;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9259);}while(r); } S_10553:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(9260);if(r)goto S_10553;} do{ qbs_set(__STRING_L,qbs_add(qbs_left(__STRING_L,__STRING_L->len- 1 ),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9260);}while(r); } S_10556:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(9261);if(r)goto S_10556;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9261);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(9261);}while(r); } S_10560:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("GET",3)))|(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("PUT",3)))))||new_error){ if(qbevent){evnt(9264);if(r)goto S_10560;} do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9265);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9266);}while(r); S_10563:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9267);if(r)goto S_10563;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9267);}while(r); } S_10566:; if (((*__LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(9268);if(r)goto S_10566;} S_10567:; if ((-((*__LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(9269);if(r)goto S_10567;} do{ qbs_set(__STRING_SUBCALL,qbs_right(__STRING_SUBCALL,__STRING_SUBCALL->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9271);}while(r); S_10569:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("GET",3))))||new_error){ if(qbevent){evnt(9273);if(r)goto S_10569;} do{ qbs_set(__STRING_SUBCALL,qbs_add(qbs_new_txt_len("sub_get2",8),__STRING_SUBCALL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9274);}while(r); do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1388= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9275);}while(r); S_10572:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9276);if(r)goto S_10572;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9276);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(9277);}while(r); }else{ do{ qbs_set(__STRING_SUBCALL,qbs_add(qbs_new_txt_len("sub_put2",8),__STRING_SUBCALL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9279);}while(r); } } } do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9284);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1389= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9287);}while(r); S_10584:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9288);if(r)goto S_10584;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9288);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(9289);}while(r); } S_10589:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])])),qbs_new_txt_len("NULL",4))))||new_error){ if(qbevent){evnt(9292);if(r)goto S_10589;} do{ qbs_set(__STRING_E,qbs_new_txt_len("NULL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9293);}while(r); }else{ do{ qbs_set(__STRING_E2,FUNC_FIXOPERATIONORDER(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9296);}while(r); S_10593:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9297);if(r)goto S_10593;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9297);}while(r); } S_10596:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(9298);if(r)goto S_10596;} do{ qbs_set(__STRING_L,qbs_add(qbs_left(__STRING_L,__STRING_L->len- 1 ),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9298);}while(r); } S_10599:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(9299);if(r)goto S_10599;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9299);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(9299);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E2,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9301);}while(r); S_10604:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9302);if(r)goto S_10604;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9302);}while(r); } S_10607:; if ((*__LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(9304);if(r)goto S_10607;} S_10608:; if ((-((*__LONG_TARGETTYP&*__LONG_ISOFFSET)== 0 ))||new_error){ if(qbevent){evnt(9305);if(r)goto S_10608;} S_10609:; if ((-(*(int16*)(((char*)__UDT_ID2)+(548))== 0 ))||new_error){ if(qbevent){evnt(9306);if(r)goto S_10609;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9306);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9306);}while(r); } } } S_10615:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID2)+(550)),256,1)),qbs_new_txt_len("sub_paint",9))))||new_error){ if(qbevent){evnt(9310);if(r)goto S_10615;} S_10616:; if ((-(*__LONG_I== 3 ))||new_error){ if(qbevent){evnt(9311);if(r)goto S_10616;} S_10617:; if (((*__LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(9312);if(r)goto S_10617;} do{ *__LONG_TARGETTYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(9313);}while(r); } } } S_10622:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGS2[4],__ARRAY_STRING_SEPARGS2[5])])), 2 )),(qbs_add(qbs_new_txt_len("(",1),__STRING1_SP)))))||new_error){ if(qbevent){evnt(9318);if(r)goto S_10622;} do{ *__LONG_DEREFERENCE= 1 ; if(!qbevent)break;evnt(9318);}while(r); }else{ do{ *__LONG_DEREFERENCE= 0 ; if(!qbevent)break;evnt(9318);}while(r); } S_10627:; if (((*__LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(9321);if(r)goto S_10627;} S_10628:; if ((-(*__LONG_DEREFERENCE== 0 ))||new_error){ if(qbevent){evnt(9322);if(r)goto S_10628;} S_10629:; if (((*__LONG_TARGETTYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(9325);if(r)goto S_10629;} S_10630:; if ((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(9326);if(r)goto S_10630;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9326);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9326);}while(r); } S_10634:; if ((-((*__LONG_SOURCETYP&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(9327);if(r)goto S_10634;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9327);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9327);}while(r); } S_10638:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9328);if(r)goto S_10638;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1391; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub:array reference:[",21),__STRING_E),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip1391; skip1391: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9328);}while(r); } do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP; if(!qbevent)break;evnt(9331);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP; if(!qbevent)break;evnt(9331);}while(r); do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISFLOAT); if(!qbevent)break;evnt(9332);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISFLOAT); if(!qbevent)break;evnt(9333);}while(r); S_10645:; if ((-(*__LONG_SOURCETYP2!=*__LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(9334);if(r)goto S_10645;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Incorrect array type passed to sub",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9334);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9334);}while(r); } S_10649:; if ((*__LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(9337);if(r)goto S_10649;} S_10650:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9338);if(r)goto S_10650;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1392; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub:array reference:udt reference:[",35),__STRING_E),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip1392; skip1392: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9338);}while(r); } do{ *__LONG_UDTREFID=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9340);}while(r); do{ SUB_GETID(__LONG_UDTREFID); if(!qbevent)break;evnt(9341);}while(r); S_10655:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9342);if(r)goto S_10655;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9342);}while(r); } do{ *__LONG_UDTREFI=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9343);}while(r); do{ *__LONG_UDTREFI2=func_instr(*__LONG_UDTREFI+ 1 ,__STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9344);}while(r); do{ *__LONG_UDTREFU=qbr(func_val(func_mid(__STRING_E,*__LONG_UDTREFI+ 1 ,*__LONG_UDTREFI2-*__LONG_UDTREFI- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9345);}while(r); do{ *__LONG_UDTREFI3=func_instr(*__LONG_UDTREFI2+ 1 ,__STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9346);}while(r); do{ *__LONG_UDTREFE=qbr(func_val(func_mid(__STRING_E,*__LONG_UDTREFI2+ 1 ,*__LONG_UDTREFI3-*__LONG_UDTREFI2- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9347);}while(r); do{ qbs_set(__STRING_O,qbs_right(__STRING_E,__STRING_E->len-*__LONG_UDTREFI3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9348);}while(r); S_10664:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_O, 4 ),qbs_new_txt_len("(0)*",4))))||new_error){ if(qbevent){evnt(9350);if(r)goto S_10664;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9350);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9350);}while(r); } }else{ S_10669:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal((qbs_right(__STRING_E, 2 )),(qbs_add(__STRING1_SP3,qbs_new_txt_len("0",1))))))||new_error){ if(qbevent){evnt(9352);if(r)goto S_10669;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9352);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9352);}while(r); } } do{ *__LONG_IDNUM=qbr(func_val(qbs_left(__STRING_E,func_instr(NULL,__STRING_E,__STRING1_SP3,0)- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9355);}while(r); do{ SUB_GETID(__LONG_IDNUM); if(!qbevent)break;evnt(9356);}while(r); S_10676:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9357);if(r)goto S_10676;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9357);}while(r); } S_10679:; if ((*__LONG_TARGETTYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(9359);if(r)goto S_10679;} do{ *__LONG_TARGETTYPSIZE=string2l(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(1210)),400,1),(*__LONG_I* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9360);}while(r); S_10681:; if ((-(*(int32*)(((char*)__UDT_ID)+(540))!=*__LONG_TARGETTYPSIZE))||new_error){ if(qbevent){evnt(9361);if(r)goto S_10681;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Incorrect array type passed to sub",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9361);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9361);}while(r); } } S_10686:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*__LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*__LONG_I, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(9364);if(r)goto S_10686;} S_10687:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(9365);if(r)goto S_10687;} do{ tmp_long=array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(9366);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(9367);}while(r); } } S_10692:; if ((-(*(int32*)(((char*)__UDT_ID)+(2844))== 0 ))||new_error){ if(qbevent){evnt(9371);if(r)goto S_10692;} S_10693:; if ((-(*__LONG_NELEREQ== 0 ))||new_error){ if(qbevent){evnt(9377);if(r)goto S_10693;} S_10694:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))> 0 ))||new_error){ if(qbevent){evnt(9381);if(r)goto S_10694;} do{ *__LONG_NELEREQ=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(9383);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2744)),100,1),*__LONG_I, 1 ,func_chr(*__LONG_NELEREQ),1); if(!qbevent)break;evnt(9384);}while(r); } do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860)),(((char*)__UDT_ID2)+(0)),2860); if(!qbevent)break;evnt(9390);}while(r); }else{ S_10700:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!=*__LONG_NELEREQ))||new_error){ if(qbevent){evnt(9397);if(r)goto S_10700;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Passing arrays with a differing number of elements to a SUB/FUNCTION is not supported (yet)",91)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9397);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9397);}while(r); } } } do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1394= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9403);}while(r); S_10707:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9404);if(r)goto S_10707;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9404);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(9405);}while(r); } S_10712:; if ((-((*__LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(9412);if(r)goto S_10712;} S_10713:; if (((*__LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(9413);if(r)goto S_10713;} do{ *__LONG_IDNUM=qbr(func_val(qbs_left(__STRING_E,func_instr(NULL,__STRING_E,__STRING1_SP3,0)- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9414);}while(r); do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP; if(!qbevent)break;evnt(9416);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP; if(!qbevent)break;evnt(9416);}while(r); do{ *__LONG_ARR= 0 ; if(!qbevent)break;evnt(9419);}while(r); S_10718:; if (((*__LONG_SOURCETYP2&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(9419);if(r)goto S_10718;} do{ *__LONG_ARR= 1 ; if(!qbevent)break;evnt(9419);}while(r); } do{ *__LONG_PASSUDTELEMENT= 0 ; if(!qbevent)break;evnt(9420);}while(r); S_10722:; if (((-((*__LONG_TARGETTYP2&*__LONG_ISUDT)== 0 ))&(-((*__LONG_SOURCETYP2&*__LONG_ISUDT)!= 0 )))||new_error){ if(qbevent){evnt(9420);if(r)goto S_10722;} do{ *__LONG_PASSUDTELEMENT= 1 ; if(!qbevent)break;evnt(9420);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP2-*__LONG_ISUDT; if(!qbevent)break;evnt(9420);}while(r); } do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(9423);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(9424);}while(r); S_10728:; if ((-(*__LONG_SOURCETYP2==*__LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(9427);if(r)goto S_10728;} S_10729:; if ((*__LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(9429);if(r)goto S_10729;} do{ *__LONG_UDTREFID=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9433);}while(r); do{ SUB_GETID(__LONG_UDTREFID); if(!qbevent)break;evnt(9434);}while(r); S_10732:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9435);if(r)goto S_10732;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9435);}while(r); } do{ *__LONG_UDTREFI=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9436);}while(r); do{ *__LONG_UDTREFI2=func_instr(*__LONG_UDTREFI+ 1 ,__STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9437);}while(r); do{ *__LONG_UDTREFU=qbr(func_val(func_mid(__STRING_E,*__LONG_UDTREFI+ 1 ,*__LONG_UDTREFI2-*__LONG_UDTREFI- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9438);}while(r); do{ *__LONG_UDTREFI3=func_instr(*__LONG_UDTREFI2+ 1 ,__STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9439);}while(r); do{ *__LONG_UDTREFE=qbr(func_val(func_mid(__STRING_E,*__LONG_UDTREFI2+ 1 ,*__LONG_UDTREFI3-*__LONG_UDTREFI2- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9440);}while(r); do{ qbs_set(__STRING_O,qbs_right(__STRING_E,__STRING_E->len-*__LONG_UDTREFI3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9441);}while(r); S_10741:; if ((*__LONG_ARR)||new_error){ if(qbevent){evnt(9444);if(r)goto S_10741;} do{ qbs_set(__STRING_N,qbs_add(qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("ARRAY_UDT_",10)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9445);}while(r); }else{ do{ qbs_set(__STRING_N,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("UDT_",4)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9447);}while(r); } do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(void*)( ((char*)(",18),__STRING_N),qbs_new_txt_len(")) + (",6)),__STRING_O),qbs_new_txt_len(") )",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9450);}while(r); S_10747:; if ((*__LONG_PASSUDTELEMENT)||new_error){ if(qbevent){evnt(9453);if(r)goto S_10747;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass1396=*__LONG_TARGETTYP2+(*__LONG_TARGETTYP&*__LONG_ISUNSIGNED)),qbs_new_txt_len("",0))),qbs_new_txt_len("*)",2)),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9453);}while(r); } S_10750:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9454);if(r)goto S_10750;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9454);}while(r); } }else{ S_10754:; if ((*__LONG_ARR)||new_error){ if(qbevent){evnt(9458);if(r)goto S_10754;} S_10755:; if (((*__LONG_SOURCETYP2&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(9459);if(r)goto S_10755;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot pass BIT array offsets yet",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9459);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9459);}while(r); } do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1397= 0 ))),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9460);}while(r); S_10760:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9461);if(r)goto S_10760;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9461);}while(r); } }else{ do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1398= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9463);}while(r); S_10765:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9464);if(r)goto S_10765;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9464);}while(r); } } S_10769:; if ((-((*__LONG_SOURCETYP&*__LONG_ISUNSIGNED)!=(*__LONG_TARGETTYP&*__LONG_ISUNSIGNED)))||new_error){ if(qbevent){evnt(9468);if(r)goto S_10769;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass1399=*__LONG_TARGETTYP2+(*__LONG_TARGETTYP&*__LONG_ISUNSIGNED)),qbs_new_txt_len("",0))),qbs_new_txt_len("*)",2)),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9469);}while(r); S_10771:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9470);if(r)goto S_10771;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9470);}while(r); } } } S_10776:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*__LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*__LONG_I, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(9475);if(r)goto S_10776;} S_10777:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(9476);if(r)goto S_10777;} do{ tmp_long=array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(9477);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(9478);}while(r); } } do{ goto LABEL_SETE; if(!qbevent)break;evnt(9482);}while(r); } } }else{ S_10786:; if (((*__LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(9487);if(r)goto S_10786;} do{ *__LONG_IDNUM=qbr(func_val(qbs_left(__STRING_E,func_instr(NULL,__STRING_E,__STRING1_SP3,0)- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9488);}while(r); S_10788:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*__LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*__LONG_I, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(9489);if(r)goto S_10788;} S_10789:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(9490);if(r)goto S_10789;} do{ tmp_long=array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(9491);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(9492);}while(r); } } } } } } S_10798:; if ((*__LONG_TARGETTYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(9504);if(r)goto S_10798;} S_10799:; if ((-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(9505);if(r)goto S_10799;} do{ *__LONG_NTH=*__LONG_I; if(!qbevent)break;evnt(9506);}while(r); S_10801:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+808))== 1 ))||new_error){ if(qbevent){evnt(9507);if(r)goto S_10801;} do{ qbs_set(__STRING_A,qbs_new_txt_len("String required for sub",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9507);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9507);}while(r); } do{ qbs_set(__STRING_A,qbs_add(FUNC_STR_NTH(__LONG_NTH),qbs_new_txt_len(" sub argument requires a string",31))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9508);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9508);}while(r); } } S_10809:; if ((-((*__LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(9511);if(r)goto S_10809;} S_10810:; if ((*__LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(9512);if(r)goto S_10810;} do{ *__LONG_NTH=*__LONG_I; if(!qbevent)break;evnt(9513);}while(r); S_10812:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+808))== 1 ))||new_error){ if(qbevent){evnt(9514);if(r)goto S_10812;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Number required for sub",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9514);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9514);}while(r); } do{ qbs_set(__STRING_A,qbs_add(FUNC_STR_NTH(__LONG_NTH),qbs_new_txt_len(" sub argument requires a number",31))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9515);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9515);}while(r); } } S_10820:; if (((*__LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(9520);if(r)goto S_10820;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1400= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9521);}while(r); S_10822:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9522);if(r)goto S_10822;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9522);}while(r); } } S_10826:; if ((-(*__LONG_EXPLICITREFERENCE== 0 ))||new_error){ if(qbevent){evnt(9525);if(r)goto S_10826;} S_10827:; if ((*__LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(9526);if(r)goto S_10827;} do{ *__LONG_NTH=*__LONG_I; if(!qbevent)break;evnt(9527);}while(r); do{ qbs_set(__STRING_X,qbs_add(qbs_add(qbs_new_txt_len("'",1),qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*__LONG_TARGETTYP& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9528);}while(r); S_10830:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+808))== 1 ))||new_error){ if(qbevent){evnt(9529);if(r)goto S_10830;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("TYPE ",5),__STRING_X),qbs_new_txt_len(" required for sub",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9529);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9529);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_add(FUNC_STR_NTH(__LONG_NTH),qbs_new_txt_len(" sub argument requires TYPE ",28)),__STRING_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9530);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9530);}while(r); } }else{ S_10838:; if ((*__LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(9533);if(r)goto S_10838;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Number required for sub",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9533);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9533);}while(r); } } S_10843:; if (((*__LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(9537);if(r)goto S_10843;} S_10844:; if ((-((*__LONG_TARGETTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(9538);if(r)goto S_10844;} do{ *__LONG_BITS=*__LONG_TARGETTYP& 511 ; if(!qbevent)break;evnt(9540);}while(r); S_10846:; if ((-(*__LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(9541);if(r)goto S_10846;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_float_to_long(",18),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9541);}while(r); } S_10849:; if (((-(*__LONG_BITS> 16 ))&(-(*__LONG_BITS< 32 )))||new_error){ if(qbevent){evnt(9542);if(r)goto S_10849;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_double_to_long(",19),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9542);}while(r); } S_10852:; if ((-(*__LONG_BITS>= 32 ))||new_error){ if(qbevent){evnt(9543);if(r)goto S_10852;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),__STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9543);}while(r); } } } S_10857:; if (((*__LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(9547);if(r)goto S_10857;} S_10858:; if (((*__LONG_TARGETTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(9548);if(r)goto S_10858;} do{ goto LABEL_SETE; if(!qbevent)break;evnt(9548);}while(r); } do{ qbs_set(__STRING_T,FUNC_TYP2CTYP(__LONG_TARGETTYP,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9549);}while(r); S_10862:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9550);if(r)goto S_10862;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9550);}while(r); } do{ qbs_set(__STRING_V,qbs_add(qbs_new_txt_len("pass",4),FUNC_STR2(&(pass1401=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9551);}while(r); S_10866:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*__LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*__LONG_I, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(9553);if(r)goto S_10866;} do{ *__LONG_BYTESREQ=((*__LONG_TARGETTYP& 511 )+ 7 )/ 8 ; if(!qbevent)break;evnt(9554);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip1402; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_T,qbs_new_txt_len(" *",2)),__STRING_V),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip1402; skip1402: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9555);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1403; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),__STRING_V),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip1403; skip1403: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9556);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1404; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(__LONG_BYTESREQ)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1404; skip1404: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9557);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1405; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(__STRING_V,qbs_new_txt_len("=(",2)),__STRING_T),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip1405; skip1405: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9558);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip1406; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_spchr",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9591);}while(r); } S_10898:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ltrim(qbs_rtrim(__STRING_E)),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(9594);if(r)goto S_10898;} do{ qbs_set(__STRING_E,qbs_new_txt_len("NULL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9594);}while(r); } } S_10902:; if ((-(*__LONG_I!= 1 ))||new_error){ if(qbevent){evnt(9598);if(r)goto S_10902;} do{ qbs_set(__STRING_SUBCALL,qbs_add(__STRING_SUBCALL,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9598);}while(r); } do{ qbs_set(__STRING_SUBCALL,qbs_add(__STRING_SUBCALL,__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9599);}while(r); } fornext_exit_1372:; do{ qbs_set(__STRING_X,((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT2[0]))[array_check((*__LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT2[4],__ARRAY_STRING_SEPARGSLAYOUT2[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9603);}while(r); S_10908:; while((qbs_cleanup(qbs_tmp_base,__STRING_X->len))||new_error){ if(qbevent){evnt(9604);if(r)goto S_10908;} do{ *__LONG_X=qbs_asc(__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9605);}while(r); S_10910:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(9606);if(r)goto S_10910;} do{ qbs_set(__STRING_X2,func_mid(__STRING_X, 2 ,*__LONG_X,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9607);}while(r); do{ qbs_set(__STRING_X,qbs_right(__STRING_X,__STRING_X->len-*__LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9608);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(9610);}while(r); do{ *__LONG_AN= 0 ; if(!qbevent)break;evnt(9611);}while(r); do{ qbs_set(__STRING_X3,qbs_right(__STRING_L, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9612);}while(r); S_10916:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP)))||new_error){ if(qbevent){evnt(9613);if(r)goto S_10916;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9613);}while(r); } S_10919:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP2)))||new_error){ if(qbevent){evnt(9614);if(r)goto S_10919;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(9615);}while(r); S_10921:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(__STRING_L, 2 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(9616);if(r)goto S_10921;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(9616);}while(r); } }else{ S_10925:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(__STRING_X3))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(9619);if(r)goto S_10925;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(9619);}while(r); } } do{ *__LONG_S1=*__LONG_S; if(!qbevent)break;evnt(9622);}while(r); S_10930:; if ((qbs_cleanup(qbs_tmp_base,(((-(*__LONG_AN== 1 ))|(-(*__LONG_ADDEDLAYOUT== 1 ))))&(-(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(__STRING_X2))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]!= 0 ))))||new_error){ if(qbevent){evnt(9624);if(r)goto S_10930;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9625);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9626);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(9627);}while(r); } S_10935:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(9630);if(r)goto S_10935;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9631);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9632);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(9633);}while(r); } S_10940:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(9636);if(r)goto S_10940;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9637);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9638);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(9639);}while(r); } S_10945:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(9642);if(r)goto S_10945;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9642);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(9642);}while(r); } S_10949:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X,func_chr( 0 ))))||new_error){ if(qbevent){evnt(9644);if(r)goto S_10949;} S_10950:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("STEP",4))))||new_error){ if(qbevent){evnt(9645);if(r)goto S_10950;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9645);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(9645);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9646);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(9646);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9650);}while(r); LABEL_CUSTOMLAYCHAR2:; if(qbevent){evnt(9651);r=0;} S_10958:; if ((-(*__LONG_S== 0 ))||new_error){ if(qbevent){evnt(9652);if(r)goto S_10958;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(9652);}while(r); } S_10961:; if ((-(*__LONG_S!=*__LONG_S1))||new_error){ if(qbevent){evnt(9653);if(r)goto S_10961;} S_10962:; if ((*__LONG_S1)||new_error){ if(qbevent){evnt(9654);if(r)goto S_10962;} do{ qbs_set(__STRING_L,qbs_left(__STRING_L,__STRING_L->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9654);}while(r); } S_10965:; if ((-(*__LONG_S== 1 ))||new_error){ if(qbevent){evnt(9655);if(r)goto S_10965;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9655);}while(r); } S_10968:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(9656);if(r)goto S_10968;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9656);}while(r); } } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_X2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9658);}while(r); }else{ do{ *__LONG_ADDLAYOUT= 0 ; if(!qbevent)break;evnt(9661);}while(r); do{ qbs_set(__STRING_X,qbs_right(__STRING_X,__STRING_X->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9662);}while(r); } do{ *__LONG_ADDEDLAYOUT= 0 ; if(!qbevent)break;evnt(9664);}while(r); } dl_exit_1410:; S_10979:; if ((*__LONG_PASSEDNEEDED)||new_error){ if(qbevent){evnt(9672);if(r)goto S_10979;} do{ qbs_set(__STRING_SUBCALL,qbs_add(qbs_add(__STRING_SUBCALL,qbs_new_txt_len(",",1)),FUNC_STR2(__LONG_PASSED))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9673);}while(r); } do{ qbs_set(__STRING_SUBCALL,qbs_add(__STRING_SUBCALL,qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9675);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1414; sub_file_print(tmp_fileno,__STRING_SUBCALL, 0 , 0 , 1 ); if (new_error) goto skip1414; skip1414: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9676);}while(r); do{ qbs_set(__STRING_SUBCALL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9677);}while(r); S_10985:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(9678);if(r)goto S_10985;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1415; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip1415; skip1415: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9678);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9680);}while(r); do{ qbs_set(__STRING_X,qbs_right(__STRING_L, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9681);}while(r); S_10990:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_X,__STRING1_SP))|(qbs_equal(__STRING_X,__STRING1_SP2))))||new_error){ if(qbevent){evnt(9681);if(r)goto S_10990;} do{ qbs_set(__STRING_L,qbs_left(__STRING_L,__STRING_L->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9681);}while(r); } S_10993:; if ((-(*__LONG_USECALL== 1 ))||new_error){ if(qbevent){evnt(9682);if(r)goto S_10993;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9682);}while(r); } S_10996:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9683);if(r)goto S_10996;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1417; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("SUB layout:[",12),__STRING_L),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip1417; skip1417: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9683);}while(r); } S_10999:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(9684);if(r)goto S_10999;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9684);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9684);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9685);}while(r); } S_11006:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(9690);if(r)goto S_11006;} do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9691);}while(r); S_11008:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(9691);if(r)goto S_11008;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1419= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9691);}while(r); } do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(9692);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9693);}while(r); S_11013:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9694);if(r)goto S_11013;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9694);}while(r); } }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(9696);}while(r); } } dl_exit_1256:; } LABEL_NOTSUBCALL:; if(qbevent){evnt(9702);r=0;} S_11021:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9704);if(r)goto S_11021;} S_11022:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LET",3))))||new_error){ if(qbevent){evnt(9705);if(r)goto S_11022;} S_11023:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(9706);if(r)goto S_11023;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9706);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9706);}while(r); } do{ qbs_set(__STRING_CA,qbs_right(__STRING_CA,__STRING_CA->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9707);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(9708);}while(r); do{ qbs_set(__STRING_L,qbs_new_txt_len("LET",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9709);}while(r); S_11030:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9710);if(r)goto S_11030;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9710);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9710);}while(r); } do{ goto LABEL_LETUSED; if(!qbevent)break;evnt(9712);}while(r); } } S_11038:; if ((-(*__LONG_N>= 3 ))||new_error){ if(qbevent){evnt(9717);if(r)goto S_11038;} S_11039:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_A,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len("=",1)),__STRING1_SP),0)))||new_error){ if(qbevent){evnt(9718);if(r)goto S_11039;} LABEL_LETUSED:; if(qbevent){evnt(9719);r=0;} do{ SUB_ASSIGN(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9720);}while(r); S_11041:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9721);if(r)goto S_11041;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9721);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9722);}while(r); S_11045:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(9723);if(r)goto S_11045;} do{ qbs_set(__STRING_LAYOUT,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9723);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9723);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9724);}while(r); } } S_11053:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(__STRING_A, 2 )),(qbs_add(__STRING1_SP,qbs_new_txt_len("=",1))))))||new_error){ if(qbevent){evnt(9727);if(r)goto S_11053;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... = expression",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9727);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9727);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9730);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9730);}while(r); LABEL_FINISHEDLINE:; if(qbevent){evnt(9732);r=0;} do{ *__LONG_THENGOTO= 0 ; if(!qbevent)break;evnt(9733);}while(r); LABEL_FINISHEDLINE2:; if(qbevent){evnt(9734);r=0;} S_11060:; if ((-(*__INTEGER_ARRAYPROCESSINGHAPPENED== 1 ))||new_error){ if(qbevent){evnt(9736);if(r)goto S_11060;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(9736);}while(r); } S_11063:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(9738);if(r)goto S_11063;} S_11064:; if ((*__LONG_DYNSCOPE)||new_error){ if(qbevent){evnt(9739);if(r)goto S_11064;} do{ *__LONG_DYNSCOPE= 0 ; if(!qbevent)break;evnt(9740);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1423; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){evnt(",17),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len(");if(r)goto S_",14)),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(";}",2)), 0 , 0 , 1 ); if (new_error) goto skip1423; skip1423: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9741);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1424; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(!qbevent)break;evnt(",23),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len(");}while(r);",12)), 0 , 0 , 1 ); if (new_error) goto skip1424; skip1424: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9743);}while(r); } } LABEL_FINISHEDNONEXEC:; if(qbevent){evnt(9747);r=0;} S_11071:; if ((-(*__LONG_LAYOUTDONE== 0 ))||new_error){ if(qbevent){evnt(9749);if(r)goto S_11071;} do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(9749);}while(r); } S_11074:; if ((-(*__LONG_CONTINUELINEFROM== 0 ))||new_error){ if(qbevent){evnt(9751);if(r)goto S_11074;} S_11075:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ADDMETAINCLUDE->len))||new_error){ if(qbevent){evnt(9754);if(r)goto S_11075;} S_11076:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(9756);if(r)goto S_11076;} do{ qbs_set(__STRING_LAYOUTCOMMENT_BACKUP,__STRING_LAYOUTCOMMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9758);}while(r); do{ *__LONG_LAYOUTOK_BACKUP=*__LONG_LAYOUTOK; if(!qbevent)break;evnt(9759);}while(r); do{ qbs_set(__STRING_LAYOUT_BACKUP,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9760);}while(r); } do{ qbs_set(__STRING_A,__STRING_ADDMETAINCLUDE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9763);}while(r); do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9763);}while(r); S_11083:; if ((-(*__LONG_INCLEVEL== 100 ))||new_error){ if(qbevent){evnt(9764);if(r)goto S_11083;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many indwelling INCLUDE files",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9764);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9764);}while(r); } do{ *__LONG_FH= 99 +*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(9766);}while(r); S_11088:; fornext_value1427= 1 ; fornext_finalvalue1427= 2 ; fornext_step1427= 1 ; if (fornext_step1427<0) fornext_step_negative1427=1; else fornext_step_negative1427=0; if (new_error) goto fornext_error1427; goto fornext_entrylabel1427; while(1){ fornext_value1427=fornext_step1427+(*__LONG_TRY); fornext_entrylabel1427: *__LONG_TRY=fornext_value1427; if (fornext_step_negative1427){ if (fornext_value1427fornext_finalvalue1427) break; } fornext_error1427:; if(qbevent){evnt(9767);if(r)goto S_11088;} S_11089:; if ((-(*__LONG_TRY== 1 ))||new_error){ if(qbevent){evnt(9768);if(r)goto S_11089;} S_11090:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(9769);if(r)goto S_11090;} S_11091:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(9770);if(r)goto S_11091;} do{ qbs_set(__STRING_P,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9770);}while(r); }else{ do{ qbs_set(__STRING_P,FUNC_GETFILEPATH(__STRING_SOURCEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9770);}while(r); } }else{ do{ qbs_set(__STRING_P,FUNC_GETFILEPATH(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9772);}while(r); } do{ qbs_set(__STRING_F,qbs_add(__STRING_P,__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9774);}while(r); } S_11101:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(9776);if(r)goto S_11101;} do{ qbs_set(__STRING_F,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9776);}while(r); } do{ *__INTEGER_QBERRORHAPPENED= -2 ; if(!qbevent)break;evnt(9777);}while(r); do{ sub_open(__STRING_F, 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9778);}while(r); LABEL_QBERRORHAPPENED2:; if(qbevent){evnt(9779);r=0;} S_11106:; if ((-(*__INTEGER_QBERRORHAPPENED== -2 ))||new_error){ if(qbevent){evnt(9780);if(r)goto S_11106;} do{ goto fornext_exit_1426; if(!qbevent)break;evnt(9780);}while(r); } do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(9781);}while(r); } fornext_exit_1426:; S_11111:; if ((-(*__INTEGER_QBERRORHAPPENED!= -2 ))||new_error){ if(qbevent){evnt(9783);if(r)goto S_11111;} do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(9783);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("File ",5),__STRING_A),qbs_new_txt_len(" not found",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9783);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9783);}while(r); } do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(9784);}while(r); do{ tmp_long=array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[tmp_long])),__STRING_F); if(!qbevent)break;evnt(9784);}while(r); do{ tmp_long=array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5]); if (!new_error) ((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(9784);}while(r); } S_11120:; while((*__LONG_INCLEVEL)||new_error){ if(qbevent){evnt(9787);if(r)goto S_11120;} do{ *__LONG_FH= 99 +*__LONG_INCLEVEL; if(!qbevent)break;evnt(9788);}while(r); S_11122:; if ((-(func_eof(*__LONG_FH)== 0 ))||new_error){ if(qbevent){evnt(9790);if(r)goto S_11122;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1429; sub_file_line_input_string(tmp_fileno,__STRING_X); if (new_error) goto skip1429; skip1429: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9791);}while(r); do{ qbs_set(__STRING_A3,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9792);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(9793);}while(r); do{ tmp_long=array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5]); if (!new_error) ((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[tmp_long]=((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]+ 1 ; if(!qbevent)break;evnt(9794);}while(r); do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" in line ",9),FUNC_STR2((&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])))),qbs_new_txt_len(" of ",4)),((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])]))),qbs_new_txt_len(" included",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9796);}while(r); S_11128:; if ((-(*__LONG_INCLEVEL> 1 ))||new_error){ if(qbevent){evnt(9797);if(r)goto S_11128;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(" (through ",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9798);}while(r); S_11130:; fornext_value1431= 1 ; fornext_finalvalue1431=*__LONG_INCLEVEL- 1 ; fornext_step1431= 1 ; if (fornext_step1431<0) fornext_step_negative1431=1; else fornext_step_negative1431=0; if (new_error) goto fornext_error1431; goto fornext_entrylabel1431; while(1){ fornext_value1431=fornext_step1431+(*__LONG_X); fornext_entrylabel1431: *__LONG_X=fornext_value1431; if (fornext_step_negative1431){ if (fornext_value1431fornext_finalvalue1431) break; } fornext_error1431:; if(qbevent){evnt(9799);if(r)goto S_11130;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9800);}while(r); S_11132:; if ((-(*__LONG_X<(*__LONG_INCLEVEL- 1 )))||new_error){ if(qbevent){evnt(9801);if(r)goto S_11132;} S_11133:; if ((-(*__LONG_X==(*__LONG_INCLEVEL- 2 )))||new_error){ if(qbevent){evnt(9802);if(r)goto S_11133;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(" then ",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9803);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(", ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9805);}while(r); } } } fornext_exit_1430:; do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9809);}while(r); } do{ qbs_set(__STRING_INCERROR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9811);}while(r); do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER- 1 ; if(!qbevent)break;evnt(9812);}while(r); S_11144:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(9813);if(r)goto S_11144;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 10 ),__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9813);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(9813);}while(r); } do{ goto LABEL_INCLUDELINE; if(!qbevent)break;evnt(9814);}while(r); } do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(9817);}while(r); do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL- 1 ; if(!qbevent)break;evnt(9818);}while(r); S_11152:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(9819);if(r)goto S_11152;} do{ *__LONG_LAYOUTOK=*__LONG_LAYOUTOK_BACKUP; if(!qbevent)break;evnt(9821);}while(r); do{ qbs_set(__STRING_LAYOUT,__STRING_LAYOUT_BACKUP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9822);}while(r); do{ qbs_set(__STRING_LAYOUTCOMMENT,__STRING_LAYOUTCOMMENT_BACKUP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9823);}while(r); } } dl_exit_1428:; } S_11159:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9833);if(r)goto S_11159;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1432; sub_file_print(tmp_fileno,qbs_new_txt_len("[layout check]",14), 0 , 0 , 1 ); if (new_error) goto skip1432; skip1432: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9834);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1433; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("[",1),__STRING_LAYOUTORIGINAL),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip1433; skip1433: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9835);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1434; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("[",1),__STRING_LAYOUT),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip1434; skip1434: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9836);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1435; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_LAYOUTOK)), 1 , 0 , 1 ); if (new_error) goto skip1435; skip1435: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9837);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1436; sub_file_print(tmp_fileno,qbs_new_txt_len("[end layout check]",18), 0 , 0 , 1 ); if (new_error) goto skip1436; skip1436: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9838);}while(r); } S_11166:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(9844);if(r)goto S_11166;} S_11167:; if ((-(*__LONG_CONTINUELINEFROM!= 0 ))||new_error){ if(qbevent){evnt(9845);if(r)goto S_11167;} do{ goto LABEL_IDE4; if(!qbevent)break;evnt(9845);}while(r); } S_11170:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUTCOMMENT->len))||new_error){ if(qbevent){evnt(9847);if(r)goto S_11170;} S_11171:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9848);if(r)goto S_11171;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),__STRING_LAYOUTCOMMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9848);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_LAYOUTCOMMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9848);}while(r); } } S_11177:; if ((-(*__LONG_LAYOUTOK== 0 ))||new_error){ if(qbevent){evnt(9851);if(r)goto S_11177;} do{ qbs_set(__STRING_LAYOUT,__STRING_LAYOUTORIGINAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9852);}while(r); }else{ do{ *__LONG_I=func_instr(NULL,__STRING_LAYOUT,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9857);}while(r); S_11181:; while((*__LONG_I)||new_error){ if(qbevent){evnt(9858);if(r)goto S_11181;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(qbs_left(__STRING_LAYOUT,*__LONG_I- 1 ),qbs_new_txt_len(".",1)),qbs_right(__STRING_LAYOUT,__STRING_LAYOUT->len-(*__LONG_I+__STRING_FIX046->len- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9859);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_LAYOUT,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9860);}while(r); } dl_exit_1439:; } do{ *__LONG_X=*__LONG_LHSCONTROLLEVEL; if(!qbevent)break;evnt(9864);}while(r); S_11187:; if ((-(*__INTEGER_CONTROLLEVEL<*__LONG_LHSCONTROLLEVEL))||new_error){ if(qbevent){evnt(9864);if(r)goto S_11187;} do{ *__LONG_X=*__INTEGER_CONTROLLEVEL; if(!qbevent)break;evnt(9864);}while(r); } S_11190:; if ((-(*__LONG_DEFININGTYPE== 2 ))||new_error){ if(qbevent){evnt(9865);if(r)goto S_11190;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(9865);}while(r); } S_11193:; if ((-(*__LONG_DECLARINGLIBRARY== 2 ))||new_error){ if(qbevent){evnt(9866);if(r)goto S_11193;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(9866);}while(r); } do{ qbs_set(__STRING_LAYOUT,qbs_add(func_space(*__LONG_X),__STRING_LAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9867);}while(r); S_11197:; if ((*__LONG_LINECONTINUATION)||new_error){ if(qbevent){evnt(9868);if(r)goto S_11197;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9868);}while(r); } do{ goto LABEL_IDERET4; if(!qbevent)break;evnt(9870);}while(r); } }while(1); dl_exit_300:; LABEL_IDE5:; if(qbevent){evnt(9877);r=0;} do{ *__LONG_LINENUMBER= 0 ; if(!qbevent)break;evnt(9878);}while(r); S_11204:; if ((-(*__INTEGER_CLOSEDMAIN== 0 ))||new_error){ if(qbevent){evnt(9880);if(r)goto S_11204;} do{ SUB_CLOSEMAIN(); if(!qbevent)break;evnt(9880);}while(r); } S_11207:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(9882);if(r)goto S_11207;} do{ *__LONG_LINENUMBER=*__LONG_DEFININGTYPEERROR; if(!qbevent)break;evnt(9882);}while(r); do{ qbs_set(__STRING_A,qbs_new_txt_len("TYPE without END TYPE",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9882);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9882);}while(r); } S_11212:; if ((*__INTEGER_CONTROLLEVEL)||new_error){ if(qbevent){evnt(9885);if(r)goto S_11212;} do{ *__LONG_X=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(9886);}while(r); S_11214:; if ((-(*__LONG_X== 1 ))||new_error){ if(qbevent){evnt(9887);if(r)goto S_11214;} do{ qbs_set(__STRING_A,qbs_new_txt_len("IF without END IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9887);}while(r); } S_11217:; if ((-(*__LONG_X== 2 ))||new_error){ if(qbevent){evnt(9888);if(r)goto S_11217;} do{ qbs_set(__STRING_A,qbs_new_txt_len("FOR without NEXT",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9888);}while(r); } S_11220:; if (((-(*__LONG_X== 3 ))|(-(*__LONG_X== 4 )))||new_error){ if(qbevent){evnt(9889);if(r)goto S_11220;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO without LOOP",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9889);}while(r); } S_11223:; if ((-(*__LONG_X== 5 ))||new_error){ if(qbevent){evnt(9890);if(r)goto S_11223;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE without WEND",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9890);}while(r); } S_11226:; if (((((-(*__LONG_X>= 10 ))&(-(*__LONG_X<= 17 ))))|(-(*__LONG_X== 18 ))|(-(*__LONG_X== 19 )))||new_error){ if(qbevent){evnt(9891);if(r)goto S_11226;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SELECT CASE without END SELECT",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9891);}while(r); } do{ *__LONG_LINENUMBER=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(9892);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9893);}while(r); } S_11232:; if ((qbs_cleanup(qbs_tmp_base,__STRING_SUBFUNC->len))||new_error){ if(qbevent){evnt(9896);if(r)goto S_11232;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB/FUNCTION without END SUB/FUNCTION",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9896);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9896);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 14 ; if (new_error) goto skip1443; sub_file_print(tmp_fileno,qbs_new_txt_len("exit(99);",9), 0 , 0 , 1 ); if (new_error) goto skip1443; skip1443: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9899);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 14 ; if (new_error) goto skip1444; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1444; skip1444: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9900);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(9903);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("clear.txt",9)), 4 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9904);}while(r); S_11240:; fornext_value1446= 1 ; fornext_finalvalue1446=*__LONG_IDN; fornext_step1446= 1 ; if (fornext_step1446<0) fornext_step_negative1446=1; else fornext_step_negative1446=0; if (new_error) goto fornext_error1446; goto fornext_entrylabel1446; while(1){ fornext_value1446=fornext_step1446+(*__LONG_I); fornext_entrylabel1446: *__LONG_I=fornext_value1446; if (fornext_step_negative1446){ if (fornext_value1446fornext_finalvalue1446) break; } fornext_error1446:; if(qbevent){evnt(9906);if(r)goto S_11240;} S_11241:; if ((*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2850)))||new_error){ if(qbevent){evnt(9908);if(r)goto S_11241;} do{ qbs_set(__STRING_SUBFUNC,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2382)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9909);}while(r); do{ goto LABEL_CLEARSTATICSCOPE; if(!qbevent)break;evnt(9910);}while(r); } do{ *__LONG_A=qbs_asc(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2382)),256,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9913);}while(r); S_11246:; if (((-(*__LONG_A== 0 ))|(-(*__LONG_A== 32 )))||new_error){ if(qbevent){evnt(9914);if(r)goto S_11246;} do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9915);}while(r); LABEL_CLEARSTATICSCOPE:; if(qbevent){evnt(9916);r=0;} S_11248:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+512)))||new_error){ if(qbevent){evnt(9918);if(r)goto S_11248;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(9919);}while(r); S_11250:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9920);if(r)goto S_11250;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9920);}while(r); } S_11253:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))== -1 ))||new_error){ if(qbevent){evnt(9921);if(r)goto S_11253;} do{ goto LABEL_CLEARERASERETURNED; if(!qbevent)break;evnt(9921);}while(r); } do{ *__LONG_CLEARERASERETURN= 1 ; if(!qbevent)break;evnt(9922);}while(r); do{ goto LABEL_CLEARERASE; if(!qbevent)break;evnt(9922);}while(r); } S_11259:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+536)))||new_error){ if(qbevent){evnt(9925);if(r)goto S_11259;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(9926);}while(r); S_11261:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9927);if(r)goto S_11261;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9927);}while(r); } do{ qbs_set(__STRING_BYTES,FUNC_VARIABLESIZE(&(pass1447= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9928);}while(r); S_11265:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9929);if(r)goto S_11265;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9929);}while(r); } do{ *__LONG_TYP=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(9931);}while(r); S_11269:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(9932);if(r)goto S_11269;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_STR2(__LONG_I),__STRING1_SP3),FUNC_STR2(&(pass1448=*__LONG_TYP& 511 ))),__STRING1_SP3),qbs_new_txt_len("0",1)),__STRING1_SP3),qbs_new_txt_len("0",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9933);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_STR2(__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9935);}while(r); } do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass1449= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9937);}while(r); S_11275:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9938);if(r)goto S_11275;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9938);}while(r); } S_11278:; if ((*__LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(9939);if(r)goto S_11278;} S_11279:; if ((*__LONG_TYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(9940);if(r)goto S_11279;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1450; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memset((void*)(",15),__STRING_E),qbs_new_txt_len("->chr),0,",9)),__STRING_BYTES),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1450; skip1450: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9941);}while(r); do{ goto LABEL_CLEARED; if(!qbevent)break;evnt(9942);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1451; sub_file_print(tmp_fileno,qbs_add(__STRING_E,qbs_new_txt_len("->len=0;",8)), 0 , 0 , 1 ); if (new_error) goto skip1451; skip1451: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9944);}while(r); do{ goto LABEL_CLEARED; if(!qbevent)break;evnt(9945);}while(r); } } S_11287:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(9948);if(r)goto S_11287;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1452; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memset((void*)",14),__STRING_E),qbs_new_txt_len(",0,",3)),__STRING_BYTES),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1452; skip1452: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9949);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1453; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("*",1),__STRING_E),qbs_new_txt_len("=0;",3)), 0 , 0 , 1 ); if (new_error) goto skip1453; skip1453: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9951);}while(r); } do{ goto LABEL_CLEARED; if(!qbevent)break;evnt(9953);}while(r); } } LABEL_CLEARED:; if(qbevent){evnt(9958);r=0;} LABEL_CLEARERASERETURNED:; if(qbevent){evnt(9959);r=0;} } fornext_exit_1445:; do{ sub_close( 12 ,1); if(!qbevent)break;evnt(9961);}while(r); S_11297:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9963);if(r)goto S_11297;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1454; sub_file_print(tmp_fileno,qbs_new_txt_len("finished making program!",24), 0 , 0 , 1 ); if (new_error) goto skip1454; skip1454: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9964);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1455; sub_file_print(tmp_fileno,qbs_new_txt_len("recompile=",10), 0 , 0 , 0 ); if (new_error) goto skip1455; sub_file_print(tmp_fileno,qbs_str((int16)(*__INTEGER_RECOMPILE)), 1 , 0 , 1 ); if (new_error) goto skip1455; skip1455: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9965);}while(r); } S_11301:; fornext_value1457= 1 ; fornext_finalvalue1457=*__LONG_IDN; fornext_step1457= 1 ; if (fornext_step1457<0) fornext_step_negative1457=1; else fornext_step_negative1457=0; if (new_error) goto fornext_error1457; goto fornext_entrylabel1457; while(1){ fornext_value1457=fornext_step1457+(*__LONG_I); fornext_entrylabel1457: *__LONG_I=fornext_value1457; if (fornext_step_negative1457){ if (fornext_value1457fornext_finalvalue1457) break; } fornext_error1457:; if(qbevent){evnt(9969);if(r)goto S_11301;} S_11302:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(9970);if(r)goto S_11302;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(9972);}while(r); S_11304:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9973);if(r)goto S_11304;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9973);}while(r); } S_11307:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9975);if(r)goto S_11307;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1458; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling cmem sf! checking:",30), 0 , 0 , 0 ); if (new_error) goto skip1458; sub_file_print(tmp_fileno,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)), 0 , 0 , 1 ); if (new_error) goto skip1458; skip1458: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9975);}while(r); } S_11310:; if ((*(int32*)(((char*)__UDT_ID)+(2852)))||new_error){ if(qbevent){evnt(9977);if(r)goto S_11310;} S_11311:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9979);if(r)goto S_11311;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1459; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling cmem sf! It's a sub/func arg!",41), 0 , 0 , 1 ); if (new_error) goto skip1459; skip1459: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9979);}while(r); } do{ *__LONG_I2=*(int32*)(((char*)__UDT_ID)+(2852)); if(!qbevent)break;evnt(9981);}while(r); do{ *__LONG_X=*(int16*)(((char*)__UDT_ID)+(2856)); if(!qbevent)break;evnt(9982);}while(r); S_11316:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9984);if(r)goto S_11316;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1460; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling cmem sf! values:",28), 0 , 0 , 0 ); if (new_error) goto skip1460; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I2)), 1 , 0 , 0 ); if (new_error) goto skip1460; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_X)), 1 , 0 , 1 ); if (new_error) goto skip1460; skip1460: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9984);}while(r); } S_11319:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*__LONG_I2)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*__LONG_X, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(9987);if(r)goto S_11319;} do{ sub_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*__LONG_I2)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*__LONG_X, 1 ,func_chr( 1 ),1); if(!qbevent)break;evnt(9988);}while(r); S_11321:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(9991);if(r)goto S_11321;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1461; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling cmem sf! setting:",29), 0 , 0 , 0 ); if (new_error) goto skip1461; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I2)), 1 , 0 , 0 ); if (new_error) goto skip1461; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_X)), 1 , 0 , 1 ); if (new_error) goto skip1461; skip1461: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(9991);}while(r); } do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(9994);}while(r); } } } } fornext_exit_1456:; do{ *__LONG_UNRESOLVED= 0 ; if(!qbevent)break;evnt(10000);}while(r); S_11330:; fornext_value1463= 1 ; fornext_finalvalue1463=*__LONG_IDN; fornext_step1463= 1 ; if (fornext_step1463<0) fornext_step_negative1463=1; else fornext_step_negative1463=0; if (new_error) goto fornext_error1463; goto fornext_entrylabel1463; while(1){ fornext_value1463=fornext_step1463+(*__LONG_I); fornext_entrylabel1463: *__LONG_I=fornext_value1463; if (fornext_step_negative1463){ if (fornext_value1463fornext_finalvalue1463) break; } fornext_error1463:; if(qbevent){evnt(10001);if(r)goto S_11330;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(10002);}while(r); S_11332:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10003);if(r)goto S_11332;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10003);}while(r); } S_11335:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10005);if(r)goto S_11335;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1464; sub_file_print(tmp_fileno,qbs_new_txt_len("checking id named:",18), 0 , 0 , 0 ); if (new_error) goto skip1464; sub_file_print(tmp_fileno,qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1), 0 , 0 , 1 ); if (new_error) goto skip1464; skip1464: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10005);}while(r); } S_11338:; if ((*(int16*)(((char*)__UDT_ID)+(544)))||new_error){ if(qbevent){evnt(10007);if(r)goto S_11338;} S_11339:; fornext_value1466= 1 ; fornext_finalvalue1466=*(int16*)(((char*)__UDT_ID)+(808)); fornext_step1466= 1 ; if (fornext_step1466<0) fornext_step_negative1466=1; else fornext_step_negative1466=0; if (new_error) goto fornext_error1466; goto fornext_entrylabel1466; while(1){ fornext_value1466=fornext_step1466+(*__LONG_I2); fornext_entrylabel1466: *__LONG_I2=fornext_value1466; if (fornext_step_negative1466){ if (fornext_value1466fornext_finalvalue1466) break; } fornext_error1466:; if(qbevent){evnt(10008);if(r)goto S_11339;} do{ *__LONG_T=string2l(func_mid(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),(*__LONG_I2* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10009);}while(r); S_11341:; if ((-(*__LONG_T> 0 ))||new_error){ if(qbevent){evnt(10010);if(r)goto S_11341;} S_11342:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(10011);if(r)goto S_11342;} S_11343:; if (((*__LONG_T&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(10012);if(r)goto S_11343;} S_11344:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10014);if(r)goto S_11344;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1467; sub_file_print(tmp_fileno,qbs_new_txt_len("checking argument ",18), 0 , 0 , 0 ); if (new_error) goto skip1467; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I2)), 1 , 0 , 0 ); if (new_error) goto skip1467; sub_file_print(tmp_fileno,qbs_new_txt_len(" of ",4), 0 , 0 , 0 ); if (new_error) goto skip1467; sub_file_print(tmp_fileno,qbs_str((int16)(*(int16*)(((char*)__UDT_ID)+(808)))), 1 , 0 , 1 ); if (new_error) goto skip1467; skip1467: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10014);}while(r); } do{ *__LONG_NELE=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID)+(2644)),100,1),*__LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10016);}while(r); do{ *__LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID)+(2744)),100,1),*__LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10017);}while(r); S_11349:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10019);if(r)goto S_11349;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1468; sub_file_print(tmp_fileno,qbs_new_txt_len("nele=",5), 0 , 0 , 0 ); if (new_error) goto skip1468; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_NELE)), 1 , 0 , 1 ); if (new_error) goto skip1468; skip1468: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10019);}while(r); } S_11352:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10020);if(r)goto S_11352;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1469; sub_file_print(tmp_fileno,qbs_new_txt_len("nelereq=",8), 0 , 0 , 0 ); if (new_error) goto skip1469; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_NELEREQ)), 1 , 0 , 1 ); if (new_error) goto skip1469; skip1469: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10020);}while(r); } S_11355:; if ((-(*__LONG_NELE!=*__LONG_NELEREQ))||new_error){ if(qbevent){evnt(10022);if(r)goto S_11355;} S_11356:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10024);if(r)goto S_11356;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1470; sub_file_print(tmp_fileno,qbs_new_txt_len("mismatch detected!",18), 0 , 0 , 1 ); if (new_error) goto skip1470; skip1470: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10024);}while(r); } do{ *__LONG_UNRESOLVED=*__LONG_UNRESOLVED+ 1 ; if(!qbevent)break;evnt(10026);}while(r); do{ *__INTEGER_SFLISTN=*__INTEGER_SFLISTN+ 1 ; if(!qbevent)break;evnt(10027);}while(r); do{ tmp_long=array_check((*__INTEGER_SFLISTN)-__ARRAY_LONG_SFIDLIST[4],__ARRAY_LONG_SFIDLIST[5]); if (!new_error) ((int32*)(__ARRAY_LONG_SFIDLIST[0]))[tmp_long]=*__LONG_I; if(!qbevent)break;evnt(10028);}while(r); do{ tmp_long=array_check((*__INTEGER_SFLISTN)-__ARRAY_INTEGER_SFARGLIST[4],__ARRAY_INTEGER_SFARGLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_SFARGLIST[0]))[tmp_long]=*__LONG_I2; if(!qbevent)break;evnt(10029);}while(r); do{ tmp_long=array_check((*__INTEGER_SFLISTN)-__ARRAY_INTEGER_SFELELIST[4],__ARRAY_INTEGER_SFELELIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_SFELELIST[0]))[tmp_long]=*__LONG_NELEREQ; if(!qbevent)break;evnt(10030);}while(r); } } } } } fornext_exit_1465:; } } fornext_exit_1462:; S_11371:; if ((-(*__LONG_UNRESOLVED> 0 ))||new_error){ if(qbevent){evnt(10040);if(r)goto S_11371;} S_11372:; if ((-(*__LONG_LASTUNRESOLVED== -1 ))||new_error){ if(qbevent){evnt(10041);if(r)goto S_11372;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(10043);}while(r); S_11374:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10044);if(r)goto S_11374;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1471; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling to resolve array elements (first time)",50), 0 , 0 , 1 ); if (new_error) goto skip1471; skip1471: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10045);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1472; sub_file_print(tmp_fileno,qbs_new_txt_len("sflistn=",8), 0 , 0 , 0 ); if (new_error) goto skip1472; sub_file_print(tmp_fileno,qbs_str((int16)(*__INTEGER_SFLISTN)), 1 , 0 , 1 ); if (new_error) goto skip1472; skip1472: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10046);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1473; sub_file_print(tmp_fileno,qbs_new_txt_len("oldsflistn=",11), 0 , 0 , 0 ); if (new_error) goto skip1473; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_OLDSFLISTN)), 1 , 0 , 1 ); if (new_error) goto skip1473; skip1473: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10047);}while(r); } }else{ S_11380:; if ((-(*__LONG_UNRESOLVED<*__LONG_LASTUNRESOLVED))||new_error){ if(qbevent){evnt(10051);if(r)goto S_11380;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(10052);}while(r); S_11382:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10053);if(r)goto S_11382;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1474; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling to resolve array elements (not first time)",54), 0 , 0 , 1 ); if (new_error) goto skip1474; skip1474: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10054);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1475; sub_file_print(tmp_fileno,qbs_new_txt_len("sflistn=",8), 0 , 0 , 0 ); if (new_error) goto skip1475; sub_file_print(tmp_fileno,qbs_str((int16)(*__INTEGER_SFLISTN)), 1 , 0 , 1 ); if (new_error) goto skip1475; skip1475: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10055);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1476; sub_file_print(tmp_fileno,qbs_new_txt_len("oldsflistn=",11), 0 , 0 , 0 ); if (new_error) goto skip1476; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_OLDSFLISTN)), 1 , 0 , 1 ); if (new_error) goto skip1476; skip1476: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10056);}while(r); } } } } do{ *__LONG_LASTUNRESOLVED=*__LONG_UNRESOLVED; if(!qbevent)break;evnt(10061);}while(r); S_11391:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10087);if(r)goto S_11391;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1477; sub_file_print(tmp_fileno,qbs_new_txt_len("Beginning COMMON array list check...",36), 0 , 0 , 1 ); if (new_error) goto skip1477; skip1477: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10087);}while(r); } do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(10088);}while(r); S_11395:; fornext_value1479= 1 ; fornext_finalvalue1479=*__LONG_COMMONARRAYLISTN; fornext_step1479= 1 ; if (fornext_step1479<0) fornext_step_negative1479=1; else fornext_step_negative1479=0; if (new_error) goto fornext_error1479; goto fornext_entrylabel1479; while(1){ fornext_value1479=fornext_step1479+(*__LONG_X); fornext_entrylabel1479: *__LONG_X=fornext_value1479; if (fornext_step_negative1479){ if (fornext_value1479fornext_finalvalue1479) break; } fornext_error1479:; if(qbevent){evnt(10089);if(r)goto S_11395;} do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10090);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10090);}while(r); do{ qbs_set(__STRING_TYP,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10091);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10091);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10092);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10092);}while(r); do{ *__LONG_DIMSHARED2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10093);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10093);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10095);}while(r); S_11405:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10096);if(r)goto S_11405;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10096);}while(r); } S_11408:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(10097);if(r)goto S_11408;} do{ qbs_set(__STRING_VARNAME,qbs_add(__STRING_VARNAME,FUNC_TYPE2SYMBOL(__STRING_TYP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10097);}while(r); } S_11411:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10098);if(r)goto S_11411;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10098);}while(r); } S_11414:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10100);if(r)goto S_11414;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1480; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("Checking for array '",20),__STRING_VARNAME),qbs_new_txt_len("'...",4)), 0 , 0 , 1 ); if (new_error) goto skip1480; skip1480: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10100);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10102);}while(r); S_11418:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10103);if(r)goto S_11418;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10103);}while(r); } S_11421:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(10104);if(r)goto S_11421;} S_11422:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(10105);if(r)goto S_11422;} do{ goto LABEL_FOUNDCOMMONARRAY2; if(!qbevent)break;evnt(10105);}while(r); } S_11425:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(10106);if(r)goto S_11425;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(10106);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10106);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(10106);}while(r); } S_11431:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10107);if(r)goto S_11431;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10107);}while(r); } } dl_exit_1481:; LABEL_FOUNDCOMMONARRAY2:; if(qbevent){evnt(10109);r=0;} S_11435:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10111);if(r)goto S_11435;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1482; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("Found array '",13),__STRING_VARNAME),qbs_new_txt_len("!",1)), 0 , 0 , 1 ); if (new_error) goto skip1482; skip1482: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10111);}while(r); } S_11438:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))== -1 ))||new_error){ if(qbevent){evnt(10113);if(r)goto S_11438;} S_11439:; if ((-(((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]!= 0 ))||new_error){ if(qbevent){evnt(10114);if(r)goto S_11439;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(10114);}while(r); } S_11442:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10115);if(r)goto S_11442;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1483; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Recompiling to resolve elements of:",35),__STRING_VARNAME), 0 , 0 , 1 ); if (new_error) goto skip1483; skip1483: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10115);}while(r); } } } fornext_exit_1478:; S_11447:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10118);if(r)goto S_11447;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1484; sub_file_print(tmp_fileno,qbs_new_txt_len("Finished COMMON array list check!",33), 0 , 0 , 1 ); if (new_error) goto skip1484; skip1484: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10118);}while(r); } S_11450:; if ((*__INTEGER_RECOMPILE)||new_error){ if(qbevent){evnt(10120);if(r)goto S_11450;} LABEL_DO_RECOMPILE:; if(qbevent){evnt(10121);r=0;} S_11451:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10122);if(r)goto S_11451;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1485; sub_file_print(tmp_fileno,qbs_new_txt_len("Recompile required!",19), 0 , 0 , 1 ); if (new_error) goto skip1485; skip1485: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10122);}while(r); } do{ *__INTEGER_RECOMPILE= 0 ; if(!qbevent)break;evnt(10123);}while(r); S_11455:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(10124);if(r)goto S_11455;} do{ *__LONG_IDERECOMPILE= 1 ; if(!qbevent)break;evnt(10124);}while(r); } S_11458:; fornext_value1487= 1 ; fornext_finalvalue1487= 255 ; fornext_step1487= 1 ; if (fornext_step1487<0) fornext_step_negative1487=1; else fornext_step_negative1487=0; if (new_error) goto fornext_error1487; goto fornext_entrylabel1487; while(1){ fornext_value1487=fornext_step1487+(*__LONG_CLOSEALL); fornext_entrylabel1487: *__LONG_CLOSEALL=fornext_value1487; if (fornext_step_negative1487){ if (fornext_value1487fornext_finalvalue1487) break; } fornext_error1487:; if(qbevent){evnt(10125);if(r)goto S_11458;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(10125);}while(r); } fornext_exit_1486:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 2 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10126);}while(r); do{ goto LABEL_RECOMPILE; if(!qbevent)break;evnt(10127);}while(r); } S_11464:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10130);if(r)goto S_11464;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1488; sub_file_print(tmp_fileno,qbs_new_txt_len("Beginning label check...",24), 0 , 0 , 1 ); if (new_error) goto skip1488; skip1488: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10130);}while(r); } S_11467:; fornext_value1490= 1 ; fornext_finalvalue1490=*__LONG_NLABELS; fornext_step1490= 1 ; if (fornext_step1490<0) fornext_step_negative1490=1; else fornext_step_negative1490=0; if (new_error) goto fornext_error1490; goto fornext_entrylabel1490; while(1){ fornext_value1490=fornext_step1490+(*__LONG_R); fornext_entrylabel1490: *__LONG_R=fornext_value1490; if (fornext_step_negative1490){ if (fornext_value1490fornext_finalvalue1490) break; } fornext_error1490:; if(qbevent){evnt(10131);if(r)goto S_11467;} S_11468:; if ((*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+274)))||new_error){ if(qbevent){evnt(10133);if(r)goto S_11468;} do{ qbs_set(__STRING_A,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10134);}while(r); do{ *__LONG_IGNORE=FUNC_VALIDLABEL(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10135);}while(r); do{ *__LONG_V=FUNC_HASHFIND(__STRING_A,&(pass1491= 2 ),__LONG_IGNORE,__LONG_R2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10136);}while(r); LABEL_ADDLABCHK7:; if(qbevent){evnt(10137);r=0;} S_11472:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(10138);if(r)goto S_11472;} S_11473:; if ((-(*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R2)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))==*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+274))))||new_error){ if(qbevent){evnt(10139);if(r)goto S_11473;} do{ *__LONG_LINENUMBER=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270)); if(!qbevent)break;evnt(10140);}while(r); do{ qbs_set(__STRING_A,qbs_new_txt_len("Common label within a SUB/FUNCTION",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10140);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10140);}while(r); } S_11478:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(10142);if(r)goto S_11478;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R2); if(!qbevent)break;evnt(10142);}while(r); do{ goto LABEL_ADDLABCHK7; if(!qbevent)break;evnt(10142);}while(r); } } } S_11484:; if ((-(*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278))== 0 ))||new_error){ if(qbevent){evnt(10147);if(r)goto S_11484;} S_11485:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_POSSIBLESUBNAMELABELS,qbs_add(qbs_add(__STRING1_SP,qbs_ucase(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1)))),__STRING1_SP),0)))||new_error){ if(qbevent){evnt(10149);if(r)goto S_11485;} S_11486:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_SUBNAMELABELS,qbs_add(qbs_add(__STRING1_SP,qbs_ucase(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1)))),__STRING1_SP),0)== 0 )))||new_error){ if(qbevent){evnt(10150);if(r)goto S_11486;} do{ qbs_set(__STRING_SUBNAMELABELS,qbs_add(qbs_add(__STRING_SUBNAMELABELS,qbs_ucase(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1)))),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10151);}while(r); S_11488:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10152);if(r)goto S_11488;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1492; sub_file_print(tmp_fileno,qbs_new_txt_len("Recompiling to resolve label:",29), 0 , 0 , 0 ); if (new_error) goto skip1492; sub_file_print(tmp_fileno,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1)), 0 , 0 , 1 ); if (new_error) goto skip1492; skip1492: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10152);}while(r); } do{ goto LABEL_DO_RECOMPILE; if(!qbevent)break;evnt(10153);}while(r); } } do{ *__LONG_LINENUMBER=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270)); if(!qbevent)break;evnt(10157);}while(r); do{ qbs_set(__STRING_A,qbs_new_txt_len("Label not defined",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10157);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10157);}while(r); } S_11498:; if ((*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+269)))||new_error){ if(qbevent){evnt(10161);if(r)goto S_11498;} do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(10164);}while(r); do{ qbs_set(__STRING_A,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10165);}while(r); do{ *__LONG_IGNORE=FUNC_VALIDLABEL(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10166);}while(r); do{ *__LONG_V=FUNC_HASHFIND(__STRING_A,&(pass1493= 2 ),__LONG_IGNORE,__LONG_R2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10167);}while(r); LABEL_ADDLABCHK4:; if(qbevent){evnt(10168);r=0;} S_11503:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(10169);if(r)goto S_11503;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(10170);}while(r); S_11505:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(10171);if(r)goto S_11505;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R2); if(!qbevent)break;evnt(10171);}while(r); do{ goto LABEL_ADDLABCHK4; if(!qbevent)break;evnt(10171);}while(r); } } S_11510:; if ((-(*__LONG_X!= 1 ))||new_error){ if(qbevent){evnt(10173);if(r)goto S_11510;} do{ *__LONG_LINENUMBER=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+270)); if(!qbevent)break;evnt(10173);}while(r); do{ qbs_set(__STRING_A,qbs_new_txt_len("Ambiguous DATA label",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10173);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10173);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1494; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ptrszint data_at_LABEL_",23),__STRING_A),qbs_new_txt_len("=",1)),FUNC_STR2(&(pass1495=*(int64*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+261))))),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1494; skip1494: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10176);}while(r); } } fornext_exit_1489:; S_11518:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10181);if(r)goto S_11518;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1496; sub_file_print(tmp_fileno,qbs_new_txt_len("Finished check!",15), 0 , 0 , 1 ); if (new_error) goto skip1496; skip1496: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10181);}while(r); } do{ sub_close( 12 ,1); if(!qbevent)break;evnt(10190);}while(r); do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10193);}while(r); do{ *__INTEGER_DEFDATAHANDLE= 18 ; if(!qbevent)break;evnt(10194);}while(r); do{ sub_close( 13 ,1); if(!qbevent)break;evnt(10195);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12)), 5 ,NULL,NULL, 13 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10195);}while(r); do{ sub_close( 19 ,1); if(!qbevent)break;evnt(10196);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12)), 5 ,NULL,NULL, 19 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10196);}while(r); S_11528:; if ((*__LONG_CONSOLE)||new_error){ if(qbevent){evnt(10198);if(r)goto S_11528;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1497; sub_file_print(tmp_fileno,qbs_new_txt_len("int32 console=1;",16), 0 , 0 , 1 ); if (new_error) goto skip1497; skip1497: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10199);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1498; sub_file_print(tmp_fileno,qbs_new_txt_len("int32 console=0;",16), 0 , 0 , 1 ); if (new_error) goto skip1498; skip1498: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10201);}while(r); } S_11533:; if ((*__LONG_SCREENHIDE)||new_error){ if(qbevent){evnt(10204);if(r)goto S_11533;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1499; sub_file_print(tmp_fileno,qbs_new_txt_len("int32 screen_hide_startup=1;",28), 0 , 0 , 1 ); if (new_error) goto skip1499; skip1499: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10205);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1500; sub_file_print(tmp_fileno,qbs_new_txt_len("int32 screen_hide_startup=0;",28), 0 , 0 , 1 ); if (new_error) goto skip1500; skip1500: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10207);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1501; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("ptrszint data_size=",19),FUNC_STR2(__LONG_DATAOFFSET)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1501; skip1501: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10211);}while(r); S_11539:; if ((-(*__LONG_DATAOFFSET== 0 ))||new_error){ if(qbevent){evnt(10212);if(r)goto S_11539;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1502; sub_file_print(tmp_fileno,qbs_new_txt_len("uint8 *data=(uint8*)calloc(1,1);",32), 0 , 0 , 1 ); if (new_error) goto skip1502; skip1502: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10214);}while(r); }else{ S_11542:; if ((-(*__LONG_INLINE_DATA== 0 ))||new_error){ if(qbevent){evnt(10218);if(r)goto S_11542;} S_11543:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(10219);if(r)goto S_11543;} do{ qbs_set(__STRING_X,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10220);}while(r); do{ sub_put2( 16 ,NULL,byte_element((uint64)__STRING_X->chr,__STRING_X->len,byte_element_1503),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10220);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1504; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len("{",1)), 0 , 0 , 1 ); if (new_error) goto skip1504; skip1504: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10221);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1505; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern char *binary_____temp",28),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("__data_bin_start;",17)), 0 , 0 , 1 ); if (new_error) goto skip1505; skip1505: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10222);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1506; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1506; skip1506: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10223);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1507; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("uint8 *data=(uint8*)&binary_____temp",36),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("__data_bin_start;",17)), 0 , 0 , 1 ); if (new_error) goto skip1507; skip1507: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10224);}while(r); } S_11551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(10226);if(r)goto S_11551;} do{ qbs_set(__STRING_X,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10227);}while(r); do{ sub_put2( 16 ,NULL,byte_element((uint64)__STRING_X->chr,__STRING_X->len,byte_element_1508),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10227);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1509; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len("{",1)), 0 , 0 , 1 ); if (new_error) goto skip1509; skip1509: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10228);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1510; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern char *_binary____temp",28),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16)), 0 , 0 , 1 ); if (new_error) goto skip1510; skip1510: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10229);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1511; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1511; skip1511: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10230);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1512; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("uint8 *data=(uint8*)&_binary____temp",36),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16)), 0 , 0 , 1 ); if (new_error) goto skip1512; skip1512: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10231);}while(r); } }else{ do{ sub_close( 16 ,1); if(!qbevent)break;evnt(10235);}while(r); do{ *__LONG_FF=func_freefile(); if(!qbevent)break;evnt(10236);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data.bin",8)), 2 ,NULL,NULL,*__LONG_FF,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10237);}while(r); do{ qbs_set(__STRING_X,func_space(func_lof(*__LONG_FF))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10238);}while(r); do{ sub_get2(*__LONG_FF,NULL,__STRING_X,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10239);}while(r); do{ sub_close(*__LONG_FF,1); if(!qbevent)break;evnt(10240);}while(r); do{ qbs_set(__STRING_X2,qbs_new_txt_len("uint8 inline_data[]={",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10241);}while(r); S_11567:; fornext_value1514= 1 ; fornext_finalvalue1514=__STRING_X->len; fornext_step1514= 1 ; if (fornext_step1514<0) fornext_step_negative1514=1; else fornext_step_negative1514=0; if (new_error) goto fornext_error1514; goto fornext_entrylabel1514; while(1){ fornext_value1514=fornext_step1514+(*__LONG_I); fornext_entrylabel1514: *__LONG_I=fornext_value1514; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1514){ if (fornext_value1514fornext_finalvalue1514) break; } fornext_error1514:; if(qbevent){evnt(10242);if(r)goto S_11567;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,((qbs*)(((uint64*)(__ARRAY_STRING_INLINEDATASTR[0]))[array_check((qbs_asc(__STRING_X,*__LONG_I))-__ARRAY_STRING_INLINEDATASTR[4],__ARRAY_STRING_INLINEDATASTR[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10243);}while(r); } fornext_exit_1513:; do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,qbs_new_txt_len("0};",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10245);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1516; sub_file_print(tmp_fileno,__STRING_X2, 0 , 0 , 1 ); if (new_error) goto skip1516; skip1516: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10246);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1517; sub_file_print(tmp_fileno,qbs_new_txt_len("uint8 *data=&inline_data[0];",28), 0 , 0 , 1 ); if (new_error) goto skip1517; skip1517: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10247);}while(r); do{ qbs_set(__STRING_X,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10248);}while(r); do{ qbs_set(__STRING_X2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10248);}while(r); } } S_11577:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10252);if(r)goto S_11577;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1518; sub_file_print(tmp_fileno,qbs_new_txt_len("Beginning generation of code for saving/sharing common array data...",68), 0 , 0 , 1 ); if (new_error) goto skip1518; skip1518: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10252);}while(r); } do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 1 ; if(!qbevent)break;evnt(10253);}while(r); do{ *__LONG_NCOMMONTMP= 0 ; if(!qbevent)break;evnt(10254);}while(r); do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(10255);}while(r); S_11583:; fornext_value1520= 1 ; fornext_finalvalue1520=*__LONG_COMMONARRAYLISTN; fornext_step1520= 1 ; if (fornext_step1520<0) fornext_step_negative1520=1; else fornext_step_negative1520=0; if (new_error) goto fornext_error1520; goto fornext_entrylabel1520; while(1){ fornext_value1520=fornext_step1520+(*__LONG_X); fornext_entrylabel1520: *__LONG_X=fornext_value1520; if (fornext_step_negative1520){ if (fornext_value1520fornext_finalvalue1520) break; } fornext_error1520:; if(qbevent){evnt(10256);if(r)goto S_11583;} do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10257);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10257);}while(r); do{ qbs_set(__STRING_TYP,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10258);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10258);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10259);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10259);}while(r); do{ *__LONG_DIMSHARED2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10260);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(10260);}while(r); do{ qbs_set(__STRING_PUREVARNAME,__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10263);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10264);}while(r); S_11594:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10265);if(r)goto S_11594;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10265);}while(r); } S_11597:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(10266);if(r)goto S_11597;} do{ qbs_set(__STRING_VARNAME,qbs_add(__STRING_VARNAME,FUNC_TYPE2SYMBOL(__STRING_TYP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10266);}while(r); } S_11600:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10267);if(r)goto S_11600;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10267);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10268);}while(r); S_11604:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10269);if(r)goto S_11604;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10269);}while(r); } S_11607:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(10270);if(r)goto S_11607;} S_11608:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(10271);if(r)goto S_11608;} do{ goto LABEL_FOUNDCOMMONARRAY; if(!qbevent)break;evnt(10271);}while(r); } S_11611:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(10272);if(r)goto S_11611;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(10272);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10272);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(10272);}while(r); } S_11617:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10273);if(r)goto S_11617;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10273);}while(r); } } dl_exit_1521:; do{ qbs_set(__STRING_A,qbs_new_txt_len("COMMON array unlocatable",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10275);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10275);}while(r); LABEL_FOUNDCOMMONARRAY:; if(qbevent){evnt(10276);r=0;} S_11623:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10277);if(r)goto S_11623;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1522; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("Found common array '",20),__STRING_VARNAME),qbs_new_txt_len("'!",2)), 0 , 0 , 1 ); if (new_error) goto skip1522; skip1522: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10277);}while(r); } do{ *__LONG_I=*__LONG_CURRENTID; if(!qbevent)break;evnt(10279);}while(r); do{ *__LONG_ARRAYTYPE=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(10280);}while(r); do{ *__LONG_ARRAYELEMENTS=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(10281);}while(r); do{ qbs_set(__STRING_E,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10282);}while(r); S_11630:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(10283);if(r)goto S_11630;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,FUNC_TYPEVALUE2SYMBOL(__LONG_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10283);}while(r); } S_11633:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10284);if(r)goto S_11633;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10284);}while(r); } do{ qbs_set(__STRING_N,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10285);}while(r); do{ qbs_set(__STRING_N2,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10286);}while(r); do{ *__LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(10287);}while(r); do{ *__LONG_COMMAND= 3 ; if(!qbevent)break;evnt(10290);}while(r); S_11640:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(10291);if(r)goto S_11640;} S_11641:; if ((-((*__LONG_T&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(10292);if(r)goto S_11641;} do{ *__LONG_COMMAND= 4 ; if(!qbevent)break;evnt(10293);}while(r); } } S_11645:; if ((-(*__LONG_ARRAYELEMENTS== -1 ))||new_error){ if(qbevent){evnt(10305);if(r)goto S_11645;} do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain",8)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10311);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1523; sub_file_print(tmp_fileno,qbs_new_txt_len("if (int32val==2){",17), 0 , 0 , 1 ); if (new_error) goto skip1523; skip1523: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10312);}while(r); do{ qbs_set(__STRING_X,FUNC_STR2(&(pass1524=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10314);}while(r); do{ qbs_set(__STRING_X1,qbs_add(qbs_new_txt_len("chainarraybuf",13),__STRING_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10315);}while(r); do{ qbs_set(__STRING_X2,qbs_add(qbs_new_txt_len("chainarraybufsiz",16),__STRING_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10316);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1525; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("static uint8 *",14),__STRING_X1),qbs_new_txt_len("=(uint8*)malloc(1);",19)), 0 , 0 , 1 ); if (new_error) goto skip1525; skip1525: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10317);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip1526; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("static int64 ",13),__STRING_X2),qbs_new_txt_len("=0;",3)), 0 , 0 , 1 ); if (new_error) goto skip1526; skip1526: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10318);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1527; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1527; skip1527: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10320);}while(r); S_11654:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10322);if(r)goto S_11654;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1528; sub_file_print(tmp_fileno,qbs_new_txt_len("if (int32val==3){",17), 0 , 0 , 1 ); if (new_error) goto skip1528; skip1528: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10322);}while(r); } S_11657:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10323);if(r)goto S_11657;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1529; sub_file_print(tmp_fileno,qbs_new_txt_len("if (int32val==4){",17), 0 , 0 , 1 ); if (new_error) goto skip1529; skip1529: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10323);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1530; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_X2,qbs_new_txt_len("+=4; ",5)),__STRING_X1),qbs_new_txt_len("=(uint8*)realloc(",17)),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len("); *(int32*)(",13)),__STRING_X1),qbs_new_txt_len("+",1)),__STRING_X2),qbs_new_txt_len("-4)=int32val;",13)), 0 , 0 , 1 ); if (new_error) goto skip1530; skip1530: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10324);}while(r); S_11661:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10326);if(r)goto S_11661;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1531; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1531; skip1531: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10328);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1532; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_X2,qbs_new_txt_len("+=8; ",5)),__STRING_X1),qbs_new_txt_len("=(uint8*)realloc(",17)),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len("); *(int64*)(",13)),__STRING_X1),qbs_new_txt_len("+",1)),__STRING_X2),qbs_new_txt_len("-8)=int64val;",13)), 0 , 0 , 1 ); if (new_error) goto skip1532; skip1532: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10329);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1533; sub_file_print(tmp_fileno,qbs_new_txt_len("bytes=int64val>>3;",18), 0 , 0 , 1 ); if (new_error) goto skip1533; skip1533: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10330);}while(r); } S_11666:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10333);if(r)goto S_11666;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1534; sub_file_print(tmp_fileno,qbs_new_txt_len("bytes=1;",8), 0 , 0 , 1 ); if (new_error) goto skip1534; skip1534: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10333);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1535; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1535; skip1535: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10336);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1536; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_X2,qbs_new_txt_len("+=4; ",5)),__STRING_X1),qbs_new_txt_len("=(uint8*)realloc(",17)),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len("); *(int32*)(",13)),__STRING_X1),qbs_new_txt_len("+",1)),__STRING_X2),qbs_new_txt_len("-4)=int32val;",13)), 0 , 0 , 1 ); if (new_error) goto skip1536; skip1536: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10337);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1537; sub_file_print(tmp_fileno,qbs_new_txt_len("while(int32val--){",18), 0 , 0 , 1 ); if (new_error) goto skip1537; skip1537: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10340);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1538; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1538; skip1538: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10341);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1539; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_X2,qbs_new_txt_len("+=8; ",5)),__STRING_X1),qbs_new_txt_len("=(uint8*)realloc(",17)),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len("); *(int64*)(",13)),__STRING_X1),qbs_new_txt_len("+",1)),__STRING_X2),qbs_new_txt_len("-8)=int64val;",13)), 0 , 0 , 1 ); if (new_error) goto skip1539; skip1539: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10342);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1540; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int64val2,8,",50),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1540; skip1540: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10343);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1541; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_X2,qbs_new_txt_len("+=8; ",5)),__STRING_X1),qbs_new_txt_len("=(uint8*)realloc(",17)),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len("); *(int64*)(",13)),__STRING_X1),qbs_new_txt_len("+",1)),__STRING_X2),qbs_new_txt_len("-8)=int64val2;",14)), 0 , 0 , 1 ); if (new_error) goto skip1541; skip1541: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10344);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1542; sub_file_print(tmp_fileno,qbs_new_txt_len("bytes*=(int64val2-int64val+1);",30), 0 , 0 , 1 ); if (new_error) goto skip1542; skip1542: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10345);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1543; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1543; skip1543: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10346);}while(r); S_11678:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10348);if(r)goto S_11678;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1544; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_X2,qbs_new_txt_len("+=bytes; ",9)),__STRING_X1),qbs_new_txt_len("=(uint8*)realloc(",17)),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1544; skip1544: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10350);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1545; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)(",38),__STRING_X1),qbs_new_txt_len("+",1)),__STRING_X2),qbs_new_txt_len("-bytes),bytes,",14)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1545; skip1545: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10351);}while(r); } S_11682:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10354);if(r)goto S_11682;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1546; sub_file_print(tmp_fileno,qbs_new_txt_len("bytei=0;",8), 0 , 0 , 1 ); if (new_error) goto skip1546; skip1546: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10355);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1547; sub_file_print(tmp_fileno,qbs_new_txt_len("while(bytei>3); ",17)),__STRING_X1),qbs_new_txt_len("=(uint8*)realloc(",17)),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip1550; skip1550: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10359);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1551; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)(",38),__STRING_X1),qbs_new_txt_len("+",1)),__STRING_X2),qbs_new_txt_len("-(int64val>>3)),(int64val>>3),",30)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1551; skip1551: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10360);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1552; sub_file_print(tmp_fileno,qbs_new_txt_len("bytei++;",8), 0 , 0 , 1 ); if (new_error) goto skip1552; skip1552: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10361);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1553; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1553; skip1553: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10362);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1554; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1554; skip1554: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10366);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1555; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1555; skip1555: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10367);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1556; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1556; skip1556: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10369);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(10370);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain",5)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10375);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1557; sub_file_print(tmp_fileno,qbs_new_txt_len("int32val=2;",11), 0 , 0 , 1 ); if (new_error) goto skip1557; skip1557: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10376);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1558; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1558; skip1558: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10377);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1559; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)",37),__STRING_X1),qbs_new_txt_len(",",1)),__STRING_X2),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1559; skip1559: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10379);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(10380);}while(r); }else{ do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain",8)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10390);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1560; sub_file_print(tmp_fileno,qbs_new_txt_len("if (int32val==2){",17), 0 , 0 , 1 ); if (new_error) goto skip1560; skip1560: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10392);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1561; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1561; skip1561: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10393);}while(r); S_11705:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10395);if(r)goto S_11705;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1562; sub_file_print(tmp_fileno,qbs_new_txt_len("if (int32val==3){",17), 0 , 0 , 1 ); if (new_error) goto skip1562; skip1562: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10395);}while(r); } S_11708:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10396);if(r)goto S_11708;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1563; sub_file_print(tmp_fileno,qbs_new_txt_len("if (int32val==4){",17), 0 , 0 , 1 ); if (new_error) goto skip1563; skip1563: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10396);}while(r); } S_11711:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10398);if(r)goto S_11711;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1564; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1564; skip1564: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10400);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1565; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1565; skip1565: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10405);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10408);}while(r); S_11716:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10409);if(r)goto S_11716;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1566; sub_file_print(tmp_fileno,qbs_new_txt_len("bytes=1;",8), 0 , 0 , 1 ); if (new_error) goto skip1566; skip1566: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10409);}while(r); } S_11719:; fornext_value1568= 1 ; fornext_finalvalue1568=*__LONG_ARRAYELEMENTS; fornext_step1568= 1 ; if (fornext_step1568<0) fornext_step_negative1568=1; else fornext_step_negative1568=0; if (new_error) goto fornext_error1568; goto fornext_entrylabel1568; while(1){ fornext_value1568=fornext_step1568+(*__LONG_X2); fornext_entrylabel1568: *__LONG_X2=fornext_value1568; if (fornext_step_negative1568){ if (fornext_value1568fornext_finalvalue1568) break; } fornext_error1568:; if(qbevent){evnt(10410);if(r)goto S_11719;} S_11720:; if ((-(*__LONG_X2>*__LONG_NCOMMONTMP))||new_error){ if(qbevent){evnt(10413);if(r)goto S_11720;} do{ *__LONG_NCOMMONTMP=*__LONG_NCOMMONTMP+ 1 ; if(!qbevent)break;evnt(10414);}while(r); S_11722:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10416);if(r)goto S_11722;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1569; sub_file_print(tmp_fileno,qbs_new_txt_len("Calling DIM2(...)...",20), 0 , 0 , 1 ); if (new_error) goto skip1569; skip1569: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10416);}while(r); } S_11725:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10417);if(r)goto S_11725;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10417);}while(r); } do{ *__LONG_RETVAL=FUNC_DIM2(qbs_add(qbs_new_txt_len("___RESERVED_COMMON_LBOUND",25),FUNC_STR2(__LONG_NCOMMONTMP)),qbs_new_txt_len("_INTEGER64",10),&(pass1570= 0 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10418);}while(r); S_11729:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10419);if(r)goto S_11729;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10419);}while(r); } do{ *__LONG_RETVAL=FUNC_DIM2(qbs_add(qbs_new_txt_len("___RESERVED_COMMON_UBOUND",25),FUNC_STR2(__LONG_NCOMMONTMP)),qbs_new_txt_len("_INTEGER64",10),&(pass1571= 0 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10420);}while(r); S_11733:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10421);if(r)goto S_11733;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10421);}while(r); } S_11736:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10422);if(r)goto S_11736;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1572; sub_file_print(tmp_fileno,qbs_new_txt_len("Finished calling DIM2(...)!",27), 0 , 0 , 1 ); if (new_error) goto skip1572; skip1572: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10422);}while(r); } S_11739:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10423);if(r)goto S_11739;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10423);}while(r); } } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1573; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1573; skip1573: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10428);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1574; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("*__INTEGER64____RESERVED_COMMON_LBOUND",38),FUNC_STR2(__LONG_X2)),qbs_new_txt_len("=int64val;",10)), 0 , 0 , 1 ); if (new_error) goto skip1574; skip1574: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10429);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1575; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int64val2,8,",50),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1575; skip1575: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10430);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1576; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("*__INTEGER64____RESERVED_COMMON_UBOUND",38),FUNC_STR2(__LONG_X2)),qbs_new_txt_len("=int64val2;",11)), 0 , 0 , 1 ); if (new_error) goto skip1576; skip1576: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10431);}while(r); S_11747:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10432);if(r)goto S_11747;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1577; sub_file_print(tmp_fileno,qbs_new_txt_len("bytes*=(int64val2-int64val+1);",30), 0 , 0 , 1 ); if (new_error) goto skip1577; skip1577: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10432);}while(r); } S_11750:; if ((-(*__LONG_X2> 1 ))||new_error){ if(qbevent){evnt(10433);if(r)goto S_11750;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(__STRING_E,__STRING1_SP),qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10433);}while(r); } do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_E,qbs_new_txt_len("___RESERVED_COMMON_LBOUND",25)),FUNC_STR2(__LONG_X2)),__STRING1_SP),qbs_new_txt_len("TO",2)),__STRING1_SP),qbs_new_txt_len("___RESERVED_COMMON_UBOUND",25)),FUNC_STR2(__LONG_X2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10434);}while(r); } fornext_exit_1567:; S_11755:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10437);if(r)goto S_11755;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1578; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Calling DIM2(",13),__STRING_PUREVARNAME),qbs_new_txt_len(",",1)),__STRING_TYP),qbs_new_txt_len(",0,",3)),__STRING_E),qbs_new_txt_len(")...",4)), 0 , 0 , 1 ); if (new_error) goto skip1578; skip1578: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10437);}while(r); } S_11758:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10438);if(r)goto S_11758;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10438);}while(r); } do{ *__INTEGER_REDIMOPTION= 1 ; if(!qbevent)break;evnt(10440);}while(r); do{ *__LONG_RETVAL=FUNC_DIM2(__STRING_PUREVARNAME,__STRING_TYP,&(pass1579= 0 ),__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10441);}while(r); S_11763:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10442);if(r)goto S_11763;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10442);}while(r); } do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(10443);}while(r); S_11767:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10444);if(r)goto S_11767;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1580; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Finished calling DIM2(",22),__STRING_PUREVARNAME),qbs_new_txt_len(",",1)),__STRING_TYP),qbs_new_txt_len(",0,",3)),__STRING_E),qbs_new_txt_len(")!",2)), 0 , 0 , 1 ); if (new_error) goto skip1580; skip1580: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10444);}while(r); } S_11770:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10445);if(r)goto S_11770;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10445);}while(r); } S_11773:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10447);if(r)goto S_11773;} do{ qbs_set(__STRING_VARNAME,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_VARNAME,__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10449);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_VARNAME),&(pass1581= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10450);}while(r); S_11776:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10451);if(r)goto S_11776;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10451);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1582; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4)), 0 , 0 , 1 ); if (new_error) goto skip1582; skip1582: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10452);}while(r); } S_11781:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10455);if(r)goto S_11781;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1583; sub_file_print(tmp_fileno,qbs_new_txt_len("bytei=0;",8), 0 , 0 , 1 ); if (new_error) goto skip1583; skip1583: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10456);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1584; sub_file_print(tmp_fileno,qbs_new_txt_len("while(bytei>3,1));",37), 0 , 0 , 1 ); if (new_error) goto skip1587; skip1587: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10460);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1588; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)tqbs->chr,int64val>>3,",59),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1588; skip1588: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10461);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1589; sub_file_print(tmp_fileno,qbs_new_txt_len("bytei++;",8), 0 , 0 , 1 ); if (new_error) goto skip1589; skip1589: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10462);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1590; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1590; skip1590: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10463);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1591; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1591; skip1591: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10467);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1592; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1592; skip1592: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10468);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1593; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1593; skip1593: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10469);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(10470);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain",5)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL, 12 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10474);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1594; sub_file_print(tmp_fileno,qbs_new_txt_len("int32val=2;",11), 0 , 0 , 1 ); if (new_error) goto skip1594; skip1594: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10476);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1595; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1595; skip1595: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10477);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1596; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N2),qbs_new_txt_len("[2]&1){",7)), 0 , 0 , 1 ); if (new_error) goto skip1596; skip1596: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10479);}while(r); S_11799:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10481);if(r)goto S_11799;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1597; sub_file_print(tmp_fileno,qbs_new_txt_len("int32val=3;",11), 0 , 0 , 1 ); if (new_error) goto skip1597; skip1597: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10481);}while(r); } S_11802:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10482);if(r)goto S_11802;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1598; sub_file_print(tmp_fileno,qbs_new_txt_len("int32val=4;",11), 0 , 0 , 1 ); if (new_error) goto skip1598; skip1598: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10482);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1599; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1599; skip1599: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10483);}while(r); S_11806:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10485);if(r)goto S_11806;} do{ *__LONG_BITS=*__LONG_T& 511 ; if(!qbevent)break;evnt(10487);}while(r); S_11808:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(10488);if(r)goto S_11808;} do{ *__LONG_BITS=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_T& 511 )-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(10488);}while(r); } S_11811:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(10489);if(r)goto S_11811;} do{ *__LONG_BITS=*__LONG_TSIZE* 8 ; if(!qbevent)break;evnt(10489);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1600; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),FUNC_STR2(__LONG_BITS)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1600; skip1600: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10490);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1601; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1601; skip1601: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10491);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1602; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int32val=",9),FUNC_STR2(__LONG_ARRAYELEMENTS)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1602; skip1602: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10494);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1603; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int32val,4,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1603; skip1603: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10495);}while(r); S_11819:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(10497);if(r)goto S_11819;} S_11820:; fornext_value1605= 1 ; fornext_finalvalue1605=*__LONG_ARRAYELEMENTS; fornext_step1605= 1 ; if (fornext_step1605<0) fornext_step_negative1605=1; else fornext_step_negative1605=0; if (new_error) goto fornext_error1605; goto fornext_entrylabel1605; while(1){ fornext_value1605=fornext_step1605+(*__LONG_X2); fornext_entrylabel1605: *__LONG_X2=fornext_value1605; if (fornext_step_negative1605){ if (fornext_value1605fornext_finalvalue1605) break; } fornext_error1605:; if(qbevent){evnt(10499);if(r)goto S_11820;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("LBOUND",6),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),__STRING_N),__STRING1_SP),qbs_new_txt_len(",",1)),__STRING1_SP),FUNC_STR2(__LONG_X2)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10501);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1606= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10502);}while(r); S_11823:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10503);if(r)goto S_11823;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10503);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1607; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1607; skip1607: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10504);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1608; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1608; skip1608: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10505);}while(r); do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("UBOUND",6),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),__STRING_N),__STRING1_SP),qbs_new_txt_len(",",1)),__STRING1_SP),FUNC_STR2(__LONG_X2)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10506);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1609= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10507);}while(r); S_11830:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10508);if(r)goto S_11830;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10508);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1610; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1610; skip1610: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10509);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1611; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1611; skip1611: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10510);}while(r); } fornext_exit_1604:; do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_N,__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),qbs_new_txt_len(")",1))),&(pass1612= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10514);}while(r); S_11837:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10515);if(r)goto S_11837;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10515);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1613; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4)), 0 , 0 , 1 ); if (new_error) goto skip1613; skip1613: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10516);}while(r); } S_11842:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(10520);if(r)goto S_11842;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1614; sub_file_print(tmp_fileno,qbs_new_txt_len("bytes=1;",8), 0 , 0 , 1 ); if (new_error) goto skip1614; skip1614: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10523);}while(r); S_11844:; fornext_value1616= 1 ; fornext_finalvalue1616=*__LONG_ARRAYELEMENTS; fornext_step1616= 1 ; if (fornext_step1616<0) fornext_step_negative1616=1; else fornext_step_negative1616=0; if (new_error) goto fornext_error1616; goto fornext_entrylabel1616; while(1){ fornext_value1616=fornext_step1616+(*__LONG_X2); fornext_entrylabel1616: *__LONG_X2=fornext_value1616; if (fornext_step_negative1616){ if (fornext_value1616fornext_finalvalue1616) break; } fornext_error1616:; if(qbevent){evnt(10524);if(r)goto S_11844;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("LBOUND",6),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),__STRING_N),__STRING1_SP),qbs_new_txt_len(",",1)),__STRING1_SP),FUNC_STR2(__LONG_X2)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10525);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1617= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10526);}while(r); S_11847:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10527);if(r)goto S_11847;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10527);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1618; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1618; skip1618: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10528);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1619; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1619; skip1619: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10529);}while(r); do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("UBOUND",6),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),__STRING_N),__STRING1_SP),qbs_new_txt_len(",",1)),__STRING1_SP),FUNC_STR2(__LONG_X2)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10530);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1620= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10531);}while(r); S_11854:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10532);if(r)goto S_11854;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10532);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1621; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("int64val2=",10),__STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1621; skip1621: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10533);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1622; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int64val2,8,",50),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1622; skip1622: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10534);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1623; sub_file_print(tmp_fileno,qbs_new_txt_len("bytes*=(int64val2-int64val+1);",30), 0 , 0 , 1 ); if (new_error) goto skip1623; skip1623: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10535);}while(r); } fornext_exit_1615:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1624; sub_file_print(tmp_fileno,qbs_new_txt_len("bytei=0;",8), 0 , 0 , 1 ); if (new_error) goto skip1624; skip1624: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10538);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1625; sub_file_print(tmp_fileno,qbs_new_txt_len("while(byteilen; int64val<<=3;",33), 0 , 0 , 1 ); if (new_error) goto skip1627; skip1627: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10541);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1628; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)&int64val,8,",49),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1628; skip1628: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10542);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1629; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,byte_element((uint64)tqbs->chr,tqbs->len,",57),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len("),0);",5)), 0 , 0 , 1 ); if (new_error) goto skip1629; skip1629: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10543);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1630; sub_file_print(tmp_fileno,qbs_new_txt_len("bytei++;",8), 0 , 0 , 1 ); if (new_error) goto skip1630; skip1630: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10544);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1631; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1631; skip1631: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10545);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip1632; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1632; skip1632: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10549);}while(r); do{ sub_close( 12 ,1); if(!qbevent)break;evnt(10551);}while(r); } } fornext_exit_1519:; do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(10649);}while(r); S_11875:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(10650);if(r)goto S_11875;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1633; sub_file_print(tmp_fileno,qbs_new_txt_len("Finished generation of code for saving/sharing common array data!",65), 0 , 0 , 1 ); if (new_error) goto skip1633; skip1633: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10650);}while(r); } S_11878:; fornext_value1635= 1 ; fornext_finalvalue1635= 255 ; fornext_step1635= 1 ; if (fornext_step1635<0) fornext_step_negative1635=1; else fornext_step_negative1635=0; if (new_error) goto fornext_error1635; goto fornext_entrylabel1635; while(1){ fornext_value1635=fornext_step1635+(*__LONG_CLOSEALL); fornext_entrylabel1635: *__LONG_CLOSEALL=fornext_value1635; if (fornext_step_negative1635){ if (fornext_value1635fornext_finalvalue1635) break; } fornext_error1635:; if(qbevent){evnt(10653);if(r)goto S_11878;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(10653);}while(r); } fornext_exit_1634:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 2 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10654);}while(r); S_11882:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(10663);if(r)goto S_11882;} do{ goto LABEL_IDERET5; if(!qbevent)break;evnt(10663);}while(r); } LABEL_IDE6:; if(qbevent){evnt(10664);r=0;} S_11885:; if (((-(*__LONG_IDEMODE== 0 ))&(-(*__LONG_NO_C_COMPILE_MODE== 0 )))||new_error){ if(qbevent){evnt(10668);if(r)goto S_11885;} do{ qbs_print(nothingstring,1); skip1636: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10669);}while(r); S_11887:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(10670);if(r)goto S_11887;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("COMPILING C++ CODE INTO EXECUTABLE...",37)); if (new_error) goto skip1637; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip1637: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10671);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("COMPILING C++ CODE INTO EXE...",30)); if (new_error) goto skip1638; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip1638: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10673);}while(r); } S_11892:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_FILE,__STRING_EXTENSION))))||new_error){ if(qbevent){evnt(10675);if(r)goto S_11892;} do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(10676);}while(r); do{ error_goto_line=6; if(!qbevent)break;evnt(10677);}while(r); do{ sub_kill(qbs_add(__STRING_FILE,__STRING_EXTENSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10678);}while(r); do{ error_goto_line=7; if(!qbevent)break;evnt(10679);}while(r); S_11897:; if ((-(*__LONG_E== 1 ))||new_error){ if(qbevent){evnt(10680);if(r)goto S_11897;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("CANNOT CREATE ",14),func_chr( 34 )),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 )),qbs_new_txt_len(" BECAUSE THE FILE IS ALREADY IN USE!",36))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10681);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10681);}while(r); } } } do{ qbs_set(__STRING_O,qbs_lcase(__STRING_OS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10689);}while(r); do{ *__LONG_WIN= 0 ; if(!qbevent)break;evnt(10690);}while(r); S_11905:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(10690);if(r)goto S_11905;} do{ *__LONG_WIN= 1 ; if(!qbevent)break;evnt(10690);}while(r); } do{ *__LONG_LNX= 0 ; if(!qbevent)break;evnt(10691);}while(r); S_11909:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(10691);if(r)goto S_11909;} do{ *__LONG_LNX= 1 ; if(!qbevent)break;evnt(10691);}while(r); } do{ *__LONG_MAC= 0 ; if(!qbevent)break;evnt(10692);}while(r); S_11913:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(10692);if(r)goto S_11913;} do{ *__LONG_MAC= 1 ; if(!qbevent)break;evnt(10692);}while(r); do{ qbs_set(__STRING_O,qbs_new_txt_len("osx",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10692);}while(r); } do{ qbs_set(__STRING_DEFINES,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10693);}while(r); do{ qbs_set(__STRING_DEFINES_HEADER,qbs_new_txt_len(" -D ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10693);}while(r); do{ qbs_set(__STRING_VER,__STRING_VERSION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10694);}while(r); do{ *__LONG_X=func_instr(NULL,__STRING_VER,qbs_new_txt_len(".",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10695);}while(r); S_11921:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(10695);if(r)goto S_11921;} do{ tqbs=__STRING_VER; if (!new_error){ tmp_fileno=*__LONG_X; if (!new_error){ tmp_long= 95 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(10695);}while(r); } do{ qbs_set(__STRING_LIBS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10696);}while(r); S_11925:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 5 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10698);if(r)goto S_11925;} do{ qbs_set(__STRING_DEFINES,qbs_add(qbs_add(__STRING_DEFINES,__STRING_DEFINES_HEADER),qbs_new_txt_len("DEPENDENCY_GL",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10699);}while(r); } S_11928:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 1 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10702);if(r)goto S_11928;} do{ qbs_set(__STRING_D,qbs_new_txt_len("internal\\c\\parts\\video\\font\\ttf\\",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10703);}while(r); S_11930:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_D,qbs_new_txt_len("os\\",3)),__STRING_O),qbs_new_txt_len("\\src.o",6)))== 0 )))||new_error){ if(qbevent){evnt(10705);if(r)goto S_11930;} do{ SUB_BUILD(qbs_add(qbs_add(__STRING_D,qbs_new_txt_len("os\\",3)),__STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10706);}while(r); } do{ qbs_set(__STRING_DEFINES,qbs_add(qbs_add(__STRING_DEFINES,__STRING_DEFINES_HEADER),qbs_new_txt_len("DEPENDENCY_LOADFONT",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10708);}while(r); do{ qbs_set(__STRING_LIBS,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_LIBS,qbs_new_txt_len(" ",1)),qbs_new_txt_len("parts\\video\\font\\ttf\\os\\",24)),__STRING_O),qbs_new_txt_len("\\src.o",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10709);}while(r); } S_11936:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 3 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10712);if(r)goto S_11936;} do{ tmp_long=array_check(( 2 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(10712);}while(r); } S_11939:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 2 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10713);if(r)goto S_11939;} do{ tmp_long=array_check(( 4 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(10713);}while(r); } S_11942:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 3 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10714);if(r)goto S_11942;} do{ tmp_long=array_check(( 4 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(10714);}while(r); } S_11945:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 2 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10717);if(r)goto S_11945;} do{ qbs_set(__STRING_DEFINES,qbs_add(qbs_add(__STRING_DEFINES,__STRING_DEFINES_HEADER),qbs_new_txt_len("DEPENDENCY_AUDIO_CONVERSION",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10718);}while(r); do{ qbs_set(__STRING_D1,qbs_new_txt_len("parts\\audio\\conversion",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10719);}while(r); do{ qbs_set(__STRING_D2,qbs_add(qbs_add(__STRING_D1,qbs_new_txt_len("\\os\\",4)),__STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10720);}while(r); do{ qbs_set(__STRING_D3,qbs_add(qbs_new_txt_len("internal\\c\\",11),__STRING_D2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10721);}while(r); S_11950:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(__STRING_D3,qbs_new_txt_len("\\src.a",6)))== 0 )))||new_error){ if(qbevent){evnt(10722);if(r)goto S_11950;} do{ SUB_BUILD(__STRING_D3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10723);}while(r); } do{ qbs_set(__STRING_LIBS,qbs_add(qbs_add(qbs_add(__STRING_LIBS,qbs_new_txt_len(" ",1)),__STRING_D2),qbs_new_txt_len("\\src.a",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10725);}while(r); } S_11955:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 3 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10728);if(r)goto S_11955;} do{ qbs_set(__STRING_DEFINES,qbs_add(qbs_add(__STRING_DEFINES,__STRING_DEFINES_HEADER),qbs_new_txt_len("DEPENDENCY_AUDIO_DECODE",23))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10730);}while(r); do{ qbs_set(__STRING_D1,qbs_new_txt_len("parts\\audio\\decode\\mp3",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10732);}while(r); do{ qbs_set(__STRING_D2,qbs_add(qbs_add(__STRING_D1,qbs_new_txt_len("\\os\\",4)),__STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10733);}while(r); do{ qbs_set(__STRING_D3,qbs_add(qbs_new_txt_len("internal\\c\\",11),__STRING_D2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10734);}while(r); S_11960:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(__STRING_D3,qbs_new_txt_len("\\src.a",6)))== 0 )))||new_error){ if(qbevent){evnt(10735);if(r)goto S_11960;} do{ SUB_BUILD(__STRING_D3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10736);}while(r); } do{ qbs_set(__STRING_LIBS,qbs_add(qbs_add(qbs_add(__STRING_LIBS,qbs_new_txt_len(" ",1)),__STRING_D2),qbs_new_txt_len("\\src.a",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10738);}while(r); do{ qbs_set(__STRING_D1,qbs_new_txt_len("parts\\audio\\decode\\ogg",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10740);}while(r); do{ qbs_set(__STRING_D2,qbs_add(qbs_add(__STRING_D1,qbs_new_txt_len("\\os\\",4)),__STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10741);}while(r); do{ qbs_set(__STRING_D3,qbs_add(qbs_new_txt_len("internal\\c\\",11),__STRING_D2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10742);}while(r); S_11967:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(__STRING_D3,qbs_new_txt_len("\\src.o",6)))== 0 )))||new_error){ if(qbevent){evnt(10743);if(r)goto S_11967;} do{ SUB_BUILD(__STRING_D3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10744);}while(r); } do{ qbs_set(__STRING_LIBS,qbs_add(qbs_add(qbs_add(__STRING_LIBS,qbs_new_txt_len(" ",1)),__STRING_D2),qbs_new_txt_len("\\src.o",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10746);}while(r); } S_11972:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 4 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10751);if(r)goto S_11972;} do{ qbs_set(__STRING_DEFINES,qbs_add(qbs_add(__STRING_DEFINES,__STRING_DEFINES_HEADER),qbs_new_txt_len("DEPENDENCY_AUDIO_OUT",20))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10752);}while(r); do{ qbs_set(__STRING_D1,qbs_new_txt_len("parts\\audio\\out",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10753);}while(r); do{ qbs_set(__STRING_D2,qbs_add(qbs_add(__STRING_D1,qbs_new_txt_len("\\os\\",4)),__STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10754);}while(r); do{ qbs_set(__STRING_D3,qbs_add(qbs_new_txt_len("internal\\c\\",11),__STRING_D2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10755);}while(r); S_11977:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(__STRING_D3,qbs_new_txt_len("\\src.a",6)))== 0 )))||new_error){ if(qbevent){evnt(10756);if(r)goto S_11977;} do{ SUB_BUILD(__STRING_D3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10757);}while(r); } do{ qbs_set(__STRING_LIBS,qbs_add(qbs_add(qbs_add(__STRING_LIBS,qbs_new_txt_len(" ",1)),__STRING_D2),qbs_new_txt_len("\\src.a",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10759);}while(r); } S_11982:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBS->len))||new_error){ if(qbevent){evnt(10763);if(r)goto S_11982;} do{ qbs_set(__STRING_LIBS,qbs_add(__STRING_LIBS,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10763);}while(r); } do{ SUB_PATH_SLASH_CORRECT(__STRING_LIBS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10764);}while(r); S_11986:; if ((qbs_cleanup(qbs_tmp_base,__STRING_DEFINES->len))||new_error){ if(qbevent){evnt(10765);if(r)goto S_11986;} do{ qbs_set(__STRING_DEFINES,qbs_add(__STRING_DEFINES,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10765);}while(r); } S_11989:; if ((-(*__LONG_MAC== 0 ))||new_error){ if(qbevent){evnt(10768);if(r)goto S_11989;} do{ qbs_set(__STRING_D1,qbs_new_txt_len("parts\\core",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10769);}while(r); do{ qbs_set(__STRING_D2,qbs_add(qbs_add(__STRING_D1,qbs_new_txt_len("\\os\\",4)),__STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10770);}while(r); do{ qbs_set(__STRING_D3,qbs_add(qbs_new_txt_len("internal\\c\\",11),__STRING_D2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10771);}while(r); S_11993:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(__STRING_D3,qbs_new_txt_len("\\src.a",6)))== 0 )))||new_error){ if(qbevent){evnt(10772);if(r)goto S_11993;} do{ SUB_BUILD(__STRING_D3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10773);}while(r); } } do{ qbs_set(__STRING_DEPSTR,qbs_add(__STRING_VER,qbs_new_txt_len("_",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10778);}while(r); S_11998:; fornext_value1642= 1 ; fornext_finalvalue1642=*__LONG_DEPENDENCY_LAST; fornext_step1642= 1 ; if (fornext_step1642<0) fornext_step_negative1642=1; else fornext_step_negative1642=0; if (new_error) goto fornext_error1642; goto fornext_entrylabel1642; while(1){ fornext_value1642=fornext_step1642+(*__LONG_I); fornext_entrylabel1642: *__LONG_I=fornext_value1642; if (fornext_step_negative1642){ if (fornext_value1642fornext_finalvalue1642) break; } fornext_error1642:; if(qbevent){evnt(10779);if(r)goto S_11998;} S_11999:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check((*__LONG_I)-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10780);if(r)goto S_11999;} do{ qbs_set(__STRING_DEPSTR,qbs_add(__STRING_DEPSTR,qbs_new_txt_len("1",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10780);}while(r); }else{ do{ qbs_set(__STRING_DEPSTR,qbs_add(__STRING_DEPSTR,qbs_new_txt_len("0",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10780);}while(r); } } fornext_exit_1641:; do{ qbs_set(__STRING_LIBQB,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" libqb\\os\\",10),__STRING_O),qbs_new_txt_len("\\libqb_",7)),__STRING_DEPSTR),qbs_new_txt_len(".o ",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10782);}while(r); do{ SUB_PATH_SLASH_CORRECT(__STRING_LIBQB); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10783);}while(r); S_12007:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(qbs_new_txt_len("internal\\c\\",11),__STRING_LIBQB))== 0 )))||new_error){ if(qbevent){evnt(10784);if(r)goto S_12007;} do{ sub_chdir(qbs_new_txt_len("internal\\c",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10785);}while(r); S_12009:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(10786);if(r)goto S_12009;} do{ sub_shell2(FUNC_GDB_FIX(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("cmd /c c_compiler\\bin\\g++ -c -s -w -Wall libqb.cpp -D FREEGLUT_STATIC ",70),__STRING_DEFINES),qbs_new_txt_len(" -o libqb\\os\\",13)),__STRING_O),qbs_new_txt_len("\\libqb_",7)),__STRING_DEPSTR),qbs_new_txt_len(".o",2))),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10787);}while(r); }else{ S_12012:; if ((*__LONG_MAC)||new_error){ if(qbevent){evnt(10789);if(r)goto S_12012;} do{ sub_shell2(FUNC_GDB_FIX(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("g++ -c -s -w -Wall libqb.cpp ",29),__STRING_DEFINES),qbs_new_txt_len(" -o libqb/os/",13)),__STRING_O),qbs_new_txt_len("/libqb_",7)),__STRING_DEPSTR),qbs_new_txt_len(".o",2))),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10790);}while(r); }else{ do{ sub_shell2(FUNC_GDB_FIX(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("g++ -c -s -w -Wall libqb.cpp -D FREEGLUT_STATIC ",48),__STRING_DEFINES),qbs_new_txt_len(" -o libqb/os/",13)),__STRING_O),qbs_new_txt_len("/libqb_",7)),__STRING_DEPSTR),qbs_new_txt_len(".o",2))),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10792);}while(r); } } do{ sub_chdir(qbs_new_txt_len("..\\..",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10795);}while(r); } S_12020:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 4 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(10799);if(r)goto S_12020;} S_12021:; if ((*__LONG_MAC)||new_error){ if(qbevent){evnt(10800);if(r)goto S_12021;} do{ qbs_set(__STRING_DEFINES,qbs_add(__STRING_DEFINES,qbs_new_txt_len(" -framework AudioUnit -framework AudioToolbox ",46))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10800);}while(r); } } S_12025:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(10806);if(r)goto S_12025;} S_12026:; fornext_value1644= 1 ; fornext_finalvalue1644=*__LONG_RESOLVESTATICFUNCTIONS; fornext_step1644= 1 ; if (fornext_step1644<0) fornext_step_negative1644=1; else fornext_step_negative1644=0; if (new_error) goto fornext_error1644; goto fornext_entrylabel1644; while(1){ fornext_value1644=fornext_step1644+(*__LONG_X); fornext_entrylabel1644: *__LONG_X=fornext_value1644; if (fornext_step_negative1644){ if (fornext_value1644fornext_finalvalue1644) break; } fornext_error1644:; if(qbevent){evnt(10809);if(r)goto S_12026;} S_12027:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))->len))||new_error){ if(qbevent){evnt(10810);if(r)goto S_12027;} do{ *__LONG_N= 0 ; if(!qbevent)break;evnt(10812);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("internal\\c\\c_compiler\\bin\\nm.exe ",33),func_chr( 34 )),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),func_chr( 34 )),qbs_new_txt_len(" --demangle -g >internal\\temp\\nm_output.txt",43)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10813);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(10814);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10815);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10816);}while(r); S_12033:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(10817);if(r)goto S_12033;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1647; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1647; skip1647: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10818);}while(r); S_12035:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(10819);if(r)goto S_12035;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10821);}while(r); S_12037:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(10822);if(r)goto S_12037;} S_12038:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(10823);if(r)goto S_12038;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(10824);}while(r); do{ *__LONG_X2=func_instr(*__LONG_X1,__STRING_A,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10825);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(10826);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10827);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1649; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),func_mid(__STRING_A,*__LONG_X1,*__LONG_X2-*__LONG_X1+ 1 ,1)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1649; skip1649: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10828);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(10829);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(10831);}while(r); } } } dl_exit_1646:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(10835);}while(r); S_12051:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(10836);if(r)goto S_12051;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Unable to resolve multiple instances of sub/function '",54),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("' in '",6)),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10836);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10836);}while(r); } S_12055:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(10838);if(r)goto S_12055;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(10839);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10840);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10841);}while(r); S_12059:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(10842);if(r)goto S_12059;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1651; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1651; skip1651: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10843);}while(r); S_12061:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(10844);if(r)goto S_12061;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10846);}while(r); S_12063:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(10847);if(r)goto S_12063;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(10848);}while(r); S_12065:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(10849);if(r)goto S_12065;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10850);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1654; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len("{",1)), 0 , 0 , 1 ); if (new_error) goto skip1654; skip1654: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10851);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1655; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),__STRING_S),qbs_new_txt_len("(void);",7)), 0 , 0 , 1 ); if (new_error) goto skip1655; skip1655: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10852);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1656; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1656; skip1656: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10853);}while(r); }else{ do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("externtype",10)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10855);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1657; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len(" ",1)), 0 , 0 , 1 ); if (new_error) goto skip1657; skip1657: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10856);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(10858);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(10859);}while(r); do{ goto dl_exit_1650; if(!qbevent)break;evnt(10860);}while(r); } } } dl_exit_1650:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(10864);}while(r); } S_12082:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(10867);if(r)goto S_12082;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("internal\\c\\c_compiler\\bin\\nm ",29),func_chr( 34 )),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),func_chr( 34 )),qbs_new_txt_len(" -D --demangle -g >.\\internal\\temp\\nm_output_dynamic.txt",56)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10868);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(10869);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10870);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10871);}while(r); S_12087:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(10872);if(r)goto S_12087;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1659; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1659; skip1659: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10873);}while(r); S_12089:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(10874);if(r)goto S_12089;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10876);}while(r); S_12091:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(10877);if(r)goto S_12091;} S_12092:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(10878);if(r)goto S_12092;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(10879);}while(r); do{ *__LONG_X2=func_instr(*__LONG_X1,__STRING_A,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10880);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(10881);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10882);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1661; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),func_mid(__STRING_A,*__LONG_X1,*__LONG_X2-*__LONG_X1+ 1 ,1)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1661; skip1661: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10883);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(10884);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(10886);}while(r); } } } dl_exit_1658:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(10890);}while(r); S_12105:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(10891);if(r)goto S_12105;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Unable to resolve multiple instances of sub/function '",54),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("' in '",6)),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10891);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10891);}while(r); } } S_12110:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(10894);if(r)goto S_12110;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(10895);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10896);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10897);}while(r); S_12114:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(10898);if(r)goto S_12114;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1663; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1663; skip1663: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10899);}while(r); S_12116:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(10900);if(r)goto S_12116;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10902);}while(r); S_12118:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(10903);if(r)goto S_12118;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(10904);}while(r); S_12120:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(10905);if(r)goto S_12120;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10906);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1666; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len("{",1)), 0 , 0 , 1 ); if (new_error) goto skip1666; skip1666: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10907);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1667; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),__STRING_S),qbs_new_txt_len("(void);",7)), 0 , 0 , 1 ); if (new_error) goto skip1667; skip1667: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10908);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1668; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1668; skip1668: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10909);}while(r); }else{ do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("externtype",10)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10911);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1669; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len(" ",1)), 0 , 0 , 1 ); if (new_error) goto skip1669; skip1669: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10912);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(10914);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(10915);}while(r); do{ goto dl_exit_1662; if(!qbevent)break;evnt(10916);}while(r); } } } dl_exit_1662:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(10920);}while(r); S_12136:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(10921);if(r)goto S_12136;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Could not find sub/function '",29),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("' in '",6)),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10921);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10921);}while(r); } } } } fornext_exit_1643:; S_12143:; if ((-(*__LONG_INLINE_DATA== 0 ))||new_error){ if(qbevent){evnt(10927);if(r)goto S_12143;} S_12144:; if ((*__LONG_DATAOFFSET)||new_error){ if(qbevent){evnt(10928);if(r)goto S_12144;} do{ sub_open(qbs_new_txt_len(".\\internal\\c\\makedat_win.txt",28), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10929);}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip1670; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1670; skip1670: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10929);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(10929);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_A,qbs_new_txt_len(" ",1)),__STRING_TMPDIR2),qbs_new_txt_len("data.bin ",9)),__STRING_TMPDIR2),qbs_new_txt_len("data.o",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10930);}while(r); do{ sub_chdir(qbs_new_txt_len(".\\internal\\c",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10931);}while(r); do{ sub_shell2(__STRING_A,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10932);}while(r); do{ sub_chdir(qbs_new_txt_len("..\\..",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10933);}while(r); } } do{ sub_open(qbs_new_txt_len(".\\internal\\c\\makeline_win.txt",29), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10940);}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip1671; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1671; skip1671: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10941);}while(r); do{ qbs_set(__STRING_A,FUNC_GDB_FIX(__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10941);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(10942);}while(r); S_12158:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A, 7 ),qbs_new_txt_len(" ..\\..\\",7))))||new_error){ if(qbevent){evnt(10943);if(r)goto S_12158;} do{ qbs_set(__STRING_A,qbs_left(__STRING_A,__STRING_A->len- 6 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10943);}while(r); } do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len("qbx.cpp",7),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10945);}while(r); S_12162:; if (((-(*__LONG_X!= 0 ))&(-(*__LONG_TEMPFOLDERINDEX!= 1 )))||new_error){ if(qbevent){evnt(10945);if(r)goto S_12162;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len("qbx",3)),FUNC_STR2(__LONG_TEMPFOLDERINDEX)),qbs_new_txt_len(".cpp",4)),qbs_right(__STRING_A,__STRING_A->len-(*__LONG_X+ 6 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10945);}while(r); } S_12165:; if ((*__LONG_CONSOLE)||new_error){ if(qbevent){evnt(10947);if(r)goto S_12165;} S_12166:; if ((-(*__LONG_C_CORE== 0 ))||new_error){ if(qbevent){evnt(10948);if(r)goto S_12166;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len("-mwindows",9),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10949);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len("-mconsole ",10)),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10949);}while(r); } S_12170:; if ((-(*__LONG_C_CORE== 1 ))||new_error){ if(qbevent){evnt(10951);if(r)goto S_12170;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(" -s",3),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10952);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len(" -mconsole",10)),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10952);}while(r); } } S_12175:; if ((-(*__LONG_INLINE_DATA== 0 ))||new_error){ if(qbevent){evnt(10956);if(r)goto S_12175;} S_12176:; if ((*__LONG_DATAOFFSET)||new_error){ if(qbevent){evnt(10958);if(r)goto S_12176;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10959);}while(r); S_12178:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(10960);if(r)goto S_12178;} do{ *__LONG_X=*__LONG_X+ 3 ; if(!qbevent)break;evnt(10961);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X),qbs_new_txt_len(" ",1)),__STRING_TMPDIR2),qbs_new_txt_len("data.o",6)),qbs_new_txt_len(" ",1)),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10962);}while(r); } } } S_12184:; if ((qbs_cleanup(qbs_tmp_base,__STRING_MYLIB->len))||new_error){ if(qbevent){evnt(10969);if(r)goto S_12184;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10970);}while(r); S_12186:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(10971);if(r)goto S_12186;} do{ *__LONG_X=*__LONG_X+ 3 ; if(!qbevent)break;evnt(10972);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X),qbs_new_txt_len(" ",1)),__STRING_MYLIB),qbs_new_txt_len(" ",1)),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10973);}while(r); } } S_12191:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBS->len))||new_error){ if(qbevent){evnt(10979);if(r)goto S_12191;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10980);}while(r); S_12193:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(10981);if(r)goto S_12193;} do{ *__LONG_X=*__LONG_X+ 5 ; if(!qbevent)break;evnt(10982);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),__STRING_LIBS),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10983);}while(r); } } S_12198:; if ((qbs_cleanup(qbs_tmp_base,__STRING_DEFINES->len))||new_error){ if(qbevent){evnt(10988);if(r)goto S_12198;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10989);}while(r); S_12200:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(10990);if(r)goto S_12200;} do{ *__LONG_X=*__LONG_X+ 5 ; if(!qbevent)break;evnt(10991);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),__STRING_DEFINES),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10992);}while(r); } } do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10997);}while(r); S_12206:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(10998);if(r)goto S_12206;} do{ *__LONG_X=*__LONG_X+ 5 ; if(!qbevent)break;evnt(10999);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),__STRING_LIBQB),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11000);}while(r); } do{ qbs_set(__STRING_A,qbs_add(__STRING_A,FUNC_IDEZFILENAME(qbs_add(qbs_add(qbs_new_txt_len("..\\..\\",6),__STRING_FILE),__STRING_EXTENSION)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11003);}while(r); do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(11005);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("recompile_win.bat",17)), 4 ,NULL,NULL,*__LONG_FFH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11006);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1684; sub_file_print(tmp_fileno,qbs_new_txt_len("@echo off",9), 0 , 0 , 1 ); if (new_error) goto skip1684; skip1684: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11007);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1685; sub_file_print(tmp_fileno,qbs_new_txt_len("cd %0\\..\\",9), 0 , 0 , 1 ); if (new_error) goto skip1685; skip1685: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11008);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1686; sub_file_print(tmp_fileno,qbs_new_txt_len("echo Recompiling...",19), 0 , 0 , 1 ); if (new_error) goto skip1686; skip1686: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11009);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1687; sub_file_print(tmp_fileno,qbs_new_txt_len("cd ../c",7), 0 , 0 , 1 ); if (new_error) goto skip1687; skip1687: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11010);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1688; sub_file_print(tmp_fileno,__STRING_A, 0 , 0 , 1 ); if (new_error) goto skip1688; skip1688: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11011);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1689; sub_file_print(tmp_fileno,qbs_new_txt_len("pause",5), 0 , 0 , 1 ); if (new_error) goto skip1689; skip1689: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11012);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(11013);}while(r); do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(11015);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("debug_win.bat",13)), 4 ,NULL,NULL,*__LONG_FFH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11016);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1690; sub_file_print(tmp_fileno,qbs_new_txt_len("@echo off",9), 0 , 0 , 1 ); if (new_error) goto skip1690; skip1690: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11017);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1691; sub_file_print(tmp_fileno,qbs_new_txt_len("cd %0\\..\\",9), 0 , 0 , 1 ); if (new_error) goto skip1691; skip1691: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11018);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1692; sub_file_print(tmp_fileno,qbs_new_txt_len("cd ../..",8), 0 , 0 , 1 ); if (new_error) goto skip1692; skip1692: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11019);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1693; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo C++ Debugging: ",20),__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len(" using gdb.exe",14)), 0 , 0 , 1 ); if (new_error) goto skip1693; skip1693: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11020);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1694; sub_file_print(tmp_fileno,qbs_new_txt_len("echo Debugger commands:",23), 0 , 0 , 1 ); if (new_error) goto skip1694; skip1694: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11021);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1695; sub_file_print(tmp_fileno,qbs_new_txt_len("echo After the debugger launches type 'run' to start your program",65), 0 , 0 , 1 ); if (new_error) goto skip1695; skip1695: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11022);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1696; sub_file_print(tmp_fileno,qbs_new_txt_len("echo After your program crashes type 'list' to find where the problem is and fix/report it",90), 0 , 0 , 1 ); if (new_error) goto skip1696; skip1696: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11023);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1697; sub_file_print(tmp_fileno,qbs_new_txt_len("echo Type 'quit' to exit",24), 0 , 0 , 1 ); if (new_error) goto skip1697; skip1697: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11024);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1698; sub_file_print(tmp_fileno,qbs_new_txt_len("echo (the GDB debugger has many other useful commands, this advice is for beginners)",84), 0 , 0 , 1 ); if (new_error) goto skip1698; skip1698: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11025);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1699; sub_file_print(tmp_fileno,qbs_new_txt_len("pause",5), 0 , 0 , 1 ); if (new_error) goto skip1699; skip1699: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11026);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1700; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("internal\\c\\c_compiler\\bin\\gdb.exe ",34),func_chr( 34 )),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip1700; skip1700: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11027);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1701; sub_file_print(tmp_fileno,qbs_new_txt_len("pause",5), 0 , 0 , 1 ); if (new_error) goto skip1701; skip1701: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11028);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(11029);}while(r); S_12235:; if ((-(*__LONG_NO_C_COMPILE_MODE== 0 ))||new_error){ if(qbevent){evnt(11031);if(r)goto S_12235;} do{ sub_chdir(qbs_new_txt_len(".\\internal\\c",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11032);}while(r); do{ sub_shell2(__STRING_A,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11033);}while(r); do{ sub_chdir(qbs_new_txt_len("..\\..",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11034);}while(r); } } S_12241:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(11039);if(r)goto S_12241;} S_12242:; fornext_value1703= 1 ; fornext_finalvalue1703=*__LONG_RESOLVESTATICFUNCTIONS; fornext_step1703= 1 ; if (fornext_step1703<0) fornext_step_negative1703=1; else fornext_step_negative1703=0; if (new_error) goto fornext_error1703; goto fornext_entrylabel1703; while(1){ fornext_value1703=fornext_step1703+(*__LONG_X); fornext_entrylabel1703: *__LONG_X=fornext_value1703; if (fornext_step_negative1703){ if (fornext_value1703fornext_finalvalue1703) break; } fornext_error1703:; if(qbevent){evnt(11040);if(r)goto S_12242;} S_12243:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))->len))||new_error){ if(qbevent){evnt(11041);if(r)goto S_12243;} do{ *__LONG_N= 0 ; if(!qbevent)break;evnt(11043);}while(r); S_12245:; if ((-(*__LONG_MACOSX== 0 ))||new_error){ if(qbevent){evnt(11044);if(r)goto S_12245;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("nm ",3),func_chr( 34 )),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),func_chr( 34 )),qbs_new_txt_len(" --demangle -g >./internal/temp/nm_output.txt 2>./internal/temp/nm_error.txt",76)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11044);}while(r); } S_12248:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(11045);if(r)goto S_12248;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("nm ",3),func_chr( 34 )),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),func_chr( 34 )),qbs_new_txt_len(" >./internal/temp/nm_output.txt 2>./internal/temp/nm_error.txt",62)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11045);}while(r); } S_12251:; if ((-(*__LONG_MACOSX== 0 ))||new_error){ if(qbevent){evnt(11047);if(r)goto S_12251;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(11048);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11049);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11050);}while(r); S_12255:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(11051);if(r)goto S_12255;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1706; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1706; skip1706: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11052);}while(r); S_12257:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(11053);if(r)goto S_12257;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11055);}while(r); S_12259:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(11056);if(r)goto S_12259;} S_12260:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(11057);if(r)goto S_12260;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(11058);}while(r); do{ *__LONG_X2=func_instr(*__LONG_X1,__STRING_A,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11059);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(11060);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11061);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1708; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),func_mid(__STRING_A,*__LONG_X1,*__LONG_X2-*__LONG_X1+ 1 ,1)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1708; skip1708: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11062);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(11063);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(11065);}while(r); } } } dl_exit_1705:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(11069);}while(r); S_12273:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(11070);if(r)goto S_12273;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Unable to resolve multiple instances of sub/function '",54),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("' in '",6)),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11070);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11070);}while(r); } } S_12278:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(11073);if(r)goto S_12278;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(11074);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11075);}while(r); do{ qbs_set(__STRING_S2,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11075);}while(r); S_12282:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(11076);if(r)goto S_12282;} do{ qbs_set(__STRING_S,qbs_add(qbs_new_txt_len(" _",2),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11076);}while(r); } do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11077);}while(r); S_12286:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(11078);if(r)goto S_12286;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1710; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1710; skip1710: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11079);}while(r); S_12288:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(11080);if(r)goto S_12288;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11082);}while(r); S_12290:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(11083);if(r)goto S_12290;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(11084);}while(r); S_12292:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(11085);if(r)goto S_12292;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11086);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1713; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len("{",1)), 0 , 0 , 1 ); if (new_error) goto skip1713; skip1713: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11087);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1714; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),__STRING_S2),qbs_new_txt_len("(void);",7)), 0 , 0 , 1 ); if (new_error) goto skip1714; skip1714: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11088);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1715; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1715; skip1715: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11089);}while(r); }else{ do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("externtype",10)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11091);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1716; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len(" ",1)), 0 , 0 , 1 ); if (new_error) goto skip1716; skip1716: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11092);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(11094);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(11095);}while(r); do{ goto dl_exit_1709; if(!qbevent)break;evnt(11096);}while(r); } } } dl_exit_1709:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(11100);}while(r); } S_12309:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(11103);if(r)goto S_12309;} S_12310:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(11104);if(r)goto S_12310;} do{ goto LABEL_MACOSX_LIBFIND_FAILED; if(!qbevent)break;evnt(11104);}while(r); } do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("nm ",3),func_chr( 34 )),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),func_chr( 34 )),qbs_new_txt_len(" -D --demangle -g >./internal/temp/nm_output_dynamic.txt 2>./internal/temp/nm_error.txt",87)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11105);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(11106);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11107);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11108);}while(r); S_12317:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(11109);if(r)goto S_12317;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1718; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1718; skip1718: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11110);}while(r); S_12319:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(11111);if(r)goto S_12319;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11113);}while(r); S_12321:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(11114);if(r)goto S_12321;} S_12322:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(11115);if(r)goto S_12322;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(11116);}while(r); do{ *__LONG_X2=func_instr(*__LONG_X1,__STRING_A,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11117);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(11118);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11119);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1720; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),func_mid(__STRING_A,*__LONG_X1,*__LONG_X2-*__LONG_X1+ 1 ,1)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip1720; skip1720: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11120);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(11121);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(11123);}while(r); } } } dl_exit_1717:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(11127);}while(r); S_12335:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(11128);if(r)goto S_12335;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Unable to resolve multiple instances of sub/function '",54),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("' in '",6)),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11128);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11128);}while(r); } } S_12340:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(11131);if(r)goto S_12340;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(11132);}while(r); do{ qbs_set(__STRING_S,qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11133);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 3 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11134);}while(r); S_12344:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(11135);if(r)goto S_12344;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1722; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1722; skip1722: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11136);}while(r); S_12346:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(11137);if(r)goto S_12346;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11139);}while(r); S_12348:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(11140);if(r)goto S_12348;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(11141);}while(r); S_12350:; if ((-(((int32*)(__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[0]))[array_check((*__LONG_X)-__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[4],__ARRAY_LONG_RESOLVESTATICFUNCTION_METHOD[5])]== 1 ))||new_error){ if(qbevent){evnt(11142);if(r)goto S_12350;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10)), 5 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11143);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1725; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len("{",1)), 0 , 0 , 1 ); if (new_error) goto skip1725; skip1725: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11144);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1726; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("extern void ",12),__STRING_S),qbs_new_txt_len("(void);",7)), 0 , 0 , 1 ); if (new_error) goto skip1726; skip1726: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11145);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1727; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip1727; skip1727: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11146);}while(r); }else{ do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("externtype",10)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11148);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1728; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("extern ",7),func_chr( 34 )),qbs_new_txt_len("C",1)),func_chr( 34 )),qbs_new_txt_len(" ",1)), 0 , 0 , 1 ); if (new_error) goto skip1728; skip1728: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11149);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(11151);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(11152);}while(r); do{ goto dl_exit_1721; if(!qbevent)break;evnt(11153);}while(r); } } } dl_exit_1721:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(11157);}while(r); LABEL_MACOSX_LIBFIND_FAILED:; if(qbevent){evnt(11158);r=0;} S_12366:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(11159);if(r)goto S_12366;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Could not find sub/function '",29),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5])]))),qbs_new_txt_len("' in '",6)),((qbs*)(((uint64*)(__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[0]))[array_check((*__LONG_X)-__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[4],__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5])]))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11159);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11159);}while(r); } } } } fornext_exit_1702:; S_12373:; if ((-(*__LONG_INLINE_DATA== 0 ))||new_error){ if(qbevent){evnt(11165);if(r)goto S_12373;} S_12374:; if ((*__LONG_DATAOFFSET)||new_error){ if(qbevent){evnt(11166);if(r)goto S_12374;} S_12375:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[32BIT]",7),0)))||new_error){ if(qbevent){evnt(11167);if(r)goto S_12375;} do{ qbs_set(__STRING_B,qbs_new_txt_len("32",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11167);}while(r); }else{ do{ qbs_set(__STRING_B,qbs_new_txt_len("64",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11167);}while(r); } do{ sub_open(qbs_add(qbs_add(qbs_new_txt_len(".\\internal\\c\\makedat_lnx",24),__STRING_B),qbs_new_txt_len(".txt",4)), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11168);}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip1729; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1729; skip1729: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11168);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(11168);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_A,qbs_new_txt_len(" ",1)),__STRING_TMPDIR2),qbs_new_txt_len("data.bin ",9)),__STRING_TMPDIR2),qbs_new_txt_len("data.o",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11169);}while(r); do{ sub_chdir(qbs_new_txt_len(".\\internal\\c",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11170);}while(r); do{ sub_shell2(__STRING_A,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11171);}while(r); do{ sub_chdir(qbs_new_txt_len("..\\..",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11172);}while(r); } } S_12389:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(11176);if(r)goto S_12389;} do{ sub_open(qbs_new_txt_len("./internal/c/makeline_osx.txt",29), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11177);}while(r); }else{ do{ sub_open(qbs_new_txt_len("./internal/c/makeline_lnx.txt",29), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11179);}while(r); } do{ tmp_fileno= 150 ; if (new_error) goto skip1730; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1730; skip1730: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11182);}while(r); do{ qbs_set(__STRING_A,FUNC_GDB_FIX(__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11182);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(11183);}while(r); do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len("qbx.cpp",7),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11185);}while(r); S_12398:; if (((-(*__LONG_X!= 0 ))&(-(*__LONG_TEMPFOLDERINDEX!= 1 )))||new_error){ if(qbevent){evnt(11185);if(r)goto S_12398;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len("qbx",3)),FUNC_STR2(__LONG_TEMPFOLDERINDEX)),qbs_new_txt_len(".cpp",4)),qbs_right(__STRING_A,__STRING_A->len-(*__LONG_X+ 6 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11185);}while(r); } S_12401:; if ((-(*__LONG_INLINE_DATA== 0 ))||new_error){ if(qbevent){evnt(11187);if(r)goto S_12401;} S_12402:; if ((*__LONG_DATAOFFSET)||new_error){ if(qbevent){evnt(11189);if(r)goto S_12402;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len("-lX11",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11190);}while(r); S_12404:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(11191);if(r)goto S_12404;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len(" ",1)),__STRING_TMPDIR2),qbs_new_txt_len("data.o ",7)),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11192);}while(r); } } } S_12409:; if ((qbs_cleanup(qbs_tmp_base,__STRING_MYLIB->len))||new_error){ if(qbevent){evnt(11199);if(r)goto S_12409;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11200);}while(r); S_12411:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(11201);if(r)goto S_12411;} do{ *__LONG_X=*__LONG_X+ 5 ; if(!qbevent)break;evnt(11202);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),qbs_new_txt_len(" ",1)),__STRING_MYLIBOPT),qbs_new_txt_len(" ",1)),__STRING_MYLIB),qbs_new_txt_len(" ",1)),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11203);}while(r); } } S_12416:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBS->len))||new_error){ if(qbevent){evnt(11208);if(r)goto S_12416;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11209);}while(r); S_12418:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(11210);if(r)goto S_12418;} do{ *__LONG_X=*__LONG_X+ 5 ; if(!qbevent)break;evnt(11211);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),__STRING_LIBS),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11212);}while(r); } } S_12423:; if ((qbs_cleanup(qbs_tmp_base,__STRING_DEFINES->len))||new_error){ if(qbevent){evnt(11217);if(r)goto S_12423;} do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11218);}while(r); S_12425:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(11219);if(r)goto S_12425;} do{ *__LONG_X=*__LONG_X+ 5 ; if(!qbevent)break;evnt(11220);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),__STRING_DEFINES),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11221);}while(r); } } do{ *__LONG_X=func_instr(NULL,__STRING_A,qbs_new_txt_len(".cpp ",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11226);}while(r); S_12431:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(11227);if(r)goto S_12431;} do{ *__LONG_X=*__LONG_X+ 5 ; if(!qbevent)break;evnt(11228);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_left(__STRING_A,*__LONG_X- 1 ),__STRING_LIBQB),qbs_right(__STRING_A,__STRING_A->len-*__LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11229);}while(r); } do{ qbs_set(__STRING_A,qbs_add(__STRING_A,FUNC_IDEZFILENAME(qbs_add(qbs_add(qbs_new_txt_len("../../",6),__STRING_FILE),__STRING_EXTENSION)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11239);}while(r); S_12436:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(11241);if(r)goto S_12436;} do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(11243);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("recompile_osx.command",21)), 4 ,NULL,NULL,*__LONG_FFH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11244);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1740; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("cd ",3),__STRING_CHR_QUOTE),qbs_new_txt_len("$(dirname ",10)),__STRING_CHR_QUOTE),qbs_new_txt_len("$0",2)),__STRING_CHR_QUOTE),qbs_new_txt_len(")",1)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1740; skip1740: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11245);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1741; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("Recompiling...",14)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1741; skip1741: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11246);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1742; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("cd ../c",7),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1742; skip1742: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11247);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1743; sub_file_print(tmp_fileno,qbs_add(__STRING_A,func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1743; skip1743: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11248);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1744; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("read -p ",8),__STRING_CHR_QUOTE),qbs_new_txt_len("Press ENTER to exit...",22)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1744; skip1744: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11249);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(11250);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("chmod +x ",9),__STRING_TMPDIR),qbs_new_txt_len("recompile_osx.command",21)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11251);}while(r); do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(11253);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("debug_osx.command",17)), 4 ,NULL,NULL,*__LONG_FFH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11254);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1745; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("cd ",3),__STRING_CHR_QUOTE),qbs_new_txt_len("$(dirname ",10)),__STRING_CHR_QUOTE),qbs_new_txt_len("$0",2)),__STRING_CHR_QUOTE),qbs_new_txt_len(")",1)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1745; skip1745: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11255);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1746; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause()",7),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1746; skip1746: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11256);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1747; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("{",1),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1747; skip1747: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11257);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1748; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("OLDCONFIG=`stty -g`",19),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1748; skip1748: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11258);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1749; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty -icanon -echo min 1 time 0",31),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1749; skip1749: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11259);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1750; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("dd count=1 2>/dev/null",22),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1750; skip1750: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11260);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1751; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty $OLDCONFIG",15),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1751; skip1751: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11261);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1752; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("}",1),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1752; skip1752: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11262);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1753; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("C++ Debugging: ",15)),__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len(" using GDB",10)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1753; skip1753: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11263);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1754; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("Debugger commands:",18)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1754; skip1754: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11264);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1755; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("After the debugger launches type 'run' to start your program",60)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1755; skip1755: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11265);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1756; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("After your program crashes type 'list' to find where the problem is and fix/report it",85)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1756; skip1756: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11266);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1757; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("(the GDB debugger has many other useful commands, this advice is for beginners)",79)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1757; skip1757: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11267);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1758; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("gdb ",4),func_chr( 34 )),qbs_new_txt_len("../../",6)),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 )),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1758; skip1758: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11268);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1759; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause",5),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1759; skip1759: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11269);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(11270);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("chmod +x ",9),__STRING_TMPDIR),qbs_new_txt_len("debug_osx.command",17)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11271);}while(r); }else{ do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(11275);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("recompile_lnx.sh",16)), 4 ,NULL,NULL,*__LONG_FFH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11276);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1760; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("#!/bin/sh",9),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1760; skip1760: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11277);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1761; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause()",7),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1761; skip1761: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11278);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1762; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("{",1),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1762; skip1762: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11279);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1763; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("OLDCONFIG=`stty -g`",19),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1763; skip1763: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11280);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1764; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty -icanon -echo min 1 time 0",31),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1764; skip1764: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11281);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1765; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("dd count=1 2>/dev/null",22),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1765; skip1765: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11282);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1766; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty $OLDCONFIG",15),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1766; skip1766: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11283);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1767; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("}",1),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1767; skip1767: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11284);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1768; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("Recompiling...",14)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1768; skip1768: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11285);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1769; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("cd ../c",7),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1769; skip1769: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11286);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1770; sub_file_print(tmp_fileno,qbs_add(__STRING_A,func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1770; skip1770: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11287);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1771; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("Press ENTER to exit...",22)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1771; skip1771: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11288);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1772; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause",5),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1772; skip1772: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11289);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(11290);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("chmod +x ",9),__STRING_TMPDIR),qbs_new_txt_len("recompile_lnx.sh",16)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11291);}while(r); do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(11293);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("debug_lnx.sh",12)), 4 ,NULL,NULL,*__LONG_FFH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11294);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1773; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("#!/bin/sh",9),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1773; skip1773: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11295);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1774; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause()",7),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1774; skip1774: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11296);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1775; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("{",1),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1775; skip1775: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11297);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1776; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("OLDCONFIG=`stty -g`",19),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1776; skip1776: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11298);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1777; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty -icanon -echo min 1 time 0",31),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1777; skip1777: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11299);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1778; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("dd count=1 2>/dev/null",22),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1778; skip1778: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11300);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1779; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty $OLDCONFIG",15),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1779; skip1779: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11301);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1780; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("}",1),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1780; skip1780: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11302);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1781; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("C++ Debugging: ",15)),__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len(" using GDB",10)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1781; skip1781: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11303);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1782; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("Debugger commands:",18)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1782; skip1782: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11304);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1783; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("After the debugger launches type 'run' to start your program",60)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1783; skip1783: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11305);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1784; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("After your program crashes type 'list' to find where the problem is and fix/report it",85)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1784; skip1784: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11306);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1785; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("echo ",5),__STRING_CHR_QUOTE),qbs_new_txt_len("(the GDB debugger has many other useful commands, this advice is for beginners)",79)),__STRING_CHR_QUOTE),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1785; skip1785: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11307);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1786; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("gdb ",4),func_chr( 34 )),qbs_new_txt_len("../../",6)),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 )),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1786; skip1786: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11308);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1787; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause",5),func_chr( 10 )), 0 , 0 , 0 ); if (new_error) goto skip1787; skip1787: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11309);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(11310);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("chmod +x ",9),__STRING_TMPDIR),qbs_new_txt_len("debug_lnx.sh",12)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11311);}while(r); } S_12503:; if ((-(*__LONG_NO_C_COMPILE_MODE== 0 ))||new_error){ if(qbevent){evnt(11315);if(r)goto S_12503;} do{ sub_chdir(qbs_new_txt_len("./internal/c",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11316);}while(r); do{ sub_shell2(__STRING_A,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11317);}while(r); do{ sub_chdir(qbs_new_txt_len("../..",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11318);}while(r); } S_12508:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(11321);if(r)goto S_12508;} do{ *__LONG_FF=func_freefile(); if(!qbevent)break;evnt(11322);}while(r); do{ sub_open(qbs_add(qbs_add(__STRING_FILE,__STRING_EXTENSION),qbs_new_txt_len("_start.command",14)), 4 ,NULL,NULL,*__LONG_FF,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11323);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip1788; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("cd ",3),func_chr( 34 )),qbs_new_txt_len("$(dirname ",10)),func_chr( 34 )),qbs_new_txt_len("$0",2)),func_chr( 34 )),qbs_new_txt_len(")",1)),func_chr( 34 )), 0 , 0 , 0 ); if (new_error) goto skip1788; skip1788: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11324);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip1789; sub_file_print(tmp_fileno,func_chr( 10 ), 0 , 0 , 0 ); if (new_error) goto skip1789; skip1789: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11325);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip1790; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("./",2),__STRING_FILE),__STRING_EXTENSION), 0 , 0 , 0 ); if (new_error) goto skip1790; skip1790: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11326);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip1791; sub_file_print(tmp_fileno,func_chr( 10 ), 0 , 0 , 0 ); if (new_error) goto skip1791; skip1791: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11327);}while(r); do{ sub_close(*__LONG_FF,1); if(!qbevent)break;evnt(11328);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("chmod +x ",9),__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len("_start.command",14)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11329);}while(r); } } S_12519:; if ((*__LONG_NO_C_COMPILE_MODE)||new_error){ if(qbevent){evnt(11334);if(r)goto S_12519;} do{ *__LONG_COMPFAILED= 0 ; if(!qbevent)break;evnt(11334);}while(r); do{ goto LABEL_NO_C_COMPILE; if(!qbevent)break;evnt(11334);}while(r); } S_12523:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_FILE,__STRING_EXTENSION))))||new_error){ if(qbevent){evnt(11335);if(r)goto S_12523;} do{ *__LONG_COMPFAILED= 0 ; if(!qbevent)break;evnt(11335);}while(r); }else{ do{ *__LONG_COMPFAILED= 1 ; if(!qbevent)break;evnt(11335);}while(r); } S_12528:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(11337);if(r)goto S_12528;} S_12529:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(11338);if(r)goto S_12529;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_new_txt_len("C++ Compilation failed",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11339);}while(r); do{ goto LABEL_IDEERROR; if(!qbevent)break;evnt(11340);}while(r); } S_12533:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(11342);if(r)goto S_12533;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("C++ COMPILATION FAILED!",23)); if (new_error) goto skip1792; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip1792: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11342);}while(r); } } S_12537:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(11345);if(r)goto S_12537;} do{ goto LABEL_IDERET6; if(!qbevent)break;evnt(11345);}while(r); } LABEL_NO_C_COMPILE:; if(qbevent){evnt(11347);r=0;} S_12540:; if ((*__LONG_UPDATEHANDLE)||new_error){ if(qbevent){evnt(11349);if(r)goto S_12540;} do{ *__SINGLE_IDEUPDATETIMERVAL=func_timer(NULL,0); if(!qbevent)break;evnt(11350);}while(r); S_12542:; while((!(-(func_abs((float)(func_timer(NULL,0)-*__SINGLE_IDEUPDATETIMERVAL))>= 3 )))||new_error){ if(qbevent){evnt(11351);if(r)goto S_12542;} do{ SUB_CONTINUEDOWNLOADS(); if(!qbevent)break;evnt(11352);}while(r); S_12544:; if ((-(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))== 2 ))||new_error){ if(qbevent){evnt(11353);if(r)goto S_12544;} do{ SUB_UPDATE(&(pass1794= 2 )); if(!qbevent)break;evnt(11354);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(11355);}while(r); do{ goto LABEL_QB64UPDATED; if(!qbevent)break;evnt(11356);}while(r); } do{ sub__limit( 10 ); if(!qbevent)break;evnt(11358);}while(r); } dl_exit_1793:; do{ sub_close(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8+4)),1); if(!qbevent)break;evnt(11360);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))= 0 ; if(!qbevent)break;evnt(11360);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(11360);}while(r); LABEL_QB64UPDATED:; if(qbevent){evnt(11361);r=0;} } S_12555:; if (((-(*__LONG_COMPFAILED!= 0 ))&(-(*__LONG_CONSOLEMODE== 0 )))||new_error){ if(qbevent){evnt(11364);if(r)goto S_12555;} do{ if(qbevent){evnt(11364);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(11364);}while(r); } S_12558:; if ((-(*__LONG_COMPFAILED!= 0 ))||new_error){ if(qbevent){evnt(11365);if(r)goto S_12558;} do{ if(qbevent){evnt(11365);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(11365);}while(r); } do{ if(qbevent){evnt(11366);} exit_code= 0 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(11366);}while(r); LABEL_QBERROR_TEST:; if(qbevent){evnt(11368);r=0;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(11369);}while(r); do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; return;} if(!qbevent)break;evnt(11370);}while(r); LABEL_QBERROR:; if(qbevent){evnt(11372);r=0;} S_12564:; if ((*__LONG_IDEERROR)||new_error){ if(qbevent){evnt(11374);if(r)goto S_12564;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(11375);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\ideerror.txt",26), 4 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11376);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip1795; sub_file_print(tmp_fileno,qbs_str((uint32)(get_error_err())), 1 , 0 , 1 ); if (new_error) goto skip1795; skip1795: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11377);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip1796; sub_file_print(tmp_fileno,qbs_str((int32)(func__errorline())), 1 , 0 , 1 ); if (new_error) goto skip1796; skip1796: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11378);}while(r); do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(11379);}while(r); do{ qbs_set(__STRING_SENDC,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11380);}while(r); do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_SENDCOMMAND;} if(!qbevent)break;evnt(11381);}while(r); } do{ *__LONG_QBERRORHAPPENEDVALUE=*__INTEGER_QBERRORHAPPENED; if(!qbevent)break;evnt(11384);}while(r); do{ *__INTEGER_QBERRORHAPPENED= 1 ; if(!qbevent)break;evnt(11385);}while(r); S_12575:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(11387);if(r)goto S_12575;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1797; sub_file_print(tmp_fileno,qbs_new_txt_len("QB ERROR!",9), 0 , 0 , 1 ); if (new_error) goto skip1797; skip1797: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11387);}while(r); } S_12578:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(11388);if(r)goto S_12578;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1798; sub_file_print(tmp_fileno,qbs_new_txt_len("ERR=",4), 0 , 0 , 0 ); if (new_error) goto skip1798; sub_file_print(tmp_fileno,qbs_str((uint32)(get_error_err())), 1 , 0 , 1 ); if (new_error) goto skip1798; skip1798: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11388);}while(r); } S_12581:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(11389);if(r)goto S_12581;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1799; sub_file_print(tmp_fileno,qbs_new_txt_len("ERL=",4), 0 , 0 , 0 ); if (new_error) goto skip1799; sub_file_print(tmp_fileno,qbs_str((double)(get_error_erl())), 1 , 0 , 1 ); if (new_error) goto skip1799; skip1799: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11389);}while(r); } S_12584:; if ((*__LONG_IDEMODE&(-(*__LONG_QBERRORHAPPENEDVALUE>= 0 )))||new_error){ if(qbevent){evnt(11391);if(r)goto S_12584;} do{ *__LONG_IDEERRORLINE=*__LONG_LINENUMBER; if(!qbevent)break;evnt(11393);}while(r); do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Compiler error (check for syntax errors) (Reference:",52),FUNC_STR2(&(pass1800=get_error_err()))),qbs_new_txt_len("-",1)),FUNC_STR2(&(pass1801=func__errorline()))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11394);}while(r); S_12587:; if ((-(*__LONG_INCLEVEL> 0 ))||new_error){ if(qbevent){evnt(11395);if(r)goto S_12587;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(__STRING_IDEMESSAGE,__STRING_INCERROR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11395);}while(r); } do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_IDEERROR;} if(!qbevent)break;evnt(11396);}while(r); } S_12592:; if ((-(*__LONG_QBERRORHAPPENEDVALUE>= 0 ))||new_error){ if(qbevent){evnt(11399);if(r)goto S_12592;} do{ qbs_set(__STRING_A,qbs_new_txt_len("UNEXPECTED INTERNAL COMPILER ERROR!",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11400);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11400);}while(r); } do{ *__INTEGER_QBERRORCODE=get_error_err(); if(!qbevent)break;evnt(11404);}while(r); do{ *__INTEGER_QBERRORLINE=qbr_float_to_long(get_error_erl()); if(!qbevent)break;evnt(11405);}while(r); S_12598:; if ((-(*__LONG_QBERRORHAPPENEDVALUE== -1 ))||new_error){ if(qbevent){evnt(11406);if(r)goto S_12598;} do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_QBERRORHAPPENED1;} if(!qbevent)break;evnt(11406);}while(r); } S_12601:; if ((-(*__LONG_QBERRORHAPPENEDVALUE== -2 ))||new_error){ if(qbevent){evnt(11407);if(r)goto S_12601;} do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_QBERRORHAPPENED2;} if(!qbevent)break;evnt(11407);}while(r); } S_12604:; if ((-(*__LONG_QBERRORHAPPENEDVALUE== -3 ))||new_error){ if(qbevent){evnt(11408);if(r)goto S_12604;} do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_QBERRORHAPPENED3;} if(!qbevent)break;evnt(11408);}while(r); } do{ sub_end(); if(!qbevent)break;evnt(11409);}while(r); LABEL_ERRMES:; if(qbevent){evnt(11411);r=0;} S_12608:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11412);if(r)goto S_12608;} do{ qbs_set(__STRING_A,__STRING_ERROR_MESSAGE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11412);}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(11412);}while(r); } do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11413);}while(r); do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(11413);}while(r); S_12614:; if ((-(*__LONG_INCLEVEL> 0 ))||new_error){ if(qbevent){evnt(11414);if(r)goto S_12614;} do{ qbs_set(__STRING_A,qbs_add(__STRING_A,__STRING_INCERROR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11414);}while(r); } S_12617:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(11415);if(r)goto S_12617;} do{ *__LONG_IDEERRORLINE=*__LONG_LINENUMBER; if(!qbevent)break;evnt(11416);}while(r); do{ qbs_set(__STRING_IDEMESSAGE,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11417);}while(r); do{ goto LABEL_IDEERROR; if(!qbevent)break;evnt(11418);}while(r); } do{ qbs_print(nothingstring,1); skip1802: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11421);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_A); if (new_error) goto skip1803; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip1803: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11422);}while(r); S_12624:; fornext_value1805= 1 ; fornext_finalvalue1805=__STRING_LINEFRAGMENT->len; fornext_step1805= 1 ; if (fornext_step1805<0) fornext_step_negative1805=1; else fornext_step_negative1805=0; if (new_error) goto fornext_error1805; goto fornext_entrylabel1805; while(1){ fornext_value1805=fornext_step1805+(*__LONG_I); fornext_entrylabel1805: *__LONG_I=fornext_value1805; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1805){ if (fornext_value1805fornext_finalvalue1805) break; } fornext_error1805:; if(qbevent){evnt(11423);if(r)goto S_12624;} S_12625:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_LINEFRAGMENT,*__LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(11424);if(r)goto S_12625;} do{ sub_mid(__STRING_LINEFRAGMENT,*__LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(11424);}while(r); } } fornext_exit_1804:; S_12629:; fornext_value1808= 1 ; fornext_finalvalue1808=__STRING_WHOLELINE->len; fornext_step1808= 1 ; if (fornext_step1808<0) fornext_step_negative1808=1; else fornext_step_negative1808=0; if (new_error) goto fornext_error1808; goto fornext_entrylabel1808; while(1){ fornext_value1808=fornext_step1808+(*__LONG_I); fornext_entrylabel1808: *__LONG_I=fornext_value1808; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1808){ if (fornext_value1808fornext_finalvalue1808) break; } fornext_error1808:; if(qbevent){evnt(11426);if(r)goto S_12629;} S_12630:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_WHOLELINE,*__LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(11427);if(r)goto S_12630;} do{ sub_mid(__STRING_WHOLELINE,*__LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(11427);}while(r); } } fornext_exit_1807:; do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("Caused by (or after):",21),__STRING_LINEFRAGMENT)); if (new_error) goto skip1810; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip1810: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11429);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("LINE ",5),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len(":",1)),__STRING_WHOLELINE)); if (new_error) goto skip1811; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip1811: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11430);}while(r); S_12636:; if ((*__LONG_UPDATEHANDLE)||new_error){ if(qbevent){evnt(11432);if(r)goto S_12636;} do{ *__SINGLE_IDEUPDATETIMERVAL=func_timer(NULL,0); if(!qbevent)break;evnt(11433);}while(r); S_12638:; while((!(-(func_abs((float)(func_timer(NULL,0)-*__SINGLE_IDEUPDATETIMERVAL))>= 3 )))||new_error){ if(qbevent){evnt(11434);if(r)goto S_12638;} do{ SUB_CONTINUEDOWNLOADS(); if(!qbevent)break;evnt(11435);}while(r); S_12640:; if ((-(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))== 2 ))||new_error){ if(qbevent){evnt(11436);if(r)goto S_12640;} do{ SUB_UPDATE(&(pass1813= 3 )); if(!qbevent)break;evnt(11437);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(11438);}while(r); do{ goto LABEL_QB64UPDATED2; if(!qbevent)break;evnt(11439);}while(r); } do{ sub__limit( 10 ); if(!qbevent)break;evnt(11441);}while(r); } dl_exit_1812:; do{ sub_close(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8+4)),1); if(!qbevent)break;evnt(11443);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))= 0 ; if(!qbevent)break;evnt(11443);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(11443);}while(r); LABEL_QB64UPDATED2:; if(qbevent){evnt(11444);r=0;} } S_12651:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(11447);if(r)goto S_12651;} do{ if(qbevent){evnt(11447);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(11447);}while(r); } do{ if(qbevent){evnt(11448);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(11448);}while(r); sub_end(); return; } int32 FUNC_TYPE2MEMTYPEVALUE(int32*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data1.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T= 0 ; if(!qbevent)break;evnt(11452);}while(r); S_12656:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(11453);if(r)goto S_12656;} S_12657:; if ((-((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1& 511 )== 1 ))||new_error){ if(qbevent){evnt(11454);if(r)goto S_12657;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 8192 ; if(!qbevent)break;evnt(11454);}while(r); } }else{ S_12661:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(11456);if(r)goto S_12661;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 2048 ; if(!qbevent)break;evnt(11457);}while(r); }else{ S_12664:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(11459);if(r)goto S_12664;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 1024 ; if(!qbevent)break;evnt(11460);}while(r); do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 32768 ; if(!qbevent)break;evnt(11461);}while(r); }else{ do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 512 ; if(!qbevent)break;evnt(11463);}while(r); S_12669:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(11464);if(r)goto S_12669;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 4096 ; if(!qbevent)break;evnt(11464);}while(r); }else{ do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 32768 ; if(!qbevent)break;evnt(11464);}while(r); } S_12674:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(11465);if(r)goto S_12674;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 16384 ; if(!qbevent)break;evnt(11465);}while(r); } } do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S=(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1& 511 )/ 8 ; if(!qbevent)break;evnt(11467);}while(r); S_12679:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 1 ))||new_error){ if(qbevent){evnt(11468);if(r)goto S_12679;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11468);}while(r); } S_12682:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 2 ))||new_error){ if(qbevent){evnt(11469);if(r)goto S_12682;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11469);}while(r); } S_12685:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 4 ))||new_error){ if(qbevent){evnt(11470);if(r)goto S_12685;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11470);}while(r); } S_12688:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 8 ))||new_error){ if(qbevent){evnt(11471);if(r)goto S_12688;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11471);}while(r); } S_12691:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 16 ))||new_error){ if(qbevent){evnt(11472);if(r)goto S_12691;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11472);}while(r); } S_12694:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 32 ))||new_error){ if(qbevent){evnt(11473);if(r)goto S_12694;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11473);}while(r); } S_12697:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 64 ))||new_error){ if(qbevent){evnt(11474);if(r)goto S_12697;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11474);}while(r); } S_12700:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 128 ))||new_error){ if(qbevent){evnt(11475);if(r)goto S_12700;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11475);}while(r); } S_12703:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 256 ))||new_error){ if(qbevent){evnt(11476);if(r)goto S_12703;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(11476);}while(r); } } } do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_TYPE2MEMTYPEVALUE=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T; if(!qbevent)break;evnt(11479);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free1.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_TYPE2MEMTYPEVALUE_LONG_TYPE2MEMTYPEVALUE; } int32 FUNC_FILEHASEXTENSION(qbs*_FUNC_FILEHASEXTENSION_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data2.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_12709:; fornext_value1816=_FUNC_FILEHASEXTENSION_STRING_F->len; fornext_finalvalue1816= 1 ; fornext_step1816= -1 ; if (fornext_step1816<0) fornext_step_negative1816=1; else fornext_step_negative1816=0; if (new_error) goto fornext_error1816; goto fornext_entrylabel1816; while(1){ fornext_value1816=fornext_step1816+(*_FUNC_FILEHASEXTENSION_LONG_I); fornext_entrylabel1816: *_FUNC_FILEHASEXTENSION_LONG_I=fornext_value1816; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1816){ if (fornext_value1816fornext_finalvalue1816) break; } fornext_error1816:; if(qbevent){evnt(11483);if(r)goto S_12709;} do{ *_FUNC_FILEHASEXTENSION_LONG_A=qbs_asc(_FUNC_FILEHASEXTENSION_STRING_F,*_FUNC_FILEHASEXTENSION_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11484);}while(r); S_12711:; if (((-(*_FUNC_FILEHASEXTENSION_LONG_A== 47 ))|(-(*_FUNC_FILEHASEXTENSION_LONG_A== 92 )))||new_error){ if(qbevent){evnt(11485);if(r)goto S_12711;} do{ goto fornext_exit_1815; if(!qbevent)break;evnt(11485);}while(r); } S_12714:; if ((-(*_FUNC_FILEHASEXTENSION_LONG_A== 46 ))||new_error){ if(qbevent){evnt(11486);if(r)goto S_12714;} do{ *_FUNC_FILEHASEXTENSION_LONG_FILEHASEXTENSION= -1 ; if(!qbevent)break;evnt(11486);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11486);}while(r); } } fornext_exit_1815:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free2.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_FILEHASEXTENSION_LONG_FILEHASEXTENSION; } qbs* FUNC_REMOVEFILEEXTENSION(qbs*_FUNC_REMOVEFILEEXTENSION_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data3.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_12719:; fornext_value1820=_FUNC_REMOVEFILEEXTENSION_STRING_F->len; fornext_finalvalue1820= 1 ; fornext_step1820= -1 ; if (fornext_step1820<0) fornext_step_negative1820=1; else fornext_step_negative1820=0; if (new_error) goto fornext_error1820; goto fornext_entrylabel1820; while(1){ fornext_value1820=fornext_step1820+(*_FUNC_REMOVEFILEEXTENSION_LONG_I); fornext_entrylabel1820: *_FUNC_REMOVEFILEEXTENSION_LONG_I=fornext_value1820; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1820){ if (fornext_value1820fornext_finalvalue1820) break; } fornext_error1820:; if(qbevent){evnt(11491);if(r)goto S_12719;} do{ *_FUNC_REMOVEFILEEXTENSION_LONG_A=qbs_asc(_FUNC_REMOVEFILEEXTENSION_STRING_F,*_FUNC_REMOVEFILEEXTENSION_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11492);}while(r); S_12721:; if (((-(*_FUNC_REMOVEFILEEXTENSION_LONG_A== 47 ))|(-(*_FUNC_REMOVEFILEEXTENSION_LONG_A== 92 )))||new_error){ if(qbevent){evnt(11493);if(r)goto S_12721;} do{ goto fornext_exit_1819; if(!qbevent)break;evnt(11493);}while(r); } S_12724:; if ((-(*_FUNC_REMOVEFILEEXTENSION_LONG_A== 46 ))||new_error){ if(qbevent){evnt(11494);if(r)goto S_12724;} do{ qbs_set(_FUNC_REMOVEFILEEXTENSION_STRING_REMOVEFILEEXTENSION,qbs_left(_FUNC_REMOVEFILEEXTENSION_STRING_F,*_FUNC_REMOVEFILEEXTENSION_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11494);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11494);}while(r); } } fornext_exit_1819:; do{ qbs_set(_FUNC_REMOVEFILEEXTENSION_STRING_REMOVEFILEEXTENSION,_FUNC_REMOVEFILEEXTENSION_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11496);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free3.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_REMOVEFILEEXTENSION_STRING_REMOVEFILEEXTENSION);return _FUNC_REMOVEFILEEXTENSION_STRING_REMOVEFILEEXTENSION; } void SUB_IDEASCIIBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data4.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(11502);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(11503);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(11504);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(11505);}while(r); do{ if(!qbevent)break;evnt(11506);}while(r); do{ if (_SUB_IDEASCIIBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_SUB_IDEASCIIBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _SUB_IDEASCIIBOX_ARRAY_UDT_O[4]= 1 ; _SUB_IDEASCIIBOX_ARRAY_UDT_O[5]=( 100 )-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4]+1; _SUB_IDEASCIIBOX_ARRAY_UDT_O[6]=1; if (_SUB_IDEASCIIBOX_ARRAY_UDT_O[2]&4){ _SUB_IDEASCIIBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_SUB_IDEASCIIBOX_ARRAY_UDT_O[0]),0,_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _SUB_IDEASCIIBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_SUB_IDEASCIIBOX_ARRAY_UDT_O[0]) error(257); } _SUB_IDEASCIIBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(11507);}while(r); do{ if(!qbevent)break;evnt(11508);}while(r); do{ if(!qbevent)break;evnt(11509);}while(r); do{ qbs_set(_SUB_IDEASCIIBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11510);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_I= 0 ; if(!qbevent)break;evnt(11515);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_SUB_IDEASCIIBOX_UDT_P)) + (0) ),&(pass1822= 78 ),&(pass1823= 13 ),qbs_new_txt_len("ASCII Character Chart",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11516);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_I=*_SUB_IDEASCIIBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(11518);}while(r); do{ *(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(11519);}while(r); do{ *(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+24))= 13 ; if(!qbevent)break;evnt(11520);}while(r); do{ *(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_new_txt_len("#OK",3)); if(!qbevent)break;evnt(11521);}while(r); do{ *(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(11522);}while(r); S_12746:; fornext_value1825= 1 ; fornext_finalvalue1825= 100 ; fornext_step1825= 1 ; if (fornext_step1825<0) fornext_step_negative1825=1; else fornext_step_negative1825=0; if (new_error) goto fornext_error1825; goto fornext_entrylabel1825; while(1){ fornext_value1825=fornext_step1825+(*_SUB_IDEASCIIBOX_LONG_I); fornext_entrylabel1825: *_SUB_IDEASCIIBOX_LONG_I=fornext_value1825; if (fornext_step_negative1825){ if (fornext_value1825fornext_finalvalue1825) break; } fornext_error1825:; if(qbevent){evnt(11527);if(r)goto S_12746;} do{ memcpy((((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80)),(((char*)_SUB_IDEASCIIBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(11527);}while(r); } fornext_exit_1824:; S_12749:; do{ if(qbevent){evnt(11530);if(r)goto S_12749;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_SUB_IDEASCIIBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(11533);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_F= 1 ; if(!qbevent)break;evnt(11534);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(11534);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(11534);}while(r); S_12754:; fornext_value1828= 1 ; fornext_finalvalue1828= 100 ; fornext_step1828= 1 ; if (fornext_step1828<0) fornext_step_negative1828=1; else fornext_step_negative1828=0; if (new_error) goto fornext_error1828; goto fornext_entrylabel1828; while(1){ fornext_value1828=fornext_step1828+(*_SUB_IDEASCIIBOX_LONG_I); fornext_entrylabel1828: *_SUB_IDEASCIIBOX_LONG_I=fornext_value1828; if (fornext_step_negative1828){ if (fornext_value1828fornext_finalvalue1828) break; } fornext_error1828:; if(qbevent){evnt(11535);if(r)goto S_12754;} S_12755:; if ((*(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(11536);if(r)goto S_12755;} do{ *(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+60))=*_SUB_IDEASCIIBOX_LONG_FOCUS-*_SUB_IDEASCIIBOX_LONG_F; if(!qbevent)break;evnt(11539);}while(r); do{ *(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(11540);}while(r); do{ *(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(11540);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80) ),_SUB_IDEASCIIBOX_LONG_F); if(!qbevent)break;evnt(11541);}while(r); S_12760:; if ((*(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(11542);if(r)goto S_12760;} do{ *_SUB_IDEASCIIBOX_LONG_CX=*(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(11542);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_CY=*(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(11542);}while(r); } } } fornext_exit_1827:; do{ *_SUB_IDEASCIIBOX_LONG_LASTFOCUS=*_SUB_IDEASCIIBOX_LONG_F- 1 ; if(!qbevent)break;evnt(11545);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_X1=*(int32*)(((char*)_SUB_IDEASCIIBOX_UDT_P)+(0))+ 1 ; if(!qbevent)break;evnt(11549);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_Y1=*(int32*)(((char*)_SUB_IDEASCIIBOX_UDT_P)+(4))+ 1 ; if(!qbevent)break;evnt(11550);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_I= 0 ; if(!qbevent)break;evnt(11551);}while(r); S_12770:; fornext_value1830= 0 ; fornext_finalvalue1830= 25 ; fornext_step1830= 1 ; if (fornext_step1830<0) fornext_step_negative1830=1; else fornext_step_negative1830=0; if (new_error) goto fornext_error1830; goto fornext_entrylabel1830; while(1){ fornext_value1830=fornext_step1830+(*_SUB_IDEASCIIBOX_LONG_X); fornext_entrylabel1830: *_SUB_IDEASCIIBOX_LONG_X=fornext_value1830; if (fornext_step_negative1830){ if (fornext_value1830fornext_finalvalue1830) break; } fornext_error1830:; if(qbevent){evnt(11552);if(r)goto S_12770;} do{ qbg_sub_locate(*_SUB_IDEASCIIBOX_LONG_Y1,*_SUB_IDEASCIIBOX_LONG_X1+(*_SUB_IDEASCIIBOX_LONG_X* 3 ),NULL,NULL,NULL,3); if(!qbevent)break;evnt(11553);}while(r); do{ qbg_sub_color( 8 , 7 ,NULL,3); if(!qbevent)break;evnt(11554);}while(r); S_12773:; if ((-(*_SUB_IDEASCIIBOX_LONG_X!= 0 ))||new_error){ if(qbevent){evnt(11555);if(r)goto S_12773;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,FUNC_STR2(_SUB_IDEASCIIBOX_LONG_X)); if (new_error) goto skip1831; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1831: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11556);}while(r); S_12775:; if ((-(*_SUB_IDEASCIIBOX_LONG_X< 10 ))||new_error){ if(qbevent){evnt(11557);if(r)goto S_12775;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("-\263",2)); if (new_error) goto skip1832; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1832: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11557);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\264",1)); if (new_error) goto skip1833; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1833: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11557);}while(r); } }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" \263",3)); if (new_error) goto skip1834; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1834: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11559);}while(r); } S_12783:; fornext_value1836= 0 ; fornext_finalvalue1836= 9 ; fornext_step1836= 1 ; if (fornext_step1836<0) fornext_step_negative1836=1; else fornext_step_negative1836=0; if (new_error) goto fornext_error1836; goto fornext_entrylabel1836; while(1){ fornext_value1836=fornext_step1836+(*_SUB_IDEASCIIBOX_LONG_Y); fornext_entrylabel1836: *_SUB_IDEASCIIBOX_LONG_Y=fornext_value1836; if (fornext_step_negative1836){ if (fornext_value1836fornext_finalvalue1836) break; } fornext_error1836:; if(qbevent){evnt(11561);if(r)goto S_12783;} do{ qbg_sub_locate(*_SUB_IDEASCIIBOX_LONG_Y1+*_SUB_IDEASCIIBOX_LONG_Y+ 1 ,*_SUB_IDEASCIIBOX_LONG_X1+(*_SUB_IDEASCIIBOX_LONG_X* 3 ),NULL,NULL,NULL,3); if(!qbevent)break;evnt(11562);}while(r); S_12785:; if ((-(*_SUB_IDEASCIIBOX_LONG_I<= 255 ))||new_error){ if(qbevent){evnt(11563);if(r)goto S_12785;} do{ qbg_sub_color( 8 , 7 ,NULL,3); if(!qbevent)break;evnt(11564);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,FUNC_STR2(_SUB_IDEASCIIBOX_LONG_Y)); if (new_error) goto skip1837; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1837: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11564);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(11565);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(*_SUB_IDEASCIIBOX_LONG_I)); if (new_error) goto skip1838; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1838: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11565);}while(r); do{ qbg_sub_color( 8 , 7 ,NULL,3); if(!qbevent)break;evnt(11566);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\263",1)); if (new_error) goto skip1839; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1839: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11566);}while(r); }else{ do{ qbg_sub_color( 8 , 7 ,NULL,3); if(!qbevent)break;evnt(11568);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" \263",3)); if (new_error) goto skip1840; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1840: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11568);}while(r); } do{ *_SUB_IDEASCIIBOX_LONG_I=*_SUB_IDEASCIIBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(11570);}while(r); } fornext_exit_1835:; } fornext_exit_1829:; do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(11577);}while(r); S_12800:; if ((*_SUB_IDEASCIIBOX_LONG_CX)||new_error){ if(qbevent){evnt(11578);if(r)goto S_12800;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(11578);}while(r); do{ qbg_sub_locate(*_SUB_IDEASCIIBOX_LONG_CY,*_SUB_IDEASCIIBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(11578);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(11578);}while(r); } do{ *_SUB_IDEASCIIBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(11581);}while(r); S_12806:; do{ if(qbevent){evnt(11582);if(r)goto S_12806;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(11583);}while(r); S_12808:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(11584);if(r)goto S_12808;} do{ *_SUB_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11584);}while(r); } S_12811:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(11585);if(r)goto S_12811;} do{ *_SUB_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11585);}while(r); } S_12814:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(11586);if(r)goto S_12814;} do{ *_SUB_IDEASCIIBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(11586);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11586);}while(r); } S_12818:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(11587);if(r)goto S_12818;} do{ *_SUB_IDEASCIIBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(11587);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11587);}while(r); } S_12822:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(11588);if(r)goto S_12822;} do{ *_SUB_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11588);}while(r); } do{ *_SUB_IDEASCIIBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(11589);}while(r); S_12826:; if ((-(*_SUB_IDEASCIIBOX_LONG_ALT!=*_SUB_IDEASCIIBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(11589);if(r)goto S_12826;} do{ *_SUB_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11589);}while(r); } do{ *_SUB_IDEASCIIBOX_LONG_OLDALT=*_SUB_IDEASCIIBOX_LONG_ALT; if(!qbevent)break;evnt(11590);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(11591);}while(r); S_12831:; }while((!(*_SUB_IDEASCIIBOX_LONG_CHANGE))&&(!new_error)); dl_exit_1841:; if(qbevent){evnt(11592);if(r)goto S_12831;} S_12832:; if ((*_SUB_IDEASCIIBOX_LONG_ALT)||new_error){ if(qbevent){evnt(11593);if(r)goto S_12832;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(11593);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(11593);}while(r); } do{ qbs_set(_SUB_IDEASCIIBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11595);}while(r); S_12838:; if ((*_SUB_IDEASCIIBOX_LONG_ALT)||new_error){ if(qbevent){evnt(11596);if(r)goto S_12838;} S_12839:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(11597);if(r)goto S_12839;} do{ *_SUB_IDEASCIIBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11598);}while(r); S_12841:; if (((-(*_SUB_IDEASCIIBOX_LONG_K>= 65 ))&(-(*_SUB_IDEASCIIBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(11599);if(r)goto S_12841;} do{ qbs_set(_SUB_IDEASCIIBOX_STRING_ALTLETTER,func_chr(*_SUB_IDEASCIIBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11599);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(11602);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(11602);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(11602);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(11606);}while(r); S_12850:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(11607);if(r)goto S_12850;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11607);}while(r); } S_12853:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(11608);if(r)goto S_12853;} do{ *_SUB_IDEASCIIBOX_LONG_FOCUS=*_SUB_IDEASCIIBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(11608);}while(r); } S_12856:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(11609);if(r)goto S_12856;} do{ *_SUB_IDEASCIIBOX_LONG_FOCUS=*_SUB_IDEASCIIBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(11609);}while(r); } S_12859:; if ((-(*_SUB_IDEASCIIBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(11610);if(r)goto S_12859;} do{ *_SUB_IDEASCIIBOX_LONG_FOCUS=*_SUB_IDEASCIIBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(11610);}while(r); } S_12862:; if ((-(*_SUB_IDEASCIIBOX_LONG_FOCUS>*_SUB_IDEASCIIBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(11611);if(r)goto S_12862;} do{ *_SUB_IDEASCIIBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(11611);}while(r); } do{ *_SUB_IDEASCIIBOX_LONG_F= 1 ; if(!qbevent)break;evnt(11612);}while(r); S_12866:; fornext_value1844= 1 ; fornext_finalvalue1844= 100 ; fornext_step1844= 1 ; if (fornext_step1844<0) fornext_step_negative1844=1; else fornext_step_negative1844=0; if (new_error) goto fornext_error1844; goto fornext_entrylabel1844; while(1){ fornext_value1844=fornext_step1844+(*_SUB_IDEASCIIBOX_LONG_I); fornext_entrylabel1844: *_SUB_IDEASCIIBOX_LONG_I=fornext_value1844; if (fornext_step_negative1844){ if (fornext_value1844fornext_finalvalue1844) break; } fornext_error1844:; if(qbevent){evnt(11613);if(r)goto S_12866;} do{ *_SUB_IDEASCIIBOX_LONG_T=*(int32*)(((char*)_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(11614);}while(r); S_12868:; if ((*_SUB_IDEASCIIBOX_LONG_T)||new_error){ if(qbevent){evnt(11615);if(r)goto S_12868;} do{ *_SUB_IDEASCIIBOX_LONG_FOCUSOFFSET=*_SUB_IDEASCIIBOX_LONG_FOCUS-*_SUB_IDEASCIIBOX_LONG_F; if(!qbevent)break;evnt(11616);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_SUB_IDEASCIIBOX_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDEASCIIBOX_LONG_I)-_SUB_IDEASCIIBOX_ARRAY_UDT_O[4],_SUB_IDEASCIIBOX_ARRAY_UDT_O[5]))*80) ),_SUB_IDEASCIIBOX_LONG_FOCUS,_SUB_IDEASCIIBOX_LONG_F,_SUB_IDEASCIIBOX_LONG_FOCUSOFFSET,__STRING_K,_SUB_IDEASCIIBOX_STRING_ALTLETTER,__LONG_MB,_SUB_IDEASCIIBOX_LONG_MOUSEDOWN,_SUB_IDEASCIIBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_SUB_IDEASCIIBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11617);}while(r); } } fornext_exit_1843:; S_12873:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_SUB_IDEASCIIBOX_LONG_FOCUS== 1 ))&(-(*_SUB_IDEASCIIBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(11622);if(r)goto S_12873;} do{ goto exit_subfunc; if(!qbevent)break;evnt(11623);}while(r); } do{ *_SUB_IDEASCIIBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(11627);}while(r); do{ *_SUB_IDEASCIIBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(11628);}while(r); }while(1); dl_exit_1826:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free4.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDEF1BOX(qbs*_FUNC_IDEF1BOX_STRING_LNKS,int32*_FUNC_IDEF1BOX_LONG_LNKS){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data5.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(11639);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(11640);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(11641);}while(r); do{ *_FUNC_IDEF1BOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(11642);}while(r); do{ if(!qbevent)break;evnt(11643);}while(r); do{ if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEF1BOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEF1BOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEF1BOX_ARRAY_UDT_O[4]+1; _FUNC_IDEF1BOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEF1BOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0]),0,_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEF1BOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEF1BOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEF1BOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(11644);}while(r); do{ if(!qbevent)break;evnt(11645);}while(r); do{ if(!qbevent)break;evnt(11646);}while(r); do{ qbs_set(_FUNC_IDEF1BOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11647);}while(r); do{ *_FUNC_IDEF1BOX_LONG_I= 0 ; if(!qbevent)break;evnt(11654);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + (0) ),&(pass1846= 40 ),&(pass1847=*_FUNC_IDEF1BOX_LONG_LNKS+ 3 ),qbs_new_txt_len("F1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11655);}while(r); do{ *_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ; if(!qbevent)break;evnt(11657);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(11658);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+24))= 1 ; if(!qbevent)break;evnt(11659);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+28))= 36 ; if(!qbevent)break;evnt(11661);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+32))=*_FUNC_IDEF1BOX_LONG_LNKS; if(!qbevent)break;evnt(11661);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEF1BOX_STRING_LNKS); if(!qbevent)break;evnt(11662);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(11663);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Which?",6)); if(!qbevent)break;evnt(11664);}while(r); do{ *_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ; if(!qbevent)break;evnt(11666);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(11667);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+24))=*_FUNC_IDEF1BOX_LONG_LNKS+ 3 ; if(!qbevent)break;evnt(11668);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_new_txt_len("#OK",3)); if(!qbevent)break;evnt(11669);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(11670);}while(r); S_12903:; fornext_value1849= 1 ; fornext_finalvalue1849= 100 ; fornext_step1849= 1 ; if (fornext_step1849<0) fornext_step_negative1849=1; else fornext_step_negative1849=0; if (new_error) goto fornext_error1849; goto fornext_entrylabel1849; while(1){ fornext_value1849=fornext_step1849+(*_FUNC_IDEF1BOX_LONG_I); fornext_entrylabel1849: *_FUNC_IDEF1BOX_LONG_I=fornext_value1849; if (fornext_step_negative1849){ if (fornext_value1849fornext_finalvalue1849) break; } fornext_error1849:; if(qbevent){evnt(11675);if(r)goto S_12903;} do{ memcpy((((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEF1BOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(11675);}while(r); } fornext_exit_1848:; S_12906:; do{ if(qbevent){evnt(11678);if(r)goto S_12906;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(11681);}while(r); do{ *_FUNC_IDEF1BOX_LONG_F= 1 ; if(!qbevent)break;evnt(11682);}while(r); do{ *_FUNC_IDEF1BOX_LONG_CX= 0 ; if(!qbevent)break;evnt(11682);}while(r); do{ *_FUNC_IDEF1BOX_LONG_CY= 0 ; if(!qbevent)break;evnt(11682);}while(r); S_12911:; fornext_value1852= 1 ; fornext_finalvalue1852= 100 ; fornext_step1852= 1 ; if (fornext_step1852<0) fornext_step_negative1852=1; else fornext_step_negative1852=0; if (new_error) goto fornext_error1852; goto fornext_entrylabel1852; while(1){ fornext_value1852=fornext_step1852+(*_FUNC_IDEF1BOX_LONG_I); fornext_entrylabel1852: *_FUNC_IDEF1BOX_LONG_I=fornext_value1852; if (fornext_step_negative1852){ if (fornext_value1852fornext_finalvalue1852) break; } fornext_error1852:; if(qbevent){evnt(11683);if(r)goto S_12911;} S_12912:; if ((*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(11684);if(r)goto S_12912;} do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEF1BOX_LONG_FOCUS-*_FUNC_IDEF1BOX_LONG_F; if(!qbevent)break;evnt(11687);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(11688);}while(r); do{ *(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(11688);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEF1BOX_LONG_F); if(!qbevent)break;evnt(11689);}while(r); S_12917:; if ((*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(11690);if(r)goto S_12917;} do{ *_FUNC_IDEF1BOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(11690);}while(r); do{ *_FUNC_IDEF1BOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(11690);}while(r); } } } fornext_exit_1851:; do{ *_FUNC_IDEF1BOX_LONG_LASTFOCUS=*_FUNC_IDEF1BOX_LONG_F- 1 ; if(!qbevent)break;evnt(11693);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(11700);}while(r); S_12925:; if ((*_FUNC_IDEF1BOX_LONG_CX)||new_error){ if(qbevent){evnt(11701);if(r)goto S_12925;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(11701);}while(r); do{ qbg_sub_locate(*_FUNC_IDEF1BOX_LONG_CY,*_FUNC_IDEF1BOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(11701);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(11701);}while(r); } do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(11704);}while(r); S_12931:; do{ if(qbevent){evnt(11705);if(r)goto S_12931;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(11706);}while(r); S_12933:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(11707);if(r)goto S_12933;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11707);}while(r); } S_12936:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(11708);if(r)goto S_12936;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11708);}while(r); } S_12939:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(11709);if(r)goto S_12939;} do{ *_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(11709);}while(r); do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11709);}while(r); } S_12943:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(11710);if(r)goto S_12943;} do{ *_FUNC_IDEF1BOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(11710);}while(r); do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11710);}while(r); } S_12947:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(11711);if(r)goto S_12947;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11711);}while(r); } do{ *_FUNC_IDEF1BOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(11712);}while(r); S_12951:; if ((-(*_FUNC_IDEF1BOX_LONG_ALT!=*_FUNC_IDEF1BOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(11712);if(r)goto S_12951;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(11712);}while(r); } do{ *_FUNC_IDEF1BOX_LONG_OLDALT=*_FUNC_IDEF1BOX_LONG_ALT; if(!qbevent)break;evnt(11713);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(11714);}while(r); S_12956:; }while((!(*_FUNC_IDEF1BOX_LONG_CHANGE))&&(!new_error)); dl_exit_1853:; if(qbevent){evnt(11715);if(r)goto S_12956;} S_12957:; if ((*_FUNC_IDEF1BOX_LONG_ALT)||new_error){ if(qbevent){evnt(11716);if(r)goto S_12957;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(11716);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(11716);}while(r); } do{ qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11718);}while(r); S_12963:; if ((*_FUNC_IDEF1BOX_LONG_ALT)||new_error){ if(qbevent){evnt(11719);if(r)goto S_12963;} S_12964:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(11720);if(r)goto S_12964;} do{ *_FUNC_IDEF1BOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11721);}while(r); S_12966:; if (((-(*_FUNC_IDEF1BOX_LONG_K>= 65 ))&(-(*_FUNC_IDEF1BOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(11722);if(r)goto S_12966;} do{ qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEF1BOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11722);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(11725);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(11725);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(11725);}while(r); do{ *_FUNC_IDEF1BOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(11729);}while(r); S_12975:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(11730);if(r)goto S_12975;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11730);}while(r); } S_12978:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(11731);if(r)goto S_12978;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(11731);}while(r); } S_12981:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(11732);if(r)goto S_12981;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(11732);}while(r); } S_12984:; if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(11733);if(r)goto S_12984;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(11733);}while(r); } S_12987:; if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS>*_FUNC_IDEF1BOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(11734);if(r)goto S_12987;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(11734);}while(r); } do{ *_FUNC_IDEF1BOX_LONG_F= 1 ; if(!qbevent)break;evnt(11735);}while(r); S_12991:; fornext_value1856= 1 ; fornext_finalvalue1856= 100 ; fornext_step1856= 1 ; if (fornext_step1856<0) fornext_step_negative1856=1; else fornext_step_negative1856=0; if (new_error) goto fornext_error1856; goto fornext_entrylabel1856; while(1){ fornext_value1856=fornext_step1856+(*_FUNC_IDEF1BOX_LONG_I); fornext_entrylabel1856: *_FUNC_IDEF1BOX_LONG_I=fornext_value1856; if (fornext_step_negative1856){ if (fornext_value1856fornext_finalvalue1856) break; } fornext_error1856:; if(qbevent){evnt(11736);if(r)goto S_12991;} do{ *_FUNC_IDEF1BOX_LONG_T=*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(11737);}while(r); S_12993:; if ((*_FUNC_IDEF1BOX_LONG_T)||new_error){ if(qbevent){evnt(11738);if(r)goto S_12993;} do{ *_FUNC_IDEF1BOX_LONG_FOCUSOFFSET=*_FUNC_IDEF1BOX_LONG_FOCUS-*_FUNC_IDEF1BOX_LONG_F; if(!qbevent)break;evnt(11739);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEF1BOX_LONG_FOCUS,_FUNC_IDEF1BOX_LONG_F,_FUNC_IDEF1BOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEF1BOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEF1BOX_LONG_MOUSEDOWN,_FUNC_IDEF1BOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEF1BOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11740);}while(r); } } fornext_exit_1855:; S_12998:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEF1BOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEF1BOX_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDEF1BOX_LONG_INFO== 1 ))&(-(*_FUNC_IDEF1BOX_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(11745);if(r)goto S_12998;} do{ qbs_set(_FUNC_IDEF1BOX_STRING_F,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11746);}while(r); do{ qbs_set(_FUNC_IDEF1BOX_STRING_IDEF1BOX,_FUNC_IDEF1BOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11747);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11748);}while(r); } do{ *_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(11752);}while(r); do{ *_FUNC_IDEF1BOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(11753);}while(r); }while(1); dl_exit_1850:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free5.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEF1BOX_STRING_IDEF1BOX);return _FUNC_IDEF1BOX_STRING_IDEF1BOX; } qbs* FUNC_BACK2BACKNAME(qbs*_FUNC_BACK2BACKNAME_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data6.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_13006:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_BACK2BACKNAME_STRING_A,qbs_new_txt_len("Keyword Reference - Alphabetical",32))))||new_error){ if(qbevent){evnt(11762);if(r)goto S_13006;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("Alphabetical",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11762);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11762);}while(r); } S_13010:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_BACK2BACKNAME_STRING_A,qbs_new_txt_len("Keyword Reference - By usage",28))))||new_error){ if(qbevent){evnt(11763);if(r)goto S_13010;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("By Usage",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11763);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11763);}while(r); } S_13014:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_BACK2BACKNAME_STRING_A,qbs_new_txt_len("QB64 Help Menu",14))))||new_error){ if(qbevent){evnt(11764);if(r)goto S_13014;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("Help",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11764);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11764);}while(r); } S_13018:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_BACK2BACKNAME_STRING_A,qbs_new_txt_len("QB64 FAQ",8))))||new_error){ if(qbevent){evnt(11765);if(r)goto S_13018;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("FAQ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11765);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11765);}while(r); } do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,_FUNC_BACK2BACKNAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11766);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free6.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME);return _FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME; } qbs* FUNC_WIKI(qbs*_FUNC_WIKI_STRING_PAGENAME){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data7.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(__STRING_HELP_PAGELOADED,_FUNC_WIKI_STRING_PAGENAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11770);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME2,_FUNC_WIKI_STRING_PAGENAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11771);}while(r); S_13025:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(11773);if(r)goto S_13025;} do{ tqbs=_FUNC_WIKI_STRING_PAGENAME2; if (!new_error){ tmp_fileno=func_instr(NULL,_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len(" ",1),0); if (!new_error){ tmp_long= 95 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11774);}while(r); } dl_exit_1859:; S_13028:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("&",1),0)))||new_error){ if(qbevent){evnt(11776);if(r)goto S_13028;} do{ *_FUNC_WIKI_LONG_I=func_instr(NULL,_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("&",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11777);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(qbs_add(qbs_left(_FUNC_WIKI_STRING_PAGENAME2,*_FUNC_WIKI_LONG_I- 1 ),qbs_new_txt_len("%26",3)),qbs_right(_FUNC_WIKI_STRING_PAGENAME2,_FUNC_WIKI_STRING_PAGENAME2->len-*_FUNC_WIKI_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11778);}while(r); } dl_exit_1860:; S_13032:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("/",1),0)))||new_error){ if(qbevent){evnt(11780);if(r)goto S_13032;} do{ *_FUNC_WIKI_LONG_I=func_instr(NULL,_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("/",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11781);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(qbs_add(qbs_left(_FUNC_WIKI_STRING_PAGENAME2,*_FUNC_WIKI_LONG_I- 1 ),qbs_new_txt_len("%2F",3)),qbs_right(_FUNC_WIKI_STRING_PAGENAME2,_FUNC_WIKI_STRING_PAGENAME2->len-*_FUNC_WIKI_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11782);}while(r); } dl_exit_1862:; S_13036:; if ((-(*__LONG_HELP_IGNORECACHE== 0 ))||new_error){ if(qbevent){evnt(11786);if(r)goto S_13036;} S_13037:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME2),qbs_new_txt_len(".txt",4)))))||new_error){ if(qbevent){evnt(11787);if(r)goto S_13037;} do{ *_FUNC_WIKI_LONG_FH=func_freefile(); if(!qbevent)break;evnt(11788);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME2),qbs_new_txt_len(".txt",4)), 2 ,NULL,NULL,*_FUNC_WIKI_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11789);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,func_space(func_lof(*_FUNC_WIKI_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11790);}while(r); do{ sub_get2(*_FUNC_WIKI_LONG_FH,NULL,_FUNC_WIKI_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11791);}while(r); do{ sub_close(*_FUNC_WIKI_LONG_FH,1); if(!qbevent)break;evnt(11792);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_WIKI,_FUNC_WIKI_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11793);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11794);}while(r); } } S_13047:; if ((-(*__LONG_HELP_RECACHING== 0 ))||new_error){ if(qbevent){evnt(11798);if(r)goto S_13047;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Downloading '",13),_FUNC_WIKI_STRING_PAGENAME),qbs_new_txt_len("' page...",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11799);}while(r); S_13049:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_WIKI_STRING_A->len> 60 )))||new_error){ if(qbevent){evnt(11800);if(r)goto S_13049;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_left(_FUNC_WIKI_STRING_A, 57 ),qbs_new_txt_len("\372\372\372",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11800);}while(r); } S_13052:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_WIKI_STRING_A->len< 60 )))||new_error){ if(qbevent){evnt(11801);if(r)goto S_13052;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_A,func_space( 60 -_FUNC_WIKI_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11801);}while(r); } do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(11803);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW, 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(11803);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_WIKI_STRING_A); if (new_error) goto skip1867; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1867: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11804);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(11806);}while(r); } do{ qbs_set(_FUNC_WIKI_STRING_URL,qbs_add(qbs_add(qbs_new_txt_len("www.qb64.net/wiki/index.php?title=",34),_FUNC_WIKI_STRING_PAGENAME2),qbs_new_txt_len("&action=edit",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11809);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_URL2,_FUNC_WIKI_STRING_URL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11811);}while(r); do{ *_FUNC_WIKI_LONG_X=func_instr(NULL,_FUNC_WIKI_STRING_URL2,qbs_new_txt_len("/",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11812);}while(r); S_13063:; if ((*_FUNC_WIKI_LONG_X)||new_error){ if(qbevent){evnt(11813);if(r)goto S_13063;} do{ qbs_set(_FUNC_WIKI_STRING_URL2,qbs_left(_FUNC_WIKI_STRING_URL,*_FUNC_WIKI_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11813);}while(r); } do{ *_FUNC_WIKI_LONG_C=func__openclient(qbs_add(qbs_new_txt_len("TCP/IP:80:",10),_FUNC_WIKI_STRING_URL2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11814);}while(r); S_13067:; if ((-(*_FUNC_WIKI_LONG_C== 0 ))||new_error){ if(qbevent){evnt(11815);if(r)goto S_13067;} do{ goto exit_subfunc; if(!qbevent)break;evnt(11815);}while(r); } do{ qbs_set(_FUNC_WIKI_STRING_E,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11816);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_URL3,qbs_right(_FUNC_WIKI_STRING_URL,_FUNC_WIKI_STRING_URL->len-*_FUNC_WIKI_LONG_X+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11817);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_X,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("GET ",4),_FUNC_WIKI_STRING_URL3),qbs_new_txt_len(" HTTP/1.1",9)),_FUNC_WIKI_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11818);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_X,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_WIKI_STRING_X,qbs_new_txt_len("Host: ",6)),_FUNC_WIKI_STRING_URL2),_FUNC_WIKI_STRING_E),_FUNC_WIKI_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11819);}while(r); do{ sub_put2(*_FUNC_WIKI_LONG_C,NULL,byte_element((uint64)_FUNC_WIKI_STRING_X->chr,_FUNC_WIKI_STRING_X->len,byte_element_1869),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11820);}while(r); do{ *_FUNC_WIKI_SINGLE_T=func_timer(NULL,0); if(!qbevent)break;evnt(11821);}while(r); S_13076:; do{ if(qbevent){evnt(11823);if(r)goto S_13076;} do{ sub__delay( 0.1E+0 ); if(!qbevent)break;evnt(11824);}while(r); do{ sub_get2(*_FUNC_WIKI_LONG_C,NULL,_FUNC_WIKI_STRING_A2,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11825);}while(r); S_13079:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_WIKI_STRING_A2->len))||new_error){ if(qbevent){evnt(11826);if(r)goto S_13079;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_A,_FUNC_WIKI_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11827);}while(r); S_13081:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_WIKI_STRING_A,qbs_new_txt_len("",7),0)))||new_error){ if(qbevent){evnt(11828);if(r)goto S_13081;} do{ sub_close(*_FUNC_WIKI_LONG_C,1); if(!qbevent)break;evnt(11829);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_S1,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("readonly=",9),func_chr( 34 )),qbs_new_txt_len("readonly",8)),func_chr( 34 )),qbs_new_txt_len(">",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11830);}while(r); do{ qbs_set(_FUNC_WIKI_STRING_S2,qbs_new_txt_len("",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11831);}while(r); do{ *_FUNC_WIKI_LONG_S1=func_instr(NULL,_FUNC_WIKI_STRING_A,_FUNC_WIKI_STRING_S1,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11832);}while(r); S_13086:; if ((-(*_FUNC_WIKI_LONG_S1== 0 ))||new_error){ if(qbevent){evnt(11832);if(r)goto S_13086;} do{ goto exit_subfunc; if(!qbevent)break;evnt(11832);}while(r); } do{ *_FUNC_WIKI_LONG_S1=*_FUNC_WIKI_LONG_S1+_FUNC_WIKI_STRING_S1->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11833);}while(r); do{ *_FUNC_WIKI_LONG_S2=func_instr(NULL,_FUNC_WIKI_STRING_A,_FUNC_WIKI_STRING_S2,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11834);}while(r); S_13091:; if ((-(*_FUNC_WIKI_LONG_S2== 0 ))||new_error){ if(qbevent){evnt(11834);if(r)goto S_13091;} do{ goto exit_subfunc; if(!qbevent)break;evnt(11834);}while(r); } do{ *_FUNC_WIKI_LONG_S2=*_FUNC_WIKI_LONG_S2- 1 ; if(!qbevent)break;evnt(11835);}while(r); S_13095:; if ((-(*_FUNC_WIKI_LONG_S1>*_FUNC_WIKI_LONG_S2))||new_error){ if(qbevent){evnt(11836);if(r)goto S_13095;} do{ goto exit_subfunc; if(!qbevent)break;evnt(11836);}while(r); } do{ qbs_set(_FUNC_WIKI_STRING_A,func_mid(_FUNC_WIKI_STRING_A,*_FUNC_WIKI_LONG_S1,*_FUNC_WIKI_LONG_S2-*_FUNC_WIKI_LONG_S1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11837);}while(r); do{ *_FUNC_WIKI_LONG_FH=func_freefile(); if(!qbevent)break;evnt(11838);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(11839);}while(r); do{ error_goto_line=8; if(!qbevent)break;evnt(11840);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME2),qbs_new_txt_len(".txt",4)), 4 ,NULL,NULL,*_FUNC_WIKI_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11841);}while(r); do{ error_goto_line=9; if(!qbevent)break;evnt(11842);}while(r); S_13104:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(11843);if(r)goto S_13104;} do{ sub_close(*_FUNC_WIKI_LONG_FH,1); if(!qbevent)break;evnt(11844);}while(r); do{ error_goto_line=10; if(!qbevent)break;evnt(11845);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME2),qbs_new_txt_len(".txt",4)), 2 ,NULL,NULL,*_FUNC_WIKI_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11846);}while(r); do{ error_goto_line=11; if(!qbevent)break;evnt(11847);}while(r); S_13109:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(11848);if(r)goto S_13109;} do{ sub_put2(*_FUNC_WIKI_LONG_FH,NULL,byte_element((uint64)_FUNC_WIKI_STRING_A->chr,_FUNC_WIKI_STRING_A->len,byte_element_1873),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11849);}while(r); do{ sub_close(*_FUNC_WIKI_LONG_FH,1); if(!qbevent)break;evnt(11850);}while(r); } } do{ qbs_set(_FUNC_WIKI_STRING_WIKI,_FUNC_WIKI_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11853);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11854);}while(r); } } S_13118:; }while((!(-(func_abs((float)(func_timer(NULL,0)-*_FUNC_WIKI_SINGLE_T))> 20 )))&&(!new_error)); dl_exit_1870:; if(qbevent){evnt(11857);if(r)goto S_13118;} do{ sub_close(*_FUNC_WIKI_LONG_C,1); if(!qbevent)break;evnt(11858);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free7.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_WIKI_STRING_WIKI);return _FUNC_WIKI_STRING_WIKI; } void SUB_HELP_ADDTXT(qbs*_SUB_HELP_ADDTXT_STRING_T,int32*_SUB_HELP_ADDTXT_LONG_COL,int32*_SUB_HELP_ADDTXT_LONG_LINK){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data8.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_13120:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_HELP_ADDTXT_STRING_T,func_chr( 13 ))))||new_error){ if(qbevent){evnt(11863);if(r)goto S_13120;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(11863);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(11863);}while(r); } S_13124:; fornext_value1876= 1 ; fornext_finalvalue1876=_SUB_HELP_ADDTXT_STRING_T->len; fornext_step1876= 1 ; if (fornext_step1876<0) fornext_step_negative1876=1; else fornext_step_negative1876=0; if (new_error) goto fornext_error1876; goto fornext_entrylabel1876; while(1){ fornext_value1876=fornext_step1876+(*_SUB_HELP_ADDTXT_LONG_I); fornext_entrylabel1876: *_SUB_HELP_ADDTXT_LONG_I=fornext_value1876; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1876){ if (fornext_value1876fornext_finalvalue1876) break; } fornext_error1876:; if(qbevent){evnt(11865);if(r)goto S_13124;} do{ *_SUB_HELP_ADDTXT_LONG_C=qbs_asc(_SUB_HELP_ADDTXT_STRING_T,*_SUB_HELP_ADDTXT_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11867);}while(r); S_13126:; if (((-(*__LONG_HELP_BG_COL== 0 ))&(-(*__LONG_HELP_LOCKWRAP== 0 )))||new_error){ if(qbevent){evnt(11870);if(r)goto S_13126;} S_13127:; if ((-(*_SUB_HELP_ADDTXT_LONG_C== 32 ))||new_error){ if(qbevent){evnt(11873);if(r)goto S_13127;} S_13128:; if ((-(*__LONG_HELP_POS==*__LONG_HELP_WW))||new_error){ if(qbevent){evnt(11875);if(r)goto S_13128;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(11875);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(11875);}while(r); } do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11877);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long= 32 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11877);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11878);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_ADDTXT_LONG_COL+(*__LONG_HELP_BG_COL* 16 ); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11878);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11879);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_ADDTXT_LONG_LINK& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11879);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11880);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_ADDTXT_LONG_LINK/ 256 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11880);}while(r); do{ *__LONG_HELP_WRAP_POS=*__LONG_HELP_TXT_LEN; if(!qbevent)break;evnt(11882);}while(r); do{ *__LONG_HELP_POS=*__LONG_HELP_POS+ 1 ; if(!qbevent)break;evnt(11883);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(11884);}while(r); } S_13144:; if ((-(*__LONG_HELP_POS>*__LONG_HELP_WW))||new_error){ if(qbevent){evnt(11887);if(r)goto S_13144;} S_13145:; if ((*__LONG_HELP_WRAP_POS)||new_error){ if(qbevent){evnt(11888);if(r)goto S_13145;} do{ qbs_set(_SUB_HELP_ADDTXT_STRING_B,func_mid(__STRING_HELP_TXT,*__LONG_HELP_WRAP_POS+ 1 ,*__LONG_HELP_TXT_LEN-*__LONG_HELP_WRAP_POS,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11891);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_WRAP_POS; if(!qbevent)break;evnt(11893);}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(11895);}while(r); do{ sub_mid(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN+ 1 ,_SUB_HELP_ADDTXT_STRING_B->len,_SUB_HELP_ADDTXT_STRING_B,1); if(!qbevent)break;evnt(11897);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+_SUB_HELP_ADDTXT_STRING_B->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11897);}while(r); do{ *__LONG_HELP_POS=*__LONG_HELP_POS+(_SUB_HELP_ADDTXT_STRING_B->len/ 4 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11899);}while(r); } } } do{ *_SUB_HELP_ADDTXT_LONG_C=qbs_asc(_SUB_HELP_ADDTXT_STRING_T,*_SUB_HELP_ADDTXT_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11905);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11906);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_ADDTXT_LONG_C; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11906);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11907);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_ADDTXT_LONG_COL+(*__LONG_HELP_BG_COL* 16 ); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11907);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11908);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_ADDTXT_LONG_LINK& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11908);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11909);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_ADDTXT_LONG_LINK/ 256 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11909);}while(r); do{ *__LONG_HELP_POS=*__LONG_HELP_POS+ 1 ; if(!qbevent)break;evnt(11911);}while(r); LABEL_SPECIAL:; if(qbevent){evnt(11912);r=0;} } fornext_exit_1875:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free8.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_HELP_NEWLINE(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data9.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_13166:; if ((-(*__LONG_HELP_POS>*__LONG_HELP_W))||new_error){ if(qbevent){evnt(11918);if(r)goto S_13166;} do{ *__LONG_HELP_W=*__LONG_HELP_POS; if(!qbevent)break;evnt(11918);}while(r); } do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11920);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long= 13 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11920);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11921);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*_SUB_HELP_NEWLINE_LONG_COL+(*__LONG_HELP_BG_COL* 16 ); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11921);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11922);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long= 0 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11922);}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(11923);}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long= 0 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(11923);}while(r); do{ *__LONG_HELP_H=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(11925);}while(r); do{ qbs_set(__STRING_HELP_LINE,qbs_add(__STRING_HELP_LINE,l2string(*__LONG_HELP_TXT_LEN+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11926);}while(r); do{ *__LONG_HELP_WRAP_POS= 0 ; if(!qbevent)break;evnt(11927);}while(r); S_13180:; if ((*__LONG_HELP_UNDERLINE)||new_error){ if(qbevent){evnt(11929);if(r)goto S_13180;} do{ *__LONG_HELP_UNDERLINE= 0 ; if(!qbevent)break;evnt(11930);}while(r); do{ *_SUB_HELP_NEWLINE_LONG_W=*__LONG_HELP_POS; if(!qbevent)break;evnt(11931);}while(r); do{ *__LONG_HELP_POS= 1 ; if(!qbevent)break;evnt(11932);}while(r); do{ SUB_HELP_ADDTXT(func_string(*_SUB_HELP_NEWLINE_LONG_W- 1 , 196 ),&(pass1881=FUNC_HELP_COL()),&(pass1882= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11933);}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(11934);}while(r); } do{ *__LONG_HELP_POS= 1 ; if(!qbevent)break;evnt(11936);}while(r); S_13188:; if ((*__LONG_HELP_NEWLINEINDENT)||new_error){ if(qbevent){evnt(11938);if(r)goto S_13188;} do{ SUB_HELP_ADDTXT(func_space(*__LONG_HELP_NEWLINEINDENT),&(pass1883=FUNC_HELP_COL()),&(pass1884= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11939);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free9.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_HELP_PREVIEW(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data10.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_open(qbs_new_txt_len("help_preview.txt",16), 4 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11947);}while(r); S_13192:; fornext_value1886= 1 ; fornext_finalvalue1886=__STRING_HELP_TXT->len; fornext_step1886= 4 ; if (fornext_step1886<0) fornext_step_negative1886=1; else fornext_step_negative1886=0; if (new_error) goto fornext_error1886; goto fornext_entrylabel1886; while(1){ fornext_value1886=fornext_step1886+(*_SUB_HELP_PREVIEW_LONG_I); fornext_entrylabel1886: *_SUB_HELP_PREVIEW_LONG_I=fornext_value1886; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1886){ if (fornext_value1886fornext_finalvalue1886) break; } fornext_error1886:; if(qbevent){evnt(11948);if(r)goto S_13192;} do{ *_SUB_HELP_PREVIEW_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_PREVIEW_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11949);}while(r); do{ qbs_set(_SUB_HELP_PREVIEW_STRING_C,func_chr(*_SUB_HELP_PREVIEW_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11950);}while(r); S_13195:; if ((-(*_SUB_HELP_PREVIEW_LONG_C== 13 ))||new_error){ if(qbevent){evnt(11951);if(r)goto S_13195;} do{ qbs_set(_SUB_HELP_PREVIEW_STRING_C,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11951);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 1 ; if (new_error) goto skip1888; sub_file_print(tmp_fileno,_SUB_HELP_PREVIEW_STRING_C, 0 , 0 , 0 ); if (new_error) goto skip1888; skip1888: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11952);}while(r); } fornext_exit_1885:; do{ sub_close( 1 ,1); if(!qbevent)break;evnt(11954);}while(r); do{ sub_cls(NULL,NULL,0); if(!qbevent)break;evnt(11956);}while(r); S_13202:; fornext_value1890= 1 ; fornext_finalvalue1890=__STRING_HELP_TXT->len; fornext_step1890= 4 ; if (fornext_step1890<0) fornext_step_negative1890=1; else fornext_step_negative1890=0; if (new_error) goto fornext_error1890; goto fornext_entrylabel1890; while(1){ fornext_value1890=fornext_step1890+(*_SUB_HELP_PREVIEW_LONG_I); fornext_entrylabel1890: *_SUB_HELP_PREVIEW_LONG_I=fornext_value1890; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1890){ if (fornext_value1890fornext_finalvalue1890) break; } fornext_error1890:; if(qbevent){evnt(11957);if(r)goto S_13202;} do{ *_SUB_HELP_PREVIEW_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_PREVIEW_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11958);}while(r); do{ *_SUB_HELP_PREVIEW_LONG_COL=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_PREVIEW_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11959);}while(r); S_13205:; if ((-(*_SUB_HELP_PREVIEW_LONG_C== 13 ))||new_error){ if(qbevent){evnt(11960);if(r)goto S_13205;} do{ qbg_sub_color(*_SUB_HELP_PREVIEW_LONG_COL& 15 ,*_SUB_HELP_PREVIEW_LONG_COL/ 16 ,NULL,3); if(!qbevent)break;evnt(11961);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_HELP_W-func_pos( 0 ))); if (new_error) goto skip1892; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1892: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11962);}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(11963);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(func__width(NULL,0)-func_pos( 0 )+ 1 )); if (new_error) goto skip1893; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1893: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11964);}while(r); do{ qbg_sub_color(*_SUB_HELP_PREVIEW_LONG_COL& 15 ,*_SUB_HELP_PREVIEW_LONG_COL/ 16 ,NULL,3); if(!qbevent)break;evnt(11965);}while(r); do{ sub_sleep(NULL,0); if(!qbevent)break;evnt(11966);}while(r); }else{ do{ qbg_sub_color(*_SUB_HELP_PREVIEW_LONG_COL& 15 ,*_SUB_HELP_PREVIEW_LONG_COL/ 16 ,NULL,3); if(!qbevent)break;evnt(11968);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(*_SUB_HELP_PREVIEW_LONG_C)); if (new_error) goto skip1894; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip1894: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11969);}while(r); } } fornext_exit_1889:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free10.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_HELP_COL(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data11.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_HELP_COL_LONG_COL=*__LONG_HELP_COL_NORMAL; if(!qbevent)break;evnt(11976);}while(r); S_13218:; if ((*__LONG_HELP_ITALIC)||new_error){ if(qbevent){evnt(11977);if(r)goto S_13218;} do{ *_FUNC_HELP_COL_LONG_COL=*__LONG_HELP_COL_ITALIC; if(!qbevent)break;evnt(11977);}while(r); } S_13221:; if ((*__LONG_HELP_BOLD)||new_error){ if(qbevent){evnt(11978);if(r)goto S_13221;} do{ *_FUNC_HELP_COL_LONG_COL=*__LONG_HELP_COL_BOLD; if(!qbevent)break;evnt(11978);}while(r); } do{ *_FUNC_HELP_COL_LONG_HELP_COL=*_FUNC_HELP_COL_LONG_COL; if(!qbevent)break;evnt(11979);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free11.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_HELP_COL_LONG_HELP_COL; } void SUB_WIKIPARSE(qbs*_SUB_WIKIPARSE_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data12.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_HELP_H= 0 ; if(!qbevent)break;evnt(11990);}while(r); do{ *__LONG_HELP_W= 0 ; if(!qbevent)break;evnt(11990);}while(r); do{ qbs_set(__STRING_HELP_LINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11990);}while(r); do{ qbs_set(__STRING_HELP_LINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11990);}while(r); do{ *__LONG_HELP_LINKN= 0 ; if(!qbevent)break;evnt(11990);}while(r); do{ qbs_set(__STRING_HELP_TXT,func_space( 1000000 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11991);}while(r); do{ *__LONG_HELP_TXT_LEN= 0 ; if(!qbevent)break;evnt(11992);}while(r); do{ *__LONG_HELP_POS= 1 ; if(!qbevent)break;evnt(11994);}while(r); do{ *__LONG_HELP_WRAP_POS= 0 ; if(!qbevent)break;evnt(11994);}while(r); do{ qbs_set(__STRING_HELP_LINE,l2string( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11995);}while(r); do{ *__LONG_HELP_LOCKWRAP= 0 ; if(!qbevent)break;evnt(11996);}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(11997);}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(11997);}while(r); do{ *__LONG_HELP_UNDERLINE= 0 ; if(!qbevent)break;evnt(11998);}while(r); do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(11999);}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 0 ; if(!qbevent)break;evnt(12001);}while(r); do{ *_SUB_WIKIPARSE_LONG_ELINK= 0 ; if(!qbevent)break;evnt(12001);}while(r); do{ *_SUB_WIKIPARSE_LONG_CB= 0 ; if(!qbevent)break;evnt(12001);}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(12003);}while(r); do{ if (_SUB_WIKIPARSE_ARRAY_STRING_C[2]&2){ error(10); }else{ if (_SUB_WIKIPARSE_ARRAY_STRING_C[2]&1){ error(10); }else{ _SUB_WIKIPARSE_ARRAY_STRING_C[4]= 0 ; _SUB_WIKIPARSE_ARRAY_STRING_C[5]=( 16 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4]+1; _SUB_WIKIPARSE_ARRAY_STRING_C[6]=1; _SUB_WIKIPARSE_ARRAY_STRING_C[0]=(ptrszint)malloc(_SUB_WIKIPARSE_ARRAY_STRING_C[5]*8); if (!_SUB_WIKIPARSE_ARRAY_STRING_C[0]) error(257); _SUB_WIKIPARSE_ARRAY_STRING_C[2]|=1; tmp_long=_SUB_WIKIPARSE_ARRAY_STRING_C[5]; if (_SUB_WIKIPARSE_ARRAY_STRING_C[2]&4){ while(tmp_long--) ((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(12023);}while(r); S_13245:; fornext_value1897= 1 ; fornext_finalvalue1897= 16 ; fornext_step1897= 1 ; if (fornext_step1897<0) fornext_step_negative1897=1; else fornext_step_negative1897=0; if (new_error) goto fornext_error1897; goto fornext_entrylabel1897; while(1){ fornext_value1897=fornext_step1897+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel1897: *_SUB_WIKIPARSE_LONG_II=fornext_value1897; if (fornext_step_negative1897){ if (fornext_value1897fornext_finalvalue1897) break; } fornext_error1897:; if(qbevent){evnt(12024);if(r)goto S_13245;} do{ tmp_long=array_check((*_SUB_WIKIPARSE_LONG_II)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[tmp_long])),func_space(*_SUB_WIKIPARSE_LONG_II)); if(!qbevent)break;evnt(12025);}while(r); } fornext_exit_1896:; do{ *_SUB_WIKIPARSE_LONG_N=_SUB_WIKIPARSE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12028);}while(r); do{ *_SUB_WIKIPARSE_LONG_I= 1 ; if(!qbevent)break;evnt(12029);}while(r); S_13250:; while((-(*_SUB_WIKIPARSE_LONG_I<=*_SUB_WIKIPARSE_LONG_N))||new_error){ if(qbevent){evnt(12030);if(r)goto S_13250;} do{ *_SUB_WIKIPARSE_LONG_C=qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12032);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_C,func_chr(*_SUB_WIKIPARSE_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12032);}while(r); S_13253:; fornext_value1901= 1 ; fornext_finalvalue1901= 16 ; fornext_step1901= 1 ; if (fornext_step1901<0) fornext_step_negative1901=1; else fornext_step_negative1901=0; if (new_error) goto fornext_error1901; goto fornext_entrylabel1901; while(1){ fornext_value1901=fornext_step1901+(*_SUB_WIKIPARSE_LONG_I1); fornext_entrylabel1901: *_SUB_WIKIPARSE_LONG_I1=fornext_value1901; if (fornext_step_negative1901){ if (fornext_value1901fornext_finalvalue1901) break; } fornext_error1901:; if(qbevent){evnt(12033);if(r)goto S_13253;} do{ *_SUB_WIKIPARSE_LONG_II=*_SUB_WIKIPARSE_LONG_I; if(!qbevent)break;evnt(12034);}while(r); S_13255:; fornext_value1903= 1 ; fornext_finalvalue1903=*_SUB_WIKIPARSE_LONG_I1; fornext_step1903= 1 ; if (fornext_step1903<0) fornext_step_negative1903=1; else fornext_step_negative1903=0; if (new_error) goto fornext_error1903; goto fornext_entrylabel1903; while(1){ fornext_value1903=fornext_step1903+(*_SUB_WIKIPARSE_LONG_I2); fornext_entrylabel1903: *_SUB_WIKIPARSE_LONG_I2=fornext_value1903; if (fornext_step_negative1903){ if (fornext_value1903fornext_finalvalue1903) break; } fornext_error1903:; if(qbevent){evnt(12035);if(r)goto S_13255;} S_13256:; if ((-(*_SUB_WIKIPARSE_LONG_II<*_SUB_WIKIPARSE_LONG_N))||new_error){ if(qbevent){evnt(12036);if(r)goto S_13256;} do{ tqbs=((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((*_SUB_WIKIPARSE_LONG_I1)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])); if (!new_error){ tmp_fileno=*_SUB_WIKIPARSE_LONG_I2; if (!new_error){ tmp_long=qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(12037);}while(r); }else{ do{ tqbs=((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((*_SUB_WIKIPARSE_LONG_I1)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])); if (!new_error){ tmp_fileno=*_SUB_WIKIPARSE_LONG_I2; if (!new_error){ tmp_long= 32 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(12039);}while(r); } do{ *_SUB_WIKIPARSE_LONG_II=*_SUB_WIKIPARSE_LONG_II+ 1 ; if(!qbevent)break;evnt(12041);}while(r); } fornext_exit_1902:; } fornext_exit_1900:; S_13264:; if ((-(*_SUB_WIKIPARSE_LONG_C== 38 ))||new_error){ if(qbevent){evnt(12045);if(r)goto S_13264;} do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("<code>",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12047);}while(r); S_13266:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12047);if(r)goto S_13266;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12047);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12047);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("</code>",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12048);}while(r); S_13271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12048);if(r)goto S_13271;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12048);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12048);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len(""",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12050);}while(r); S_13276:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12051);if(r)goto S_13276;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12052);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_C,func_chr( 34 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12053);}while(r); do{ *_SUB_WIKIPARSE_LONG_C=qbs_asc(_SUB_WIKIPARSE_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12053);}while(r); do{ goto LABEL_SPECIALCHR; if(!qbevent)break;evnt(12054);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("&",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12057);}while(r); S_13283:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12058);if(r)goto S_13283;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12059);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12060);}while(r); do{ *_SUB_WIKIPARSE_LONG_C=qbs_asc(_SUB_WIKIPARSE_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12060);}while(r); do{ goto LABEL_SPECIALCHR; if(!qbevent)break;evnt(12061);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("<center>",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12064);}while(r); S_13290:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12065);if(r)goto S_13290;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12066);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12067);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("</center>",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12070);}while(r); S_13295:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12071);if(r)goto S_13295;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12072);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12073);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("<p style=",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12076);}while(r); S_13300:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12077);if(r)goto S_13300;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12078);}while(r); S_13302:; fornext_value1919=*_SUB_WIKIPARSE_LONG_I; fornext_finalvalue1919=_SUB_WIKIPARSE_STRING_A->len- 3 ; fornext_step1919= 1 ; if (fornext_step1919<0) fornext_step_negative1919=1; else fornext_step_negative1919=0; if (new_error) goto fornext_error1919; goto fornext_entrylabel1919; while(1){ fornext_value1919=fornext_step1919+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel1919: *_SUB_WIKIPARSE_LONG_II=fornext_value1919; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1919){ if (fornext_value1919fornext_finalvalue1919) break; } fornext_error1919:; if(qbevent){evnt(12079);if(r)goto S_13302;} S_13303:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II, 4 ,1),qbs_new_txt_len(">",4))))||new_error){ if(qbevent){evnt(12080);if(r)goto S_13303;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II+ 3 ; if(!qbevent)break;evnt(12080);}while(r); do{ goto fornext_exit_1918; if(!qbevent)break;evnt(12080);}while(r); } } fornext_exit_1918:; do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12082);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("</p",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12084);}while(r); S_13311:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12085);if(r)goto S_13311;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12086);}while(r); S_13313:; fornext_value1924=*_SUB_WIKIPARSE_LONG_I; fornext_finalvalue1924=_SUB_WIKIPARSE_STRING_A->len- 3 ; fornext_step1924= 1 ; if (fornext_step1924<0) fornext_step_negative1924=1; else fornext_step_negative1924=0; if (new_error) goto fornext_error1924; goto fornext_entrylabel1924; while(1){ fornext_value1924=fornext_step1924+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel1924: *_SUB_WIKIPARSE_LONG_II=fornext_value1924; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1924){ if (fornext_value1924fornext_finalvalue1924) break; } fornext_error1924:; if(qbevent){evnt(12087);if(r)goto S_13313;} S_13314:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II, 4 ,1),qbs_new_txt_len(">",4))))||new_error){ if(qbevent){evnt(12088);if(r)goto S_13314;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II+ 3 ; if(!qbevent)break;evnt(12088);}while(r); do{ goto fornext_exit_1923; if(!qbevent)break;evnt(12088);}while(r); } } fornext_exit_1923:; do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12090);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len(">",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12093);}while(r); S_13322:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12094);if(r)goto S_13322;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12095);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len(">",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12096);}while(r); do{ *_SUB_WIKIPARSE_LONG_C=qbs_asc(_SUB_WIKIPARSE_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12096);}while(r); do{ goto LABEL_SPECIALCHR; if(!qbevent)break;evnt(12097);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("<",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12099);}while(r); S_13329:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12100);if(r)goto S_13329;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12101);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("<",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12102);}while(r); do{ *_SUB_WIKIPARSE_LONG_C=qbs_asc(_SUB_WIKIPARSE_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12102);}while(r); do{ goto LABEL_SPECIALCHR; if(!qbevent)break;evnt(12103);}while(r); } S_13335:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),(qbs_add(func_chr( 194 ),func_chr( 160 ))))))||new_error){ if(qbevent){evnt(12106);if(r)goto S_13335;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12107);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12108);}while(r); } LABEL_SPECIALCHR:; if(qbevent){evnt(12111);r=0;} } S_13340:; if ((-(*_SUB_WIKIPARSE_LONG_C== 91 ))||new_error){ if(qbevent){evnt(12116);if(r)goto S_13340;} S_13341:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("[[",2)))&(-(*_SUB_WIKIPARSE_LONG_LINK== 0 ))))||new_error){ if(qbevent){evnt(12117);if(r)goto S_13341;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12118);}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 1 ; if(!qbevent)break;evnt(12119);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12120);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12121);}while(r); } } S_13348:; if ((-(*_SUB_WIKIPARSE_LONG_LINK== 1 ))||new_error){ if(qbevent){evnt(12124);if(r)goto S_13348;} S_13349:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("]]",2)))|(qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("}}",2)))))||new_error){ if(qbevent){evnt(12125);if(r)goto S_13349;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12126);}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 0 ; if(!qbevent)break;evnt(12127);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_TEXT,_SUB_WIKIPARSE_STRING_LINK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12128);}while(r); do{ *_SUB_WIKIPARSE_LONG_I2=func_instr(NULL,_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12129);}while(r); S_13354:; if ((*_SUB_WIKIPARSE_LONG_I2)||new_error){ if(qbevent){evnt(12130);if(r)goto S_13354;} do{ qbs_set(_SUB_WIKIPARSE_STRING_TEXT,qbs_right(_SUB_WIKIPARSE_STRING_LINK,_SUB_WIKIPARSE_STRING_LINK->len-*_SUB_WIKIPARSE_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12131);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_LINK,qbs_left(_SUB_WIKIPARSE_STRING_LINK,*_SUB_WIKIPARSE_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12132);}while(r); } S_13358:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("#",1),0)))||new_error){ if(qbevent){evnt(12135);if(r)goto S_13358;} do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_TEXT,&(pass1931= 8 ),&(pass1932= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12136);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12137);}while(r); } do{ *__LONG_HELP_LINKN=*__LONG_HELP_LINKN+ 1 ; if(!qbevent)break;evnt(12140);}while(r); do{ qbs_set(__STRING_HELP_LINK,qbs_add(qbs_add(qbs_add(__STRING_HELP_LINK,qbs_new_txt_len("PAGE:",5)),_SUB_WIKIPARSE_STRING_LINK),__STRING_HELP_LINK_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12141);}while(r); S_13364:; if ((-(*__LONG_HELP_BG_COL== 0 ))||new_error){ if(qbevent){evnt(12143);if(r)goto S_13364;} do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_TEXT,__LONG_HELP_COL_LINK,__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12144);}while(r); }else{ do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_TEXT,__LONG_HELP_COL_BOLD,__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12146);}while(r); } do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12148);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_LINK,qbs_add(_SUB_WIKIPARSE_STRING_LINK,_SUB_WIKIPARSE_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12150);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12151);}while(r); } S_13374:; if ((-(*_SUB_WIKIPARSE_LONG_C== 91 ))||new_error){ if(qbevent){evnt(12156);if(r)goto S_13374;} S_13375:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 6 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("[http:",6)))&(-(*_SUB_WIKIPARSE_LONG_ELINK== 0 ))))||new_error){ if(qbevent){evnt(12157);if(r)goto S_13375;} do{ *_SUB_WIKIPARSE_LONG_ELINK= 2 ; if(!qbevent)break;evnt(12158);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_ELINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12159);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12160);}while(r); } } S_13381:; if ((-(*_SUB_WIKIPARSE_LONG_ELINK== 2 ))||new_error){ if(qbevent){evnt(12163);if(r)goto S_13381;} S_13382:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len(" ",1))))||new_error){ if(qbevent){evnt(12164);if(r)goto S_13382;} do{ *_SUB_WIKIPARSE_LONG_ELINK= 1 ; if(!qbevent)break;evnt(12165);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12166);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_ELINK,qbs_add(_SUB_WIKIPARSE_STRING_ELINK,_SUB_WIKIPARSE_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12168);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12169);}while(r); } S_13389:; if ((-(*_SUB_WIKIPARSE_LONG_ELINK>= 1 ))||new_error){ if(qbevent){evnt(12171);if(r)goto S_13389;} S_13390:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("]",1))))||new_error){ if(qbevent){evnt(12172);if(r)goto S_13390;} do{ *_SUB_WIKIPARSE_LONG_ELINK= 0 ; if(!qbevent)break;evnt(12173);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_ELINK,qbs_add(qbs_new_txt_len(" ",1),_SUB_WIKIPARSE_STRING_ELINK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12174);}while(r); do{ *__LONG_HELP_LOCKWRAP= 1 ; if(!qbevent)break;evnt(12175);}while(r); do{ *__LONG_HELP_WRAP_POS= 0 ; if(!qbevent)break;evnt(12175);}while(r); do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_ELINK,&(pass1933= 8 ),&(pass1934= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12176);}while(r); do{ *__LONG_HELP_LOCKWRAP= 0 ; if(!qbevent)break;evnt(12177);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_ELINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12178);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12179);}while(r); } } S_13401:; if ((-(*_SUB_WIKIPARSE_LONG_C== 123 ))||new_error){ if(qbevent){evnt(12183);if(r)goto S_13401;} S_13402:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 5 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("{{KW|",5))))||new_error){ if(qbevent){evnt(12184);if(r)goto S_13402;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 4 ; if(!qbevent)break;evnt(12185);}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 1 ; if(!qbevent)break;evnt(12186);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12187);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12188);}while(r); } S_13408:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 5 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("{{Cl|",5))))||new_error){ if(qbevent){evnt(12190);if(r)goto S_13408;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 4 ; if(!qbevent)break;evnt(12191);}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 1 ; if(!qbevent)break;evnt(12192);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12193);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12194);}while(r); } S_13414:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("{{",2))))||new_error){ if(qbevent){evnt(12196);if(r)goto S_13414;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12197);}while(r); do{ *_SUB_WIKIPARSE_LONG_CB= 1 ; if(!qbevent)break;evnt(12198);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12199);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12200);}while(r); } } S_13421:; if ((-(*_SUB_WIKIPARSE_LONG_CB== 1 ))||new_error){ if(qbevent){evnt(12204);if(r)goto S_13421;} S_13422:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("|",1)))|(qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("}}",2)))))||new_error){ if(qbevent){evnt(12205);if(r)goto S_13422;} S_13423:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("}}",2))))||new_error){ if(qbevent){evnt(12206);if(r)goto S_13423;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12206);}while(r); } do{ *_SUB_WIKIPARSE_LONG_CB= 0 ; if(!qbevent)break;evnt(12207);}while(r); S_13427:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageSyntax",10))))||new_error){ if(qbevent){evnt(12209);if(r)goto S_13427;} do{ SUB_HELP_ADDTXT(qbs_add(qbs_new_txt_len("Syntax:",7),func_chr( 13 )),__LONG_HELP_COL_SECTION,&(pass1935= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12209);}while(r); } S_13430:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageDescription",15))))||new_error){ if(qbevent){evnt(12210);if(r)goto S_13430;} do{ SUB_HELP_ADDTXT(qbs_add(qbs_new_txt_len("Descripton:",11),func_chr( 13 )),__LONG_HELP_COL_SECTION,&(pass1936= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12210);}while(r); } S_13433:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageExamples",12))))||new_error){ if(qbevent){evnt(12211);if(r)goto S_13433;} do{ SUB_HELP_ADDTXT(qbs_add(qbs_new_txt_len("Code Examples:",14),func_chr( 13 )),__LONG_HELP_COL_SECTION,&(pass1937= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12211);}while(r); } S_13436:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageSeeAlso",11))))||new_error){ if(qbevent){evnt(12212);if(r)goto S_13436;} do{ SUB_HELP_ADDTXT(qbs_add(qbs_new_txt_len("See also:",9),func_chr( 13 )),__LONG_HELP_COL_SECTION,&(pass1938= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12212);}while(r); } S_13439:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("CodeStart",9))))||new_error){ if(qbevent){evnt(12214);if(r)goto S_13439;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(12215);}while(r); do{ *__LONG_HELP_BG_COL= 1 ; if(!qbevent)break;evnt(12216);}while(r); do{ *_SUB_WIKIPARSE_LONG_WS= 1 ; if(!qbevent)break;evnt(12218);}while(r); S_13443:; fornext_value1940=*_SUB_WIKIPARSE_LONG_I+ 1 ; fornext_finalvalue1940=_SUB_WIKIPARSE_STRING_A->len; fornext_step1940= 1 ; if (fornext_step1940<0) fornext_step_negative1940=1; else fornext_step_negative1940=0; if (new_error) goto fornext_error1940; goto fornext_entrylabel1940; while(1){ fornext_value1940=fornext_step1940+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel1940: *_SUB_WIKIPARSE_LONG_II=fornext_value1940; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1940){ if (fornext_value1940fornext_finalvalue1940) break; } fornext_error1940:; if(qbevent){evnt(12219);if(r)goto S_13443;} S_13444:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II)== 10 )))||new_error){ if(qbevent){evnt(12220);if(r)goto S_13444;} do{ goto fornext_exit_1939; if(!qbevent)break;evnt(12220);}while(r); } S_13447:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II)!= 32 ))&(-(qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II)!= 39 ))))||new_error){ if(qbevent){evnt(12221);if(r)goto S_13447;} do{ *_SUB_WIKIPARSE_LONG_WS= 0 ; if(!qbevent)break;evnt(12221);}while(r); } } fornext_exit_1939:; S_13451:; if ((*_SUB_WIKIPARSE_LONG_WS)||new_error){ if(qbevent){evnt(12223);if(r)goto S_13451;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II; if(!qbevent)break;evnt(12223);}while(r); } } S_13455:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("CodeEnd",7))))||new_error){ if(qbevent){evnt(12225);if(r)goto S_13455;} do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(12225);}while(r); } S_13458:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("OutputStart",11))))||new_error){ if(qbevent){evnt(12226);if(r)goto S_13458;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(12227);}while(r); do{ *__LONG_HELP_BG_COL= 2 ; if(!qbevent)break;evnt(12228);}while(r); do{ *_SUB_WIKIPARSE_LONG_WS= 1 ; if(!qbevent)break;evnt(12230);}while(r); S_13462:; fornext_value1943=*_SUB_WIKIPARSE_LONG_I+ 1 ; fornext_finalvalue1943=_SUB_WIKIPARSE_STRING_A->len; fornext_step1943= 1 ; if (fornext_step1943<0) fornext_step_negative1943=1; else fornext_step_negative1943=0; if (new_error) goto fornext_error1943; goto fornext_entrylabel1943; while(1){ fornext_value1943=fornext_step1943+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel1943: *_SUB_WIKIPARSE_LONG_II=fornext_value1943; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1943){ if (fornext_value1943fornext_finalvalue1943) break; } fornext_error1943:; if(qbevent){evnt(12231);if(r)goto S_13462;} S_13463:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II)== 10 )))||new_error){ if(qbevent){evnt(12232);if(r)goto S_13463;} do{ goto fornext_exit_1942; if(!qbevent)break;evnt(12232);}while(r); } S_13466:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II)!= 32 ))&(-(qbs_asc(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II)!= 39 ))))||new_error){ if(qbevent){evnt(12233);if(r)goto S_13466;} do{ *_SUB_WIKIPARSE_LONG_WS= 0 ; if(!qbevent)break;evnt(12233);}while(r); } } fornext_exit_1942:; S_13470:; if ((*_SUB_WIKIPARSE_LONG_WS)||new_error){ if(qbevent){evnt(12235);if(r)goto S_13470;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II; if(!qbevent)break;evnt(12235);}while(r); } } S_13474:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("OutputEnd",9))))||new_error){ if(qbevent){evnt(12237);if(r)goto S_13474;} do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(12237);}while(r); } do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12239);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_CB,qbs_add(_SUB_WIKIPARSE_STRING_CB,_SUB_WIKIPARSE_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12243);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12244);}while(r); } S_13482:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("}}",2))))||new_error){ if(qbevent){evnt(12247);if(r)goto S_13482;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12248);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12249);}while(r); } S_13486:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 4 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len(" == ",4))))||new_error){ if(qbevent){evnt(12254);if(r)goto S_13486;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 3 ; if(!qbevent)break;evnt(12255);}while(r); do{ *__LONG_HELP_UNDERLINE= 1 ; if(!qbevent)break;evnt(12256);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12257);}while(r); } S_13491:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("== ",3))))||new_error){ if(qbevent){evnt(12259);if(r)goto S_13491;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(12260);}while(r); do{ *__LONG_HELP_UNDERLINE= 1 ; if(!qbevent)break;evnt(12261);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12262);}while(r); } S_13496:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len(" ==",3))))||new_error){ if(qbevent){evnt(12264);if(r)goto S_13496;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(12265);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12266);}while(r); } S_13500:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("==",2))))||new_error){ if(qbevent){evnt(12268);if(r)goto S_13500;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12269);}while(r); do{ *__LONG_HELP_UNDERLINE= 1 ; if(!qbevent)break;evnt(12270);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12271);}while(r); } S_13505:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("'''",3))))||new_error){ if(qbevent){evnt(12275);if(r)goto S_13505;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(12276);}while(r); S_13507:; if ((-(*__LONG_HELP_BOLD== 0 ))||new_error){ if(qbevent){evnt(12277);if(r)goto S_13507;} do{ *__LONG_HELP_BOLD= 1 ; if(!qbevent)break;evnt(12277);}while(r); }else{ do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(12277);}while(r); } do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(12278);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12279);}while(r); } S_13515:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("''",2))))||new_error){ if(qbevent){evnt(12282);if(r)goto S_13515;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12283);}while(r); S_13517:; if ((-(*__LONG_HELP_ITALIC== 0 ))||new_error){ if(qbevent){evnt(12284);if(r)goto S_13517;} do{ *__LONG_HELP_ITALIC= 1 ; if(!qbevent)break;evnt(12284);}while(r); }else{ do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(12284);}while(r); } do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(12285);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12286);}while(r); } S_13525:; if ((-(*_SUB_WIKIPARSE_LONG_NL== 1 ))||new_error){ if(qbevent){evnt(12289);if(r)goto S_13525;} S_13526:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("** ",3))))||new_error){ if(qbevent){evnt(12291);if(r)goto S_13526;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(12292);}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" \376 ",6),_SUB_WIKIPARSE_LONG_COL,&(pass1945= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12293);}while(r); do{ *__LONG_HELP_NEWLINEINDENT=*__LONG_HELP_NEWLINEINDENT+ 6 ; if(!qbevent)break;evnt(12294);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12295);}while(r); } S_13532:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("* ",2))))||new_error){ if(qbevent){evnt(12297);if(r)goto S_13532;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12298);}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\376 ",2),_SUB_WIKIPARSE_LONG_COL,&(pass1946= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12299);}while(r); do{ *__LONG_HELP_NEWLINEINDENT=*__LONG_HELP_NEWLINEINDENT+ 2 ; if(!qbevent)break;evnt(12300);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12301);}while(r); } S_13538:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("**",2))))||new_error){ if(qbevent){evnt(12303);if(r)goto S_13538;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12304);}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" \376 ",6),_SUB_WIKIPARSE_LONG_COL,&(pass1947= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12305);}while(r); do{ *__LONG_HELP_NEWLINEINDENT=*__LONG_HELP_NEWLINEINDENT+ 6 ; if(!qbevent)break;evnt(12306);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12307);}while(r); } S_13544:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(12309);if(r)goto S_13544;} do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\376 ",2),_SUB_WIKIPARSE_LONG_COL,&(pass1948= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12310);}while(r); do{ *__LONG_HELP_NEWLINEINDENT=*__LONG_HELP_NEWLINEINDENT+ 2 ; if(!qbevent)break;evnt(12311);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12312);}while(r); } } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("{|",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12317);}while(r); S_13551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12318);if(r)goto S_13551;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12319);}while(r); S_13553:; fornext_value1951=*_SUB_WIKIPARSE_LONG_I; fornext_finalvalue1951=_SUB_WIKIPARSE_STRING_A->len- 1 ; fornext_step1951= 1 ; if (fornext_step1951<0) fornext_step_negative1951=1; else fornext_step_negative1951=0; if (new_error) goto fornext_error1951; goto fornext_entrylabel1951; while(1){ fornext_value1951=fornext_step1951+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel1951: *_SUB_WIKIPARSE_LONG_II=fornext_value1951; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1951){ if (fornext_value1951fornext_finalvalue1951) break; } fornext_error1951:; if(qbevent){evnt(12320);if(r)goto S_13553;} S_13554:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II, 2 ,1),qbs_new_txt_len("|}",2))))||new_error){ if(qbevent){evnt(12321);if(r)goto S_13554;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II+ 1 ; if(!qbevent)break;evnt(12321);}while(r); do{ goto fornext_exit_1950; if(!qbevent)break;evnt(12321);}while(r); } } fornext_exit_1950:; do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12323);}while(r); } S_13561:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),(qbs_add(qbs_add(func_chr( 226 ),func_chr( 128 )),func_chr( 166 ))))))||new_error){ if(qbevent){evnt(12326);if(r)goto S_13561;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(12327);}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("...",3),_SUB_WIKIPARSE_LONG_COL,&(pass1953= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12328);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12329);}while(r); } S_13566:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_C,func_chr( 226 ))))||new_error){ if(qbevent){evnt(12332);if(r)goto S_13566;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(12333);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12334);}while(r); } S_13570:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len(":",1)))&(-(*_SUB_WIKIPARSE_LONG_NL== 1 ))))||new_error){ if(qbevent){evnt(12337);if(r)goto S_13570;} do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" ",4),_SUB_WIKIPARSE_LONG_COL,&(pass1954= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12338);}while(r); do{ *__LONG_HELP_NEWLINEINDENT=*__LONG_HELP_NEWLINEINDENT+ 4 ; if(!qbevent)break;evnt(12339);}while(r); do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12340);}while(r); do{ goto LABEL_SPECIAL2; if(!qbevent)break;evnt(12340);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_add(qbs_new_txt_len("__NOTOC__",9),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12343);}while(r); S_13577:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12344);if(r)goto S_13577;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12345);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12346);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("__NOTOC__",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12348);}while(r); S_13582:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12349);if(r)goto S_13582;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12350);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12351);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("<div",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12354);}while(r); S_13587:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check((_SUB_WIKIPARSE_STRING_S->len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(12355);if(r)goto S_13587;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_S->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12356);}while(r); S_13589:; fornext_value1962=*_SUB_WIKIPARSE_LONG_I; fornext_finalvalue1962=_SUB_WIKIPARSE_STRING_A->len- 1 ; fornext_step1962= 1 ; if (fornext_step1962<0) fornext_step_negative1962=1; else fornext_step_negative1962=0; if (new_error) goto fornext_error1962; goto fornext_entrylabel1962; while(1){ fornext_value1962=fornext_step1962+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel1962: *_SUB_WIKIPARSE_LONG_II=fornext_value1962; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1962){ if (fornext_value1962fornext_finalvalue1962) break; } fornext_error1962:; if(qbevent){evnt(12357);if(r)goto S_13589;} S_13590:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II, 12 ,1),qbs_new_txt_len("</div>",12))))||new_error){ if(qbevent){evnt(12358);if(r)goto S_13590;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II+ 11 ; if(!qbevent)break;evnt(12358);}while(r); do{ goto fornext_exit_1961; if(!qbevent)break;evnt(12358);}while(r); } } fornext_exit_1961:; do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12360);}while(r); } S_13597:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 4 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),qbs_new_txt_len("----",4))))||new_error){ if(qbevent){evnt(12364);if(r)goto S_13597;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 3 ; if(!qbevent)break;evnt(12365);}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304\304",100),&(pass1964= 8 ),&(pass1965= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12366);}while(r); do{ goto LABEL_SPECIAL; if(!qbevent)break;evnt(12367);}while(r); } S_13602:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_C,func_chr( 10 ))))||new_error){ if(qbevent){evnt(12372);if(r)goto S_13602;} do{ *__LONG_HELP_NEWLINEINDENT= 0 ; if(!qbevent)break;evnt(12373);}while(r); S_13604:; if ((-(*__LONG_HELP_TXT_LEN>= 8 ))||new_error){ if(qbevent){evnt(12375);if(r)goto S_13604;} S_13605:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN- 3 )== 13 ))&(-(qbs_asc(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN- 7 )== 13 ))))||new_error){ if(qbevent){evnt(12376);if(r)goto S_13605;} do{ goto LABEL_SKIPDOUBLEBLANKS; if(!qbevent)break;evnt(12376);}while(r); } } do{ SUB_HELP_ADDTXT(func_chr( 13 ),_SUB_WIKIPARSE_LONG_COL,&(pass1966= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12379);}while(r); LABEL_SKIPDOUBLEBLANKS:; if(qbevent){evnt(12381);r=0;} do{ *_SUB_WIKIPARSE_LONG_NL= 1 ; if(!qbevent)break;evnt(12382);}while(r); do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12383);}while(r); do{ goto LABEL_SPECIAL2; if(!qbevent)break;evnt(12383);}while(r); } do{ SUB_HELP_ADDTXT(func_chr(*_SUB_WIKIPARSE_LONG_C),_SUB_WIKIPARSE_LONG_COL,&(pass1967= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12386);}while(r); LABEL_SPECIAL:; if(qbevent){evnt(12388);r=0;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(12389);}while(r); do{ *_SUB_WIKIPARSE_LONG_NL= 0 ; if(!qbevent)break;evnt(12390);}while(r); LABEL_SPECIAL2:; if(qbevent){evnt(12391);r=0;} } dl_exit_1899:; do{ qbs_set(__STRING_HELP_TXT,qbs_add(qbs_left(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN),func_chr( 13 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12395);}while(r); S_13619:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_HELP_PAGELOADED,qbs_new_txt_len("Keyword Reference - Alphabetical",32))))||new_error){ if(qbevent){evnt(12410);if(r)goto S_13619;} do{ *_SUB_WIKIPARSE_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12412);}while(r); do{ sub_open(qbs_new_txt_len("internal\\help\\links.bin",23), 4 ,NULL,NULL,*_SUB_WIKIPARSE_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12413);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_A,func_space( 1000 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12414);}while(r); S_13623:; fornext_value1969= 1 ; fornext_finalvalue1969=*__LONG_HELP_H; fornext_step1969= 1 ; if (fornext_step1969<0) fornext_step_negative1969=1; else fornext_step_negative1969=0; if (new_error) goto fornext_error1969; goto fornext_entrylabel1969; while(1){ fornext_value1969=fornext_step1969+(*_SUB_WIKIPARSE_LONG_CY); fornext_entrylabel1969: *_SUB_WIKIPARSE_LONG_CY=fornext_value1969; if (fornext_step_negative1969){ if (fornext_value1969fornext_finalvalue1969) break; } fornext_error1969:; if(qbevent){evnt(12415);if(r)goto S_13623;} do{ *_SUB_WIKIPARSE_LONG_L=string2l(func_mid(__STRING_HELP_LINE,((*_SUB_WIKIPARSE_LONG_CY- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12417);}while(r); do{ *_SUB_WIKIPARSE_LONG_X=*_SUB_WIKIPARSE_LONG_L; if(!qbevent)break;evnt(12418);}while(r); do{ *_SUB_WIKIPARSE_LONG_X2= 1 ; if(!qbevent)break;evnt(12419);}while(r); do{ *_SUB_WIKIPARSE_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12420);}while(r); do{ *_SUB_WIKIPARSE_LONG_OLDLNK= 0 ; if(!qbevent)break;evnt(12421);}while(r); do{ *_SUB_WIKIPARSE_LONG_LNKX1= 0 ; if(!qbevent)break;evnt(12422);}while(r); do{ *_SUB_WIKIPARSE_LONG_LNKX2= 0 ; if(!qbevent)break;evnt(12422);}while(r); S_13631:; while((!(-(*_SUB_WIKIPARSE_LONG_C== 13 )))||new_error){ if(qbevent){evnt(12423);if(r)goto S_13631;} do{ tqbs=_SUB_WIKIPARSE_STRING_A; if (!new_error){ tmp_fileno=*_SUB_WIKIPARSE_LONG_X2; if (!new_error){ tmp_long=*_SUB_WIKIPARSE_LONG_C; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(12424);}while(r); do{ *_SUB_WIKIPARSE_LONG_LNK=string2i(func_mid(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_X+ 2 , 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12425);}while(r); S_13634:; if (((-(*_SUB_WIKIPARSE_LONG_OLDLNK== 0 ))&(-(*_SUB_WIKIPARSE_LONG_LNK!= 0 )))||new_error){ if(qbevent){evnt(12426);if(r)goto S_13634;} do{ *_SUB_WIKIPARSE_LONG_LNKX1=*_SUB_WIKIPARSE_LONG_X2; if(!qbevent)break;evnt(12426);}while(r); } S_13637:; if ((qbs_cleanup(qbs_tmp_base,(((-(*_SUB_WIKIPARSE_LONG_LNK== 0 ))|(-(qbs_asc(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_X+ 4 )== 13 ))))&(-(*_SUB_WIKIPARSE_LONG_LNKX1!= 0 ))))||new_error){ if(qbevent){evnt(12427);if(r)goto S_13637;} do{ *_SUB_WIKIPARSE_LONG_LNKX2=*_SUB_WIKIPARSE_LONG_X2; if(!qbevent)break;evnt(12428);}while(r); S_13639:; if ((-(*_SUB_WIKIPARSE_LONG_LNK== 0 ))||new_error){ if(qbevent){evnt(12428);if(r)goto S_13639;} do{ *_SUB_WIKIPARSE_LONG_LNKX2=*_SUB_WIKIPARSE_LONG_LNKX2- 1 ; if(!qbevent)break;evnt(12428);}while(r); } S_13642:; if ((-(*_SUB_WIKIPARSE_LONG_LNKX1!= 3 ))||new_error){ if(qbevent){evnt(12430);if(r)goto S_13642;} do{ goto LABEL_IGNORELINK; if(!qbevent)break;evnt(12430);}while(r); } S_13645:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_WIKIPARSE_STRING_A, 1 )!= 254 )))||new_error){ if(qbevent){evnt(12431);if(r)goto S_13645;} do{ goto LABEL_IGNORELINK; if(!qbevent)break;evnt(12431);}while(r); } do{ *_SUB_WIKIPARSE_LONG_LNK2=*_SUB_WIKIPARSE_LONG_LNK; if(!qbevent)break;evnt(12434);}while(r); S_13649:; if ((-(*_SUB_WIKIPARSE_LONG_LNK2== 0 ))||new_error){ if(qbevent){evnt(12434);if(r)goto S_13649;} do{ *_SUB_WIKIPARSE_LONG_LNK2=*_SUB_WIKIPARSE_LONG_OLDLNK; if(!qbevent)break;evnt(12434);}while(r); } do{ *_SUB_WIKIPARSE_LONG_L1= 1 ; if(!qbevent)break;evnt(12435);}while(r); S_13653:; fornext_value1972= 1 ; fornext_finalvalue1972=*_SUB_WIKIPARSE_LONG_LNK2- 1 ; fornext_step1972= 1 ; if (fornext_step1972<0) fornext_step_negative1972=1; else fornext_step_negative1972=0; if (new_error) goto fornext_error1972; goto fornext_entrylabel1972; while(1){ fornext_value1972=fornext_step1972+(*_SUB_WIKIPARSE_LONG_LX); fornext_entrylabel1972: *_SUB_WIKIPARSE_LONG_LX=fornext_value1972; if (fornext_step_negative1972){ if (fornext_value1972fornext_finalvalue1972) break; } fornext_error1972:; if(qbevent){evnt(12436);if(r)goto S_13653;} do{ *_SUB_WIKIPARSE_LONG_L1=func_instr(*_SUB_WIKIPARSE_LONG_L1,__STRING_HELP_LINK,__STRING_HELP_LINK_SEP,1)+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12437);}while(r); } fornext_exit_1971:; do{ *_SUB_WIKIPARSE_LONG_L2=func_instr(*_SUB_WIKIPARSE_LONG_L1,__STRING_HELP_LINK,__STRING_HELP_LINK_SEP,1)- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12439);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_L,func_mid(__STRING_HELP_LINK,*_SUB_WIKIPARSE_LONG_L1,*_SUB_WIKIPARSE_LONG_L2-*_SUB_WIKIPARSE_LONG_L1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12440);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_L,qbs_right(_SUB_WIKIPARSE_STRING_L,_SUB_WIKIPARSE_STRING_L->len- 5 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12442);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_LNKX1,*_SUB_WIKIPARSE_LONG_LNKX2-*_SUB_WIKIPARSE_LONG_LNKX1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12444);}while(r); S_13660:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("(",1),0)))||new_error){ if(qbevent){evnt(12446);if(r)goto S_13660;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,qbs_left(_SUB_WIKIPARSE_STRING_A2,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("(",1),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12446);}while(r); } S_13663:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(12447);if(r)goto S_13663;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,qbs_left(_SUB_WIKIPARSE_STRING_A2,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(" ",1),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12447);}while(r); } S_13666:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)))||new_error){ if(qbevent){evnt(12448);if(r)goto S_13666;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A3,qbs_right(_SUB_WIKIPARSE_STRING_A2,_SUB_WIKIPARSE_STRING_A2->len-func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12449);}while(r); do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(12451);}while(r); S_13669:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_ucase(qbs_left(_SUB_WIKIPARSE_STRING_A3, 3 )),qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(12453);if(r)goto S_13669;} S_13670:; fornext_value1976= 1 ; fornext_finalvalue1976=_SUB_WIKIPARSE_STRING_A3->len; fornext_step1976= 1 ; if (fornext_step1976<0) fornext_step_negative1976=1; else fornext_step_negative1976=0; if (new_error) goto fornext_error1976; goto fornext_entrylabel1976; while(1){ fornext_value1976=fornext_step1976+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel1976: *_SUB_WIKIPARSE_LONG_CI=fornext_value1976; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1976){ if (fornext_value1976fornext_finalvalue1976) break; } fornext_error1976:; if(qbevent){evnt(12454);if(r)goto S_13670;} do{ *_SUB_WIKIPARSE_LONG_CA=qbs_asc(_SUB_WIKIPARSE_STRING_A3,*_SUB_WIKIPARSE_LONG_CI); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12455);}while(r); S_13672:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(12456);if(r)goto S_13672;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12456);}while(r); } S_13675:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(12457);if(r)goto S_13675;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12457);}while(r); } } fornext_exit_1975:; } S_13680:; if ((-(*_SUB_WIKIPARSE_LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(12461);if(r)goto S_13680;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip1978; sub_file_print(tmp_fileno,qbs_add(qbs_add(_SUB_WIKIPARSE_STRING_A3,qbs_new_txt_len(",",1)),_SUB_WIKIPARSE_STRING_L), 0 , 0 , 1 ); if (new_error) goto skip1978; skip1978: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12461);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,qbs_left(_SUB_WIKIPARSE_STRING_A2,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12463);}while(r); } do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(12467);}while(r); S_13686:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_ucase(qbs_left(_SUB_WIKIPARSE_STRING_A2, 3 )),qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(12468);if(r)goto S_13686;} S_13687:; fornext_value1980= 1 ; fornext_finalvalue1980=_SUB_WIKIPARSE_STRING_A2->len; fornext_step1980= 1 ; if (fornext_step1980<0) fornext_step_negative1980=1; else fornext_step_negative1980=0; if (new_error) goto fornext_error1980; goto fornext_entrylabel1980; while(1){ fornext_value1980=fornext_step1980+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel1980: *_SUB_WIKIPARSE_LONG_CI=fornext_value1980; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1980){ if (fornext_value1980fornext_finalvalue1980) break; } fornext_error1980:; if(qbevent){evnt(12469);if(r)goto S_13687;} do{ *_SUB_WIKIPARSE_LONG_CA=qbs_asc(_SUB_WIKIPARSE_STRING_A2,*_SUB_WIKIPARSE_LONG_CI); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12470);}while(r); S_13689:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(12471);if(r)goto S_13689;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12471);}while(r); } S_13692:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(12472);if(r)goto S_13692;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12472);}while(r); } } fornext_exit_1979:; } S_13697:; if ((-(*_SUB_WIKIPARSE_LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(12475);if(r)goto S_13697;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip1982; sub_file_print(tmp_fileno,qbs_add(qbs_add(_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(",",1)),_SUB_WIKIPARSE_STRING_L), 0 , 0 , 1 ); if (new_error) goto skip1982; skip1982: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12475);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_OA2,_SUB_WIKIPARSE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12476);}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,_SUB_WIKIPARSE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12478);}while(r); S_13702:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("(",1),0)))||new_error){ if(qbevent){evnt(12479);if(r)goto S_13702;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,qbs_left(_SUB_WIKIPARSE_STRING_A2,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("(",1),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12479);}while(r); } S_13705:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(12480);if(r)goto S_13705;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,qbs_left(_SUB_WIKIPARSE_STRING_A2,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(" ",1),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12480);}while(r); } S_13708:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)))||new_error){ if(qbevent){evnt(12481);if(r)goto S_13708;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A3,qbs_right(_SUB_WIKIPARSE_STRING_A2,_SUB_WIKIPARSE_STRING_A2->len-func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12482);}while(r); do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(12484);}while(r); S_13711:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_ucase(qbs_left(_SUB_WIKIPARSE_STRING_A3, 3 )),qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(12485);if(r)goto S_13711;} S_13712:; fornext_value1985= 1 ; fornext_finalvalue1985=_SUB_WIKIPARSE_STRING_A3->len; fornext_step1985= 1 ; if (fornext_step1985<0) fornext_step_negative1985=1; else fornext_step_negative1985=0; if (new_error) goto fornext_error1985; goto fornext_entrylabel1985; while(1){ fornext_value1985=fornext_step1985+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel1985: *_SUB_WIKIPARSE_LONG_CI=fornext_value1985; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1985){ if (fornext_value1985fornext_finalvalue1985) break; } fornext_error1985:; if(qbevent){evnt(12486);if(r)goto S_13712;} do{ *_SUB_WIKIPARSE_LONG_CA=qbs_asc(_SUB_WIKIPARSE_STRING_A3,*_SUB_WIKIPARSE_LONG_CI); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12487);}while(r); S_13714:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(12488);if(r)goto S_13714;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12488);}while(r); } S_13717:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(12489);if(r)goto S_13717;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12489);}while(r); } } fornext_exit_1984:; } S_13722:; if ((-(*_SUB_WIKIPARSE_LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(12492);if(r)goto S_13722;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip1987; sub_file_print(tmp_fileno,qbs_add(qbs_add(_SUB_WIKIPARSE_STRING_A3,qbs_new_txt_len(",",1)),_SUB_WIKIPARSE_STRING_L), 0 , 0 , 1 ); if (new_error) goto skip1987; skip1987: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12492);}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,qbs_left(_SUB_WIKIPARSE_STRING_A2,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12494);}while(r); } do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(12497);}while(r); S_13728:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_ucase(qbs_left(_SUB_WIKIPARSE_STRING_A2, 3 )),qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(12498);if(r)goto S_13728;} S_13729:; fornext_value1989= 1 ; fornext_finalvalue1989=_SUB_WIKIPARSE_STRING_A2->len; fornext_step1989= 1 ; if (fornext_step1989<0) fornext_step_negative1989=1; else fornext_step_negative1989=0; if (new_error) goto fornext_error1989; goto fornext_entrylabel1989; while(1){ fornext_value1989=fornext_step1989+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel1989: *_SUB_WIKIPARSE_LONG_CI=fornext_value1989; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1989){ if (fornext_value1989fornext_finalvalue1989) break; } fornext_error1989:; if(qbevent){evnt(12499);if(r)goto S_13729;} do{ *_SUB_WIKIPARSE_LONG_CA=qbs_asc(_SUB_WIKIPARSE_STRING_A2,*_SUB_WIKIPARSE_LONG_CI); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12500);}while(r); S_13731:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(12501);if(r)goto S_13731;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12501);}while(r); } S_13734:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(12502);if(r)goto S_13734;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(12502);}while(r); } } fornext_exit_1988:; } S_13739:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_WIKIPARSE_LONG_SKIP== 0 ))&(qbs_notequal(_SUB_WIKIPARSE_STRING_A2,_SUB_WIKIPARSE_STRING_OA2))))||new_error){ if(qbevent){evnt(12505);if(r)goto S_13739;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip1991; sub_file_print(tmp_fileno,qbs_add(qbs_add(_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(",",1)),_SUB_WIKIPARSE_STRING_L), 0 , 0 , 1 ); if (new_error) goto skip1991; skip1991: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12505);}while(r); } LABEL_IGNORELINK:; if(qbevent){evnt(12507);r=0;} do{ *_SUB_WIKIPARSE_LONG_LNKX1= 0 ; if(!qbevent)break;evnt(12509);}while(r); do{ *_SUB_WIKIPARSE_LONG_LNKX2= 0 ; if(!qbevent)break;evnt(12509);}while(r); } do{ *_SUB_WIKIPARSE_LONG_X=*_SUB_WIKIPARSE_LONG_X+ 4 ; if(!qbevent)break;evnt(12511);}while(r); do{ *_SUB_WIKIPARSE_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12511);}while(r); do{ *_SUB_WIKIPARSE_LONG_X2=*_SUB_WIKIPARSE_LONG_X2+ 1 ; if(!qbevent)break;evnt(12512);}while(r); do{ *_SUB_WIKIPARSE_LONG_OLDLNK=*_SUB_WIKIPARSE_LONG_LNK; if(!qbevent)break;evnt(12513);}while(r); } dl_exit_1970:; } fornext_exit_1968:; do{ sub_close(*_SUB_WIKIPARSE_LONG_FH,1); if(!qbevent)break;evnt(12516);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free12.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDESEARCHEDBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data13.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(12530);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(12531);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(12532);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(12533);}while(r); do{ if(!qbevent)break;evnt(12534);}while(r); do{ if (_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4]+1; _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0]),0,_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(12535);}while(r); do{ if(!qbevent)break;evnt(12536);}while(r); do{ if(!qbevent)break;evnt(12537);}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12538);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_LN= 0 ; if(!qbevent)break;evnt(12548);}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12549);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12550);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\searched.bin",28), 2 ,NULL,NULL,*_FUNC_IDESEARCHEDBOX_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12551);}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_A,func_space(func_lof(*_FUNC_IDESEARCHEDBOX_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12551);}while(r); do{ sub_get2(*_FUNC_IDESEARCHEDBOX_LONG_FH,NULL,_FUNC_IDESEARCHEDBOX_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12551);}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_A,qbs_right(_FUNC_IDESEARCHEDBOX_STRING_A,_FUNC_IDESEARCHEDBOX_STRING_A->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12552);}while(r); S_13769:; while((qbs_cleanup(qbs_tmp_base,_FUNC_IDESEARCHEDBOX_STRING_A->len))||new_error){ if(qbevent){evnt(12553);if(r)goto S_13769;} do{ *_FUNC_IDESEARCHEDBOX_LONG_AI=func_instr(NULL,_FUNC_IDESEARCHEDBOX_STRING_A,__STRING_CRLF,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12554);}while(r); S_13771:; if ((*_FUNC_IDESEARCHEDBOX_LONG_AI)||new_error){ if(qbevent){evnt(12555);if(r)goto S_13771;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_F,qbs_left(_FUNC_IDESEARCHEDBOX_STRING_A,*_FUNC_IDESEARCHEDBOX_LONG_AI- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12556);}while(r); S_13773:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDESEARCHEDBOX_LONG_AI==(_FUNC_IDESEARCHEDBOX_STRING_A->len- 1 ))))||new_error){ if(qbevent){evnt(12556);if(r)goto S_13773;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12556);}while(r); }else{ do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_A,qbs_right(_FUNC_IDESEARCHEDBOX_STRING_A,_FUNC_IDESEARCHEDBOX_STRING_A->len-*_FUNC_IDESEARCHEDBOX_LONG_AI- 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12556);}while(r); } S_13778:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDESEARCHEDBOX_STRING_L->len))||new_error){ if(qbevent){evnt(12557);if(r)goto S_13778;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDESEARCHEDBOX_STRING_L,_FUNC_IDESEARCHEDBOX_STRING1_SEP),_FUNC_IDESEARCHEDBOX_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12557);}while(r); }else{ do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_L,_FUNC_IDESEARCHEDBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12557);}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_LN=*_FUNC_IDESEARCHEDBOX_LONG_LN+ 1 ; if(!qbevent)break;evnt(12558);}while(r); } } dl_exit_1994:; do{ sub_close(*_FUNC_IDESEARCHEDBOX_LONG_FH,1); if(!qbevent)break;evnt(12561);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_H=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(12565);}while(r); S_13788:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_LN<*_FUNC_IDESEARCHEDBOX_LONG_H))||new_error){ if(qbevent){evnt(12566);if(r)goto S_13788;} do{ *_FUNC_IDESEARCHEDBOX_LONG_H=*_FUNC_IDESEARCHEDBOX_LONG_LN; if(!qbevent)break;evnt(12566);}while(r); } S_13791:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_H< 3 ))||new_error){ if(qbevent){evnt(12567);if(r)goto S_13791;} do{ *_FUNC_IDESEARCHEDBOX_LONG_H= 3 ; if(!qbevent)break;evnt(12567);}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_I= 0 ; if(!qbevent)break;evnt(12569);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDESEARCHEDBOX_UDT_P)) + (0) ),&(pass1998= 20 ),_FUNC_IDESEARCHEDBOX_LONG_H,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12570);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0))=*__LONG_IDEWX- 24 ; if(!qbevent)break;evnt(12571);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))= 3 ; if(!qbevent)break;evnt(12572);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_I=*_FUNC_IDESEARCHEDBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(12574);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(12575);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+20))= -1 ; if(!qbevent)break;evnt(12576);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+24))= 0 ; if(!qbevent)break;evnt(12576);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+28))= 22 ; if(!qbevent)break;evnt(12578);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+32))=*_FUNC_IDESEARCHEDBOX_LONG_H; if(!qbevent)break;evnt(12578);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDESEARCHEDBOX_STRING_L); if(!qbevent)break;evnt(12579);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(12580);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Find",4)); if(!qbevent)break;evnt(12581);}while(r); S_13807:; fornext_value2000= 1 ; fornext_finalvalue2000= 100 ; fornext_step2000= 1 ; if (fornext_step2000<0) fornext_step_negative2000=1; else fornext_step_negative2000=0; if (new_error) goto fornext_error2000; goto fornext_entrylabel2000; while(1){ fornext_value2000=fornext_step2000+(*_FUNC_IDESEARCHEDBOX_LONG_I); fornext_entrylabel2000: *_FUNC_IDESEARCHEDBOX_LONG_I=fornext_value2000; if (fornext_step_negative2000){ if (fornext_value2000fornext_finalvalue2000) break; } fornext_error2000:; if(qbevent){evnt(12592);if(r)goto S_13807;} do{ memcpy((((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(12592);}while(r); } fornext_exit_1999:; S_13810:; do{ if(qbevent){evnt(12595);if(r)goto S_13810;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDESEARCHEDBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(12598);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_F= 1 ; if(!qbevent)break;evnt(12599);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(12599);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(12599);}while(r); S_13815:; fornext_value2003= 1 ; fornext_finalvalue2003= 100 ; fornext_step2003= 1 ; if (fornext_step2003<0) fornext_step_negative2003=1; else fornext_step_negative2003=0; if (new_error) goto fornext_error2003; goto fornext_entrylabel2003; while(1){ fornext_value2003=fornext_step2003+(*_FUNC_IDESEARCHEDBOX_LONG_I); fornext_entrylabel2003: *_FUNC_IDESEARCHEDBOX_LONG_I=fornext_value2003; if (fornext_step_negative2003){ if (fornext_value2003fornext_finalvalue2003) break; } fornext_error2003:; if(qbevent){evnt(12600);if(r)goto S_13815;} S_13816:; if ((*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(12601);if(r)goto S_13816;} do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS-*_FUNC_IDESEARCHEDBOX_LONG_F; if(!qbevent)break;evnt(12604);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(12605);}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(12605);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESEARCHEDBOX_LONG_F); if(!qbevent)break;evnt(12606);}while(r); S_13821:; if ((*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(12607);if(r)goto S_13821;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(12607);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(12607);}while(r); } } } fornext_exit_2002:; do{ *_FUNC_IDESEARCHEDBOX_LONG_LASTFOCUS=*_FUNC_IDESEARCHEDBOX_LONG_F- 1 ; if(!qbevent)break;evnt(12610);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(12617);}while(r); S_13829:; if ((*_FUNC_IDESEARCHEDBOX_LONG_CX)||new_error){ if(qbevent){evnt(12618);if(r)goto S_13829;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(12618);}while(r); do{ qbg_sub_locate(*_FUNC_IDESEARCHEDBOX_LONG_CY,*_FUNC_IDESEARCHEDBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(12618);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(12618);}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(12621);}while(r); S_13835:; do{ if(qbevent){evnt(12622);if(r)goto S_13835;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(12623);}while(r); S_13837:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(12624);if(r)goto S_13837;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12624);}while(r); } S_13840:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(12625);if(r)goto S_13840;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12625);}while(r); } S_13843:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(12626);if(r)goto S_13843;} do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(12626);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12626);}while(r); } S_13847:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(12627);if(r)goto S_13847;} do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(12627);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12627);}while(r); } S_13851:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(12628);if(r)goto S_13851;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12628);}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(12629);}while(r); S_13855:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_ALT!=*_FUNC_IDESEARCHEDBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(12629);if(r)goto S_13855;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12629);}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_OLDALT=*_FUNC_IDESEARCHEDBOX_LONG_ALT; if(!qbevent)break;evnt(12630);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(12631);}while(r); S_13860:; }while((!(*_FUNC_IDESEARCHEDBOX_LONG_CHANGE))&&(!new_error)); dl_exit_2004:; if(qbevent){evnt(12632);if(r)goto S_13860;} S_13861:; if ((*_FUNC_IDESEARCHEDBOX_LONG_ALT)||new_error){ if(qbevent){evnt(12633);if(r)goto S_13861;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(12633);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(12633);}while(r); } do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12635);}while(r); S_13867:; if ((*_FUNC_IDESEARCHEDBOX_LONG_ALT)||new_error){ if(qbevent){evnt(12636);if(r)goto S_13867;} S_13868:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(12637);if(r)goto S_13868;} do{ *_FUNC_IDESEARCHEDBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12638);}while(r); S_13870:; if (((-(*_FUNC_IDESEARCHEDBOX_LONG_K>= 65 ))&(-(*_FUNC_IDESEARCHEDBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(12639);if(r)goto S_13870;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDESEARCHEDBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12639);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(12642);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(12642);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(12642);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(12646);}while(r); S_13879:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(12647);if(r)goto S_13879;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12647);}while(r); } S_13882:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(12648);if(r)goto S_13882;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(12648);}while(r); } S_13885:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(12649);if(r)goto S_13885;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(12649);}while(r); } S_13888:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(12650);if(r)goto S_13888;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS=*_FUNC_IDESEARCHEDBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(12650);}while(r); } S_13891:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_FOCUS>*_FUNC_IDESEARCHEDBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(12651);if(r)goto S_13891;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(12651);}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_F= 1 ; if(!qbevent)break;evnt(12652);}while(r); S_13895:; fornext_value2007= 1 ; fornext_finalvalue2007= 100 ; fornext_step2007= 1 ; if (fornext_step2007<0) fornext_step_negative2007=1; else fornext_step_negative2007=0; if (new_error) goto fornext_error2007; goto fornext_entrylabel2007; while(1){ fornext_value2007=fornext_step2007+(*_FUNC_IDESEARCHEDBOX_LONG_I); fornext_entrylabel2007: *_FUNC_IDESEARCHEDBOX_LONG_I=fornext_value2007; if (fornext_step_negative2007){ if (fornext_value2007fornext_finalvalue2007) break; } fornext_error2007:; if(qbevent){evnt(12653);if(r)goto S_13895;} do{ *_FUNC_IDESEARCHEDBOX_LONG_T=*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(12654);}while(r); S_13897:; if ((*_FUNC_IDESEARCHEDBOX_LONG_T)||new_error){ if(qbevent){evnt(12655);if(r)goto S_13897;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUSOFFSET=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS-*_FUNC_IDESEARCHEDBOX_LONG_F; if(!qbevent)break;evnt(12656);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESEARCHEDBOX_LONG_FOCUS,_FUNC_IDESEARCHEDBOX_LONG_F,_FUNC_IDESEARCHEDBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDESEARCHEDBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDESEARCHEDBOX_LONG_MOUSEDOWN,_FUNC_IDESEARCHEDBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDESEARCHEDBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12657);}while(r); } } fornext_exit_2006:; S_13902:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(12663);if(r)goto S_13902;} S_13903:; if (((-(*__LONG_MX<(*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0))- 1 )))|(-(*__LONG_MY<*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))))|(-(*__LONG_MX>(*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0))+*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(8))+ 2 )))|(-(*__LONG_MY>(*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))+*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(12))+ 1 ))))||new_error){ if(qbevent){evnt(12664);if(r)goto S_13903;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12665);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12666);}while(r); } } S_13908:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(12670);if(r)goto S_13908;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12671);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12672);}while(r); } S_13912:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(12675);if(r)goto S_13912;} S_13913:; if (((-(*__LONG_MX>(*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0))- 1 )))&(-(*__LONG_MY>*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))))&(-(*__LONG_MX<(*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0))+*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(8))+ 2 )))&(-(*__LONG_MY<(*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))+*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(12))+ 1 ))))||new_error){ if(qbevent){evnt(12676);if(r)goto S_13913;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_F,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12677);}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,_FUNC_IDESEARCHEDBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12678);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12679);}while(r); } } S_13919:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDESEARCHEDBOX_LONG_INFO== 1 ))&(-(*_FUNC_IDESEARCHEDBOX_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(12683);if(r)goto S_13919;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_F,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[4],_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12684);}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,_FUNC_IDESEARCHEDBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12685);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12686);}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(12690);}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(12691);}while(r); }while(1); dl_exit_2001:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free13.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX);return _FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX; } void SUB_IDEIMPORTBOOKMARKS(qbs*_SUB_IDEIMPORTBOOKMARKS_STRING_F2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data14.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(12700);}while(r); do{ qbs_set(_SUB_IDEIMPORTBOOKMARKS_STRING_F,qbs_add(qbs_add(__STRING_CRLF,_SUB_IDEIMPORTBOOKMARKS_STRING_F2),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12701);}while(r); do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12702);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\bookmarks.bin",29), 2 ,NULL,NULL,*_SUB_IDEIMPORTBOOKMARKS_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12702);}while(r); do{ qbs_set(_SUB_IDEIMPORTBOOKMARKS_STRING_A,func_space(func_lof(*_SUB_IDEIMPORTBOOKMARKS_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12702);}while(r); do{ sub_get2(*_SUB_IDEIMPORTBOOKMARKS_LONG_FH,NULL,_SUB_IDEIMPORTBOOKMARKS_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12702);}while(r); do{ sub_close(*_SUB_IDEIMPORTBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(12702);}while(r); do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_X=func_instr(NULL,qbs_ucase(_SUB_IDEIMPORTBOOKMARKS_STRING_A),qbs_ucase(_SUB_IDEIMPORTBOOKMARKS_STRING_F),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12703);}while(r); S_13935:; if ((*_SUB_IDEIMPORTBOOKMARKS_LONG_X)||new_error){ if(qbevent){evnt(12704);if(r)goto S_13935;} do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_L=string2l(func_mid(_SUB_IDEIMPORTBOOKMARKS_STRING_A,*_SUB_IDEIMPORTBOOKMARKS_LONG_X+_SUB_IDEIMPORTBOOKMARKS_STRING_F->len, 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12705);}while(r); do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_X1=*_SUB_IDEIMPORTBOOKMARKS_LONG_X+_SUB_IDEIMPORTBOOKMARKS_STRING_F->len+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12706);}while(r); do{ qbs_set(_SUB_IDEIMPORTBOOKMARKS_STRING_D,func_mid(_SUB_IDEIMPORTBOOKMARKS_STRING_A,*_SUB_IDEIMPORTBOOKMARKS_LONG_X1,*_SUB_IDEIMPORTBOOKMARKS_LONG_L,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12707);}while(r); do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_N=*_SUB_IDEIMPORTBOOKMARKS_LONG_L/ 16 ; if(!qbevent)break;evnt(12708);}while(r); S_13940:; fornext_value2012= 1 ; fornext_finalvalue2012=*_SUB_IDEIMPORTBOOKMARKS_LONG_N; fornext_step2012= 1 ; if (fornext_step2012<0) fornext_step_negative2012=1; else fornext_step_negative2012=0; if (new_error) goto fornext_error2012; goto fornext_entrylabel2012; while(1){ fornext_value2012=fornext_step2012+(*_SUB_IDEIMPORTBOOKMARKS_LONG_I); fornext_entrylabel2012: *_SUB_IDEIMPORTBOOKMARKS_LONG_I=fornext_value2012; if (fornext_step_negative2012){ if (fornext_value2012fornext_finalvalue2012) break; } fornext_error2012:; if(qbevent){evnt(12709);if(r)goto S_13940;} do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_BY=string2l(func_mid(_SUB_IDEIMPORTBOOKMARKS_STRING_D,((*_SUB_IDEIMPORTBOOKMARKS_LONG_I- 1 )* 16 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12710);}while(r); do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_BX=string2l(func_mid(_SUB_IDEIMPORTBOOKMARKS_STRING_D,((*_SUB_IDEIMPORTBOOKMARKS_LONG_I- 1 )* 16 )+( 1 )+( 4 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12711);}while(r); S_13943:; if ((-(*_SUB_IDEIMPORTBOOKMARKS_LONG_BY<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(12712);if(r)goto S_13943;} do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN+ 1 ; if(!qbevent)break;evnt(12713);}while(r); S_13945:; if ((-(*__LONG_IDEBMKN>func_ubound(__ARRAY_UDT_IDEBMK,1,1)))||new_error){ if(qbevent){evnt(12714);if(r)goto S_13945;} do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_X=func_ubound(__ARRAY_UDT_IDEBMK,1,1)* 2 ; if(!qbevent)break;evnt(12714);}while(r); do{ if (__ARRAY_UDT_IDEBMK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDEBMK)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_IDEBMK[2]&1){ preserved_elements=__ARRAY_UDT_IDEBMK[5]; } else preserved_elements=0; __ARRAY_UDT_IDEBMK[4]= 0 ; __ARRAY_UDT_IDEBMK[5]=(*_SUB_IDEIMPORTBOOKMARKS_LONG_X)-__ARRAY_UDT_IDEBMK[4]+1; __ARRAY_UDT_IDEBMK[6]=1; if (__ARRAY_UDT_IDEBMK[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_IDEBMK[0]),preserved_elements*128/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDEBMK[0])); tmp_long=__ARRAY_UDT_IDEBMK[5]; __ARRAY_UDT_IDEBMK[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*128/8+1); memcpy((void*)(__ARRAY_UDT_IDEBMK[0]),redim_preserve_cmem_buffer,preserved_elements*128/8+1); if (preserved_elements=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDESAVEBOOKMARKS(qbs*_SUB_IDESAVEBOOKMARKS_STRING_F2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data15.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_IDESAVEBOOKMARKS_STRING_F,qbs_add(qbs_add(__STRING_CRLF,_SUB_IDESAVEBOOKMARKS_STRING_F2),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12724);}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12725);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\bookmarks.bin",29), 2 ,NULL,NULL,*_SUB_IDESAVEBOOKMARKS_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12725);}while(r); do{ qbs_set(_SUB_IDESAVEBOOKMARKS_STRING_A,func_space(func_lof(*_SUB_IDESAVEBOOKMARKS_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12725);}while(r); do{ sub_get2(*_SUB_IDESAVEBOOKMARKS_LONG_FH,NULL,_SUB_IDESAVEBOOKMARKS_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12725);}while(r); do{ sub_close(*_SUB_IDESAVEBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(12725);}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_X=func_instr(NULL,qbs_ucase(_SUB_IDESAVEBOOKMARKS_STRING_A),qbs_ucase(_SUB_IDESAVEBOOKMARKS_STRING_F),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12726);}while(r); S_13963:; if ((*_SUB_IDESAVEBOOKMARKS_LONG_X)||new_error){ if(qbevent){evnt(12727);if(r)goto S_13963;} do{ *_SUB_IDESAVEBOOKMARKS_LONG_L=string2l(func_mid(_SUB_IDESAVEBOOKMARKS_STRING_A,*_SUB_IDESAVEBOOKMARKS_LONG_X+_SUB_IDESAVEBOOKMARKS_STRING_F->len, 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12728);}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_X2=*_SUB_IDESAVEBOOKMARKS_LONG_X+_SUB_IDESAVEBOOKMARKS_STRING_F->len+ 4 +*_SUB_IDESAVEBOOKMARKS_LONG_L- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12729);}while(r); do{ qbs_set(_SUB_IDESAVEBOOKMARKS_STRING_A,qbs_add(qbs_left(_SUB_IDESAVEBOOKMARKS_STRING_A,*_SUB_IDESAVEBOOKMARKS_LONG_X- 1 ),qbs_right(_SUB_IDESAVEBOOKMARKS_STRING_A,_SUB_IDESAVEBOOKMARKS_STRING_A->len-*_SUB_IDESAVEBOOKMARKS_LONG_X2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12730);}while(r); } do{ qbs_set(_SUB_IDESAVEBOOKMARKS_STRING_D,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12734);}while(r); S_13969:; fornext_value2018= 1 ; fornext_finalvalue2018=*__LONG_IDEBMKN; fornext_step2018= 1 ; if (fornext_step2018<0) fornext_step_negative2018=1; else fornext_step_negative2018=0; if (new_error) goto fornext_error2018; goto fornext_entrylabel2018; while(1){ fornext_value2018=fornext_step2018+(*_SUB_IDESAVEBOOKMARKS_LONG_I); fornext_entrylabel2018: *_SUB_IDESAVEBOOKMARKS_LONG_I=fornext_value2018; if (fornext_step_negative2018){ if (fornext_value2018fornext_finalvalue2018) break; } fornext_error2018:; if(qbevent){evnt(12735);if(r)goto S_13969;} do{ qbs_set(_SUB_IDESAVEBOOKMARKS_STRING_D,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_IDESAVEBOOKMARKS_STRING_D,l2string(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDESAVEBOOKMARKS_LONG_I)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)))),l2string(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDESAVEBOOKMARKS_LONG_I)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+4)))),l2string(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDESAVEBOOKMARKS_LONG_I)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+8)))),l2string(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDESAVEBOOKMARKS_LONG_I)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+12))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12736);}while(r); } fornext_exit_2017:; do{ qbs_set(_SUB_IDESAVEBOOKMARKS_STRING_A,qbs_add(qbs_add(qbs_add(_SUB_IDESAVEBOOKMARKS_STRING_F,l2string(_SUB_IDESAVEBOOKMARKS_STRING_D->len)),_SUB_IDESAVEBOOKMARKS_STRING_D),_SUB_IDESAVEBOOKMARKS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12738);}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12739);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\bookmarks.bin",29), 4 ,NULL,NULL,*_SUB_IDESAVEBOOKMARKS_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12739);}while(r); do{ sub_close(*_SUB_IDESAVEBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(12739);}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12740);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\bookmarks.bin",29), 2 ,NULL,NULL,*_SUB_IDESAVEBOOKMARKS_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12740);}while(r); do{ sub_put2(*_SUB_IDESAVEBOOKMARKS_LONG_FH,NULL,byte_element((uint64)_SUB_IDESAVEBOOKMARKS_STRING_A->chr,_SUB_IDESAVEBOOKMARKS_STRING_A->len,byte_element_2020),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12740);}while(r); do{ sub_close(*_SUB_IDESAVEBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(12740);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free15.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDERECENTBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data16.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(12746);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(12747);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(12748);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(12749);}while(r); do{ if(!qbevent)break;evnt(12750);}while(r); do{ if (_FUNC_IDERECENTBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDERECENTBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDERECENTBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDERECENTBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4]+1; _FUNC_IDERECENTBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDERECENTBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDERECENTBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDERECENTBOX_ARRAY_UDT_O[0]),0,_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDERECENTBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDERECENTBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDERECENTBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(12751);}while(r); do{ if(!qbevent)break;evnt(12752);}while(r); do{ if(!qbevent)break;evnt(12753);}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12754);}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12764);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12765);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 2 ,NULL,NULL,*_FUNC_IDERECENTBOX_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12766);}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING_A,func_space(func_lof(*_FUNC_IDERECENTBOX_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12766);}while(r); do{ sub_get2(*_FUNC_IDERECENTBOX_LONG_FH,NULL,_FUNC_IDERECENTBOX_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12766);}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING_A,qbs_right(_FUNC_IDERECENTBOX_STRING_A,_FUNC_IDERECENTBOX_STRING_A->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12767);}while(r); S_13995:; while((qbs_cleanup(qbs_tmp_base,_FUNC_IDERECENTBOX_STRING_A->len))||new_error){ if(qbevent){evnt(12768);if(r)goto S_13995;} do{ *_FUNC_IDERECENTBOX_LONG_AI=func_instr(NULL,_FUNC_IDERECENTBOX_STRING_A,__STRING_CRLF,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12769);}while(r); S_13997:; if ((*_FUNC_IDERECENTBOX_LONG_AI)||new_error){ if(qbevent){evnt(12770);if(r)goto S_13997;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_F,qbs_left(_FUNC_IDERECENTBOX_STRING_A,*_FUNC_IDERECENTBOX_LONG_AI- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12771);}while(r); S_13999:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDERECENTBOX_LONG_AI==(_FUNC_IDERECENTBOX_STRING_A->len- 1 ))))||new_error){ if(qbevent){evnt(12771);if(r)goto S_13999;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12771);}while(r); }else{ do{ qbs_set(_FUNC_IDERECENTBOX_STRING_A,qbs_right(_FUNC_IDERECENTBOX_STRING_A,_FUNC_IDERECENTBOX_STRING_A->len-*_FUNC_IDERECENTBOX_LONG_AI- 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12771);}while(r); } S_14004:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDERECENTBOX_STRING_L->len))||new_error){ if(qbevent){evnt(12772);if(r)goto S_14004;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDERECENTBOX_STRING_L,_FUNC_IDERECENTBOX_STRING1_SEP),_FUNC_IDERECENTBOX_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12772);}while(r); }else{ do{ qbs_set(_FUNC_IDERECENTBOX_STRING_L,_FUNC_IDERECENTBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12772);}while(r); } } } dl_exit_2023:; do{ sub_close(*_FUNC_IDERECENTBOX_LONG_FH,1); if(!qbevent)break;evnt(12775);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_I= 0 ; if(!qbevent)break;evnt(12778);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDERECENTBOX_UDT_P)) + (0) ),&(pass2027=*__LONG_IDEWX- 8 ),&(pass2028=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ),qbs_new_txt_len("Open",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12779);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_I=*_FUNC_IDERECENTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(12781);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(12782);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+24))= 1 ; if(!qbevent)break;evnt(12783);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+28))=*__LONG_IDEWX- 12 ; if(!qbevent)break;evnt(12785);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 9 ; if(!qbevent)break;evnt(12785);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDERECENTBOX_STRING_L); if(!qbevent)break;evnt(12786);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(12787);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Recent Programs",15)); if(!qbevent)break;evnt(12788);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_I=*_FUNC_IDERECENTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(12790);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(12791);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(12792);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDERECENTBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(12793);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(12794);}while(r); S_14027:; fornext_value2030= 1 ; fornext_finalvalue2030= 100 ; fornext_step2030= 1 ; if (fornext_step2030<0) fornext_step_negative2030=1; else fornext_step_negative2030=0; if (new_error) goto fornext_error2030; goto fornext_entrylabel2030; while(1){ fornext_value2030=fornext_step2030+(*_FUNC_IDERECENTBOX_LONG_I); fornext_entrylabel2030: *_FUNC_IDERECENTBOX_LONG_I=fornext_value2030; if (fornext_step_negative2030){ if (fornext_value2030fornext_finalvalue2030) break; } fornext_error2030:; if(qbevent){evnt(12799);if(r)goto S_14027;} do{ memcpy((((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDERECENTBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(12799);}while(r); } fornext_exit_2029:; S_14030:; do{ if(qbevent){evnt(12802);if(r)goto S_14030;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDERECENTBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(12805);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(12806);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(12806);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(12806);}while(r); S_14035:; fornext_value2033= 1 ; fornext_finalvalue2033= 100 ; fornext_step2033= 1 ; if (fornext_step2033<0) fornext_step_negative2033=1; else fornext_step_negative2033=0; if (new_error) goto fornext_error2033; goto fornext_entrylabel2033; while(1){ fornext_value2033=fornext_step2033+(*_FUNC_IDERECENTBOX_LONG_I); fornext_entrylabel2033: *_FUNC_IDERECENTBOX_LONG_I=fornext_value2033; if (fornext_step_negative2033){ if (fornext_value2033fornext_finalvalue2033) break; } fornext_error2033:; if(qbevent){evnt(12807);if(r)goto S_14035;} S_14036:; if ((*(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(12808);if(r)goto S_14036;} do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDERECENTBOX_LONG_FOCUS-*_FUNC_IDERECENTBOX_LONG_F; if(!qbevent)break;evnt(12811);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(12812);}while(r); do{ *(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(12812);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDERECENTBOX_LONG_F); if(!qbevent)break;evnt(12813);}while(r); S_14041:; if ((*(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(12814);if(r)goto S_14041;} do{ *_FUNC_IDERECENTBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(12814);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(12814);}while(r); } } } fornext_exit_2032:; do{ *_FUNC_IDERECENTBOX_LONG_LASTFOCUS=*_FUNC_IDERECENTBOX_LONG_F- 1 ; if(!qbevent)break;evnt(12817);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(12824);}while(r); S_14049:; if ((*_FUNC_IDERECENTBOX_LONG_CX)||new_error){ if(qbevent){evnt(12825);if(r)goto S_14049;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(12825);}while(r); do{ qbg_sub_locate(*_FUNC_IDERECENTBOX_LONG_CY,*_FUNC_IDERECENTBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(12825);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(12825);}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(12828);}while(r); S_14055:; do{ if(qbevent){evnt(12829);if(r)goto S_14055;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(12830);}while(r); S_14057:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(12831);if(r)goto S_14057;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12831);}while(r); } S_14060:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(12832);if(r)goto S_14060;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12832);}while(r); } S_14063:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(12833);if(r)goto S_14063;} do{ *_FUNC_IDERECENTBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(12833);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12833);}while(r); } S_14067:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(12834);if(r)goto S_14067;} do{ *_FUNC_IDERECENTBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(12834);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12834);}while(r); } S_14071:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(12835);if(r)goto S_14071;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12835);}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(12836);}while(r); S_14075:; if ((-(*_FUNC_IDERECENTBOX_LONG_ALT!=*_FUNC_IDERECENTBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(12836);if(r)goto S_14075;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(12836);}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_OLDALT=*_FUNC_IDERECENTBOX_LONG_ALT; if(!qbevent)break;evnt(12837);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(12838);}while(r); S_14080:; }while((!(*_FUNC_IDERECENTBOX_LONG_CHANGE))&&(!new_error)); dl_exit_2034:; if(qbevent){evnt(12839);if(r)goto S_14080;} S_14081:; if ((*_FUNC_IDERECENTBOX_LONG_ALT)||new_error){ if(qbevent){evnt(12840);if(r)goto S_14081;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(12840);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(12840);}while(r); } do{ qbs_set(_FUNC_IDERECENTBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12842);}while(r); S_14087:; if ((*_FUNC_IDERECENTBOX_LONG_ALT)||new_error){ if(qbevent){evnt(12843);if(r)goto S_14087;} S_14088:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(12844);if(r)goto S_14088;} do{ *_FUNC_IDERECENTBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12845);}while(r); S_14090:; if (((-(*_FUNC_IDERECENTBOX_LONG_K>= 65 ))&(-(*_FUNC_IDERECENTBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(12846);if(r)goto S_14090;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDERECENTBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12846);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(12849);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(12849);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(12849);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(12853);}while(r); S_14099:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(12854);if(r)goto S_14099;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12854);}while(r); } S_14102:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(12855);if(r)goto S_14102;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS=*_FUNC_IDERECENTBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(12855);}while(r); } S_14105:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(12856);if(r)goto S_14105;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS=*_FUNC_IDERECENTBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(12856);}while(r); } S_14108:; if ((-(*_FUNC_IDERECENTBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(12857);if(r)goto S_14108;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS=*_FUNC_IDERECENTBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(12857);}while(r); } S_14111:; if ((-(*_FUNC_IDERECENTBOX_LONG_FOCUS>*_FUNC_IDERECENTBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(12858);if(r)goto S_14111;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(12858);}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(12859);}while(r); S_14115:; fornext_value2037= 1 ; fornext_finalvalue2037= 100 ; fornext_step2037= 1 ; if (fornext_step2037<0) fornext_step_negative2037=1; else fornext_step_negative2037=0; if (new_error) goto fornext_error2037; goto fornext_entrylabel2037; while(1){ fornext_value2037=fornext_step2037+(*_FUNC_IDERECENTBOX_LONG_I); fornext_entrylabel2037: *_FUNC_IDERECENTBOX_LONG_I=fornext_value2037; if (fornext_step_negative2037){ if (fornext_value2037fornext_finalvalue2037) break; } fornext_error2037:; if(qbevent){evnt(12860);if(r)goto S_14115;} do{ *_FUNC_IDERECENTBOX_LONG_T=*(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(12861);}while(r); S_14117:; if ((*_FUNC_IDERECENTBOX_LONG_T)||new_error){ if(qbevent){evnt(12862);if(r)goto S_14117;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUSOFFSET=*_FUNC_IDERECENTBOX_LONG_FOCUS-*_FUNC_IDERECENTBOX_LONG_F; if(!qbevent)break;evnt(12863);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDERECENTBOX_LONG_I)-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDERECENTBOX_LONG_FOCUS,_FUNC_IDERECENTBOX_LONG_F,_FUNC_IDERECENTBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDERECENTBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDERECENTBOX_LONG_MOUSEDOWN,_FUNC_IDERECENTBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDERECENTBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12864);}while(r); } } fornext_exit_2036:; S_14122:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDERECENTBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(12869);if(r)goto S_14122;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_IDERECENTBOX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12870);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12871);}while(r); } S_14126:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDERECENTBOX_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDERECENTBOX_LONG_INFO== 1 ))&(-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(12874);if(r)goto S_14126;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_F,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12875);}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING_IDERECENTBOX,_FUNC_IDERECENTBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12876);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12877);}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(12881);}while(r); do{ *_FUNC_IDERECENTBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(12882);}while(r); }while(1); dl_exit_2031:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free16.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDERECENTBOX_STRING_IDERECENTBOX);return _FUNC_IDERECENTBOX_STRING_IDERECENTBOX; } void SUB_IDEMAKEFILEMENU(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data17.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_SUB_IDEMAKEFILEMENU_LONG_M= 1 ; if(!qbevent)break;evnt(12892);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I= 0 ; if(!qbevent)break;evnt(12892);}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("File",4)); if(!qbevent)break;evnt(12893);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12893);}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#New",4)); if(!qbevent)break;evnt(12894);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12894);}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Open...",8)); if(!qbevent)break;evnt(12895);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12895);}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Save",5)); if(!qbevent)break;evnt(12896);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12896);}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Save #As...",11)); if(!qbevent)break;evnt(12897);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12897);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12898);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 2 ,NULL,NULL,*_SUB_IDEMAKEFILEMENU_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12899);}while(r); do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_A,func_space(func_lof(*_SUB_IDEMAKEFILEMENU_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12899);}while(r); do{ sub_get2(*_SUB_IDEMAKEFILEMENU_LONG_FH,NULL,_SUB_IDEMAKEFILEMENU_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12899);}while(r); do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_A,qbs_right(_SUB_IDEMAKEFILEMENU_STRING_A,_SUB_IDEMAKEFILEMENU_STRING_A->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12900);}while(r); S_14151:; fornext_value2040= 1 ; fornext_finalvalue2040= 5 ; fornext_step2040= 1 ; if (fornext_step2040<0) fornext_step_negative2040=1; else fornext_step_negative2040=0; if (new_error) goto fornext_error2040; goto fornext_entrylabel2040; while(1){ fornext_value2040=fornext_step2040+(*_SUB_IDEMAKEFILEMENU_LONG_R); fornext_entrylabel2040: *_SUB_IDEMAKEFILEMENU_LONG_R=fornext_value2040; if (fornext_step_negative2040){ if (fornext_value2040fornext_finalvalue2040) break; } fornext_error2040:; if(qbevent){evnt(12901);if(r)goto S_14151;} S_14152:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R<= 4 ))||new_error){ if(qbevent){evnt(12902);if(r)goto S_14152;} do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_R)-__ARRAY_STRING_IDERECENTLINK[8],__ARRAY_STRING_IDERECENTLINK[9])+array_check(( 1 )-__ARRAY_STRING_IDERECENTLINK[4],__ARRAY_STRING_IDERECENTLINK[5])*__ARRAY_STRING_IDERECENTLINK[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(12902);}while(r); } do{ *_SUB_IDEMAKEFILEMENU_LONG_AI=func_instr(NULL,_SUB_IDEMAKEFILEMENU_STRING_A,__STRING_CRLF,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12903);}while(r); S_14156:; if ((*_SUB_IDEMAKEFILEMENU_LONG_AI)||new_error){ if(qbevent){evnt(12904);if(r)goto S_14156;} S_14157:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R== 1 ))||new_error){ if(qbevent){evnt(12905);if(r)goto S_14157;} do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(12905);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12905);}while(r); } do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_left(_SUB_IDEMAKEFILEMENU_STRING_A,*_SUB_IDEMAKEFILEMENU_LONG_AI- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12906);}while(r); S_14162:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEMAKEFILEMENU_LONG_AI==(_SUB_IDEMAKEFILEMENU_STRING_A->len- 1 ))))||new_error){ if(qbevent){evnt(12906);if(r)goto S_14162;} do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12906);}while(r); }else{ do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_A,qbs_right(_SUB_IDEMAKEFILEMENU_STRING_A,_SUB_IDEMAKEFILEMENU_STRING_A->len-*_SUB_IDEMAKEFILEMENU_LONG_AI- 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12906);}while(r); } S_14167:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R<= 4 ))||new_error){ if(qbevent){evnt(12907);if(r)goto S_14167;} do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_R)-__ARRAY_STRING_IDERECENTLINK[8],__ARRAY_STRING_IDERECENTLINK[9])+array_check(( 2 )-__ARRAY_STRING_IDERECENTLINK[4],__ARRAY_STRING_IDERECENTLINK[5])*__ARRAY_STRING_IDERECENTLINK[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[tmp_long])),_SUB_IDEMAKEFILEMENU_STRING_F); if(!qbevent)break;evnt(12907);}while(r); } S_14170:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R== 5 ))||new_error){ if(qbevent){evnt(12908);if(r)goto S_14170;} do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_new_txt_len("#Recent...",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12908);}while(r); } S_14173:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKEFILEMENU_STRING_F->len> 25 )))||new_error){ if(qbevent){evnt(12909);if(r)goto S_14173;} do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_add(qbs_new_txt_len("\372\372\372",3),qbs_right(_SUB_IDEMAKEFILEMENU_STRING_F, 22 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12909);}while(r); } S_14176:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R<= 4 ))||new_error){ if(qbevent){evnt(12910);if(r)goto S_14176;} do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_R)-__ARRAY_STRING_IDERECENTLINK[8],__ARRAY_STRING_IDERECENTLINK[9])+array_check(( 1 )-__ARRAY_STRING_IDERECENTLINK[4],__ARRAY_STRING_IDERECENTLINK[5])*__ARRAY_STRING_IDERECENTLINK[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[tmp_long])),_SUB_IDEMAKEFILEMENU_STRING_F); if(!qbevent)break;evnt(12910);}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),_SUB_IDEMAKEFILEMENU_STRING_F); if(!qbevent)break;evnt(12911);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12911);}while(r); } } fornext_exit_2039:; do{ sub_close(*_SUB_IDEMAKEFILEMENU_LONG_FH,1); if(!qbevent)break;evnt(12914);}while(r); S_14184:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(12915);if(r)goto S_14184;} } do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(12919);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12919);}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("E#xit",5)); if(!qbevent)break;evnt(12920);}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(12920);}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_SUB_IDEMAKEFILEMENU_LONG_I- 1 ; if(!qbevent)break;evnt(12921);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free17.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEADDRECENT(qbs*_SUB_IDEADDRECENT_STRING_F2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data18.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_IDEADDRECENT_STRING_F,qbs_add(qbs_add(__STRING_CRLF,_SUB_IDEADDRECENT_STRING_F2),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12925);}while(r); do{ *_SUB_IDEADDRECENT_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12926);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 2 ,NULL,NULL,*_SUB_IDEADDRECENT_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12927);}while(r); do{ qbs_set(_SUB_IDEADDRECENT_STRING_A,func_space(func_lof(*_SUB_IDEADDRECENT_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12927);}while(r); do{ sub_get2(*_SUB_IDEADDRECENT_LONG_FH,NULL,_SUB_IDEADDRECENT_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12927);}while(r); do{ *_SUB_IDEADDRECENT_LONG_X=func_instr(NULL,qbs_ucase(_SUB_IDEADDRECENT_STRING_A),qbs_ucase(_SUB_IDEADDRECENT_STRING_F),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12928);}while(r); S_14197:; if ((*_SUB_IDEADDRECENT_LONG_X)||new_error){ if(qbevent){evnt(12929);if(r)goto S_14197;} do{ qbs_set(_SUB_IDEADDRECENT_STRING_A,qbs_add(qbs_add(_SUB_IDEADDRECENT_STRING_F,qbs_left(_SUB_IDEADDRECENT_STRING_A,*_SUB_IDEADDRECENT_LONG_X- 1 )),qbs_right(_SUB_IDEADDRECENT_STRING_A,_SUB_IDEADDRECENT_STRING_A->len-(*_SUB_IDEADDRECENT_LONG_X+_SUB_IDEADDRECENT_STRING_F->len- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12930);}while(r); }else{ do{ qbs_set(_SUB_IDEADDRECENT_STRING_A,qbs_add(_SUB_IDEADDRECENT_STRING_F,_SUB_IDEADDRECENT_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12932);}while(r); } do{ sub_put2(*_SUB_IDEADDRECENT_LONG_FH, 1 ,byte_element((uint64)_SUB_IDEADDRECENT_STRING_A->chr,_SUB_IDEADDRECENT_STRING_A->len,byte_element_2047),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12934);}while(r); do{ sub_close(*_SUB_IDEADDRECENT_LONG_FH,1); if(!qbevent)break;evnt(12935);}while(r); do{ SUB_IDEMAKEFILEMENU(); if(!qbevent)break;evnt(12936);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free18.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEADDSEARCHED(qbs*_SUB_IDEADDSEARCHED_STRING_S2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data19.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_IDEADDSEARCHED_STRING_S,qbs_add(qbs_add(__STRING_CRLF,_SUB_IDEADDSEARCHED_STRING_S2),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12940);}while(r); do{ *_SUB_IDEADDSEARCHED_LONG_FH=func_freefile(); if(!qbevent)break;evnt(12941);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\searched.bin",28), 2 ,NULL,NULL,*_SUB_IDEADDSEARCHED_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12942);}while(r); do{ qbs_set(_SUB_IDEADDSEARCHED_STRING_A,func_space(func_lof(*_SUB_IDEADDSEARCHED_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12942);}while(r); do{ sub_get2(*_SUB_IDEADDSEARCHED_LONG_FH,NULL,_SUB_IDEADDSEARCHED_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12942);}while(r); do{ *_SUB_IDEADDSEARCHED_LONG_X=func_instr(NULL,qbs_ucase(_SUB_IDEADDSEARCHED_STRING_A),qbs_ucase(_SUB_IDEADDSEARCHED_STRING_S),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12943);}while(r); S_14211:; if ((*_SUB_IDEADDSEARCHED_LONG_X)||new_error){ if(qbevent){evnt(12944);if(r)goto S_14211;} do{ qbs_set(_SUB_IDEADDSEARCHED_STRING_A,qbs_add(qbs_add(_SUB_IDEADDSEARCHED_STRING_S,qbs_left(_SUB_IDEADDSEARCHED_STRING_A,*_SUB_IDEADDSEARCHED_LONG_X- 1 )),qbs_right(_SUB_IDEADDSEARCHED_STRING_A,_SUB_IDEADDSEARCHED_STRING_A->len-(*_SUB_IDEADDSEARCHED_LONG_X+_SUB_IDEADDSEARCHED_STRING_S->len- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12945);}while(r); }else{ do{ qbs_set(_SUB_IDEADDSEARCHED_STRING_A,qbs_add(_SUB_IDEADDSEARCHED_STRING_S,_SUB_IDEADDSEARCHED_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12947);}while(r); } do{ sub_put2(*_SUB_IDEADDSEARCHED_LONG_FH, 1 ,byte_element((uint64)_SUB_IDEADDSEARCHED_STRING_A->chr,_SUB_IDEADDSEARCHED_STRING_A->len,byte_element_2051),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12949);}while(r); do{ sub_close(*_SUB_IDEADDSEARCHED_LONG_FH,1); if(!qbevent)break;evnt(12950);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free19.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_ALLOCARRAY(qbs*_FUNC_ALLOCARRAY_STRING_N2,qbs*_FUNC_ALLOCARRAY_STRING_ELEMENTS,int32*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data20.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST=*__INTEGER_DIMSHARED; if(!qbevent)break;evnt(12954);}while(r); do{ *__INTEGER_DIMSHARED= 0 ; if(!qbevent)break;evnt(12954);}while(r); S_14220:; if ((-(*__LONG_AUTOARRAY== 1 ))||new_error){ if(qbevent){evnt(12956);if(r)goto S_14220;} do{ *__LONG_AUTOARRAY= 0 ; if(!qbevent)break;evnt(12956);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_AUTOARY= 1 ; if(!qbevent)break;evnt(12956);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12958);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E,_FUNC_ALLOCARRAY_STRING_ELEMENTS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12963);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_N,_FUNC_ALLOCARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12963);}while(r); S_14227:; if ((-(*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE== -2147483647 ))||new_error){ if(qbevent){evnt(12964);if(r)goto S_14227;} do{ *_FUNC_ALLOCARRAY_LONG_STRINGARRAY= 1 ; if(!qbevent)break;evnt(12964);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE= 8 ; if(!qbevent)break;evnt(12964);}while(r); } S_14231:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_ALLOCARRAY_STRING_E)== 63 )))||new_error){ if(qbevent){evnt(12966);if(r)goto S_14231;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_L,qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12967);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_UNDEFINED= -1 ; if(!qbevent)break;evnt(12968);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_NUME= 1 ; if(!qbevent)break;evnt(12969);}while(r); S_14235:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ALLOCARRAY_STRING_E->len== 1 )))||new_error){ if(qbevent){evnt(12970);if(r)goto S_14235;} do{ goto LABEL_UNDEFINEDARRAY; if(!qbevent)break;evnt(12970);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_UNDEFINED= 1 ; if(!qbevent)break;evnt(12971);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_NUME=qbr(func_val(qbs_right(_FUNC_ALLOCARRAY_STRING_E,_FUNC_ALLOCARRAY_STRING_E->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12972);}while(r); do{ goto LABEL_UNDEFINEDARRAY; if(!qbevent)break;evnt(12973);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_NUME= 1 ; if(!qbevent)break;evnt(12978);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_N=FUNC_NUMELEMENTS(_FUNC_ALLOCARRAY_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12979);}while(r); S_14244:; fornext_value2057= 1 ; fornext_finalvalue2057=*_FUNC_ALLOCARRAY_LONG_N; fornext_step2057= 1 ; if (fornext_step2057<0) fornext_step_negative2057=1; else fornext_step_negative2057=0; if (new_error) goto fornext_error2057; goto fornext_entrylabel2057; while(1){ fornext_value2057=fornext_step2057+(*_FUNC_ALLOCARRAY_LONG_I); fornext_entrylabel2057: *_FUNC_ALLOCARRAY_LONG_I=fornext_value2057; if (fornext_step_negative2057){ if (fornext_value2057fornext_finalvalue2057) break; } fornext_error2057:; if(qbevent){evnt(12980);if(r)goto S_14244;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E2,FUNC_GETELEMENT(_FUNC_ALLOCARRAY_STRING_E,_FUNC_ALLOCARRAY_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12981);}while(r); S_14246:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(12982);if(r)goto S_14246;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B+ 1 ; if(!qbevent)break;evnt(12982);}while(r); } S_14249:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_ALLOCARRAY_LONG_B== 0 ))&(qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(12983);if(r)goto S_14249;} do{ *_FUNC_ALLOCARRAY_LONG_NUME=*_FUNC_ALLOCARRAY_LONG_NUME+ 1 ; if(!qbevent)break;evnt(12983);}while(r); } S_14252:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(12984);if(r)goto S_14252;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B- 1 ; if(!qbevent)break;evnt(12984);}while(r); } } fornext_exit_2056:; S_14256:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(12986);if(r)goto S_14256;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2058; sub_file_print(tmp_fileno,qbs_new_txt_len("numelements count:",18), 0 , 0 , 0 ); if (new_error) goto skip2058; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_ALLOCARRAY_LONG_NUME)), 1 , 0 , 1 ); if (new_error) goto skip2058; skip2058: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12986);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_DESCSTATIC= 0 ; if(!qbevent)break;evnt(12988);}while(r); S_14260:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(12989);if(r)goto S_14260;} S_14261:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!=*_FUNC_ALLOCARRAY_LONG_NUME))||new_error){ if(qbevent){evnt(12990);if(r)goto S_14261;} S_14262:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))== -1 ))||new_error){ if(qbevent){evnt(12992);if(r)goto S_14262;} S_14263:; if (((-(((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]!= 0 ))&(-(*_FUNC_ALLOCARRAY_LONG_NUME!=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])])))||new_error){ if(qbevent){evnt(12993);if(r)goto S_14263;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot change the number of elements an array has!",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12993);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12993);}while(r); } S_14267:; if ((-(*_FUNC_ALLOCARRAY_LONG_NUME== 1 ))||new_error){ if(qbevent){evnt(12994);if(r)goto S_14267;} do{ *(int16*)(((char*)__UDT_ID)+(516))= 1 ; if(!qbevent)break;evnt(12994);}while(r); do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+516))= 1 ; if(!qbevent)break;evnt(12994);}while(r); } do{ tmp_long=array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[tmp_long]=*_FUNC_ALLOCARRAY_LONG_NUME; if(!qbevent)break;evnt(12995);}while(r); }else{ do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot change the number of elements an array has!",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12997);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(12997);}while(r); } } S_14277:; if ((*(int16*)(((char*)__UDT_ID)+(518)))||new_error){ if(qbevent){evnt(13001);if(r)goto S_14277;} do{ *_FUNC_ALLOCARRAY_LONG_DESCSTATIC= 1 ; if(!qbevent)break;evnt(13001);}while(r); } } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_L,qbs_add(qbs_new_txt_len("(",1),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13004);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_CR,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13006);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13007);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS= 1 ; if(!qbevent)break;evnt(13008);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=( 4 )+(*_FUNC_ALLOCARRAY_LONG_NUME* 4 )-( 4 ); if(!qbevent)break;evnt(13009);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_CURE= 1 ; if(!qbevent)break;evnt(13010);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13011);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13011);}while(r); S_14289:; fornext_value2060= 1 ; fornext_finalvalue2060=*_FUNC_ALLOCARRAY_LONG_N; fornext_step2060= 1 ; if (fornext_step2060<0) fornext_step_negative2060=1; else fornext_step_negative2060=0; if (new_error) goto fornext_error2060; goto fornext_entrylabel2060; while(1){ fornext_value2060=fornext_step2060+(*_FUNC_ALLOCARRAY_LONG_I); fornext_entrylabel2060: *_FUNC_ALLOCARRAY_LONG_I=fornext_value2060; if (fornext_step_negative2060){ if (fornext_value2060fornext_finalvalue2060) break; } fornext_error2060:; if(qbevent){evnt(13012);if(r)goto S_14289;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E2,FUNC_GETELEMENT(_FUNC_ALLOCARRAY_STRING_E,_FUNC_ALLOCARRAY_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13013);}while(r); S_14291:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(13014);if(r)goto S_14291;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B+ 1 ; if(!qbevent)break;evnt(13014);}while(r); } S_14294:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len(",",1)))&(-(*_FUNC_ALLOCARRAY_LONG_B== 0 ))))|(-(*_FUNC_ALLOCARRAY_LONG_I==*_FUNC_ALLOCARRAY_LONG_N))))||new_error){ if(qbevent){evnt(13015);if(r)goto S_14294;} S_14295:; if ((-(*_FUNC_ALLOCARRAY_LONG_I==*_FUNC_ALLOCARRAY_LONG_N))||new_error){ if(qbevent){evnt(13016);if(r)goto S_14295;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_E3,__STRING1_SP),_FUNC_ALLOCARRAY_STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13016);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_right(_FUNC_ALLOCARRAY_STRING_E3,_FUNC_ALLOCARRAY_STRING_E3->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13017);}while(r); S_14299:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13018);if(r)goto S_14299;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_right(_FUNC_ALLOCARRAY_STRING_E3BASE,_FUNC_ALLOCARRAY_STRING_E3BASE->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13018);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_BASEGIVEN= 1 ; if(!qbevent)break;evnt(13022);}while(r); S_14303:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13023);if(r)goto S_14303;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,FUNC_STR2(&(pass2063=*__INTEGER_OPTIONBASE+ 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13023);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_BASEGIVEN= 0 ; if(!qbevent)break;evnt(13023);}while(r); } do{ *__INTEGER_CONSTEQUATION= 1 ; if(!qbevent)break;evnt(13024);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,FUNC_FIXOPERATIONORDER(_FUNC_ALLOCARRAY_STRING_E3BASE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13026);}while(r); S_14309:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13027);if(r)goto S_14309;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13027);}while(r); } S_14312:; if ((*_FUNC_ALLOCARRAY_LONG_BASEGIVEN)||new_error){ if(qbevent){evnt(13028);if(r)goto S_14312;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_L,__STRING_TLAYOUT),__STRING1_SP),qbs_new_txt_len("TO",2)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13028);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,FUNC_EVALUATETOTYP(_FUNC_ALLOCARRAY_STRING_E3BASE,&(pass2064= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13029);}while(r); S_14316:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13030);if(r)goto S_14316;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13030);}while(r); } S_14319:; if ((-(*__INTEGER_CONSTEQUATION== 0 ))||new_error){ if(qbevent){evnt(13032);if(r)goto S_14319;} do{ *_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS= 0 ; if(!qbevent)break;evnt(13032);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SD,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_SD,_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(_FUNC_ALLOCARRAY_LONG_EI)),qbs_new_txt_len("]=",2)),_FUNC_ALLOCARRAY_STRING_E3BASE),qbs_new_txt_len(";",1)),_FUNC_ALLOCARRAY_STRING_CR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13033);}while(r); do{ *__INTEGER_CONSTEQUATION= 1 ; if(!qbevent)break;evnt(13035);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,FUNC_FIXOPERATIONORDER(_FUNC_ALLOCARRAY_STRING_E3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13037);}while(r); S_14325:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13038);if(r)goto S_14325;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13038);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_L,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_L,__STRING_TLAYOUT),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13039);}while(r); S_14329:; if ((-(*_FUNC_ALLOCARRAY_LONG_I==*_FUNC_ALLOCARRAY_LONG_N))||new_error){ if(qbevent){evnt(13040);if(r)goto S_14329;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_L,qbs_add(_FUNC_ALLOCARRAY_STRING_L,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13040);}while(r); }else{ do{ qbs_set(_FUNC_ALLOCARRAY_STRING_L,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_L,qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13040);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,FUNC_EVALUATETOTYP(_FUNC_ALLOCARRAY_STRING_E3,&(pass2065= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13041);}while(r); S_14335:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13042);if(r)goto S_14335;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13042);}while(r); } S_14338:; if ((-(*__INTEGER_CONSTEQUATION== 0 ))||new_error){ if(qbevent){evnt(13044);if(r)goto S_14338;} do{ *_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS= 0 ; if(!qbevent)break;evnt(13044);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13045);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SD,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_SD,_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(_FUNC_ALLOCARRAY_LONG_EI)),qbs_new_txt_len("]=(",3)),_FUNC_ALLOCARRAY_STRING_E3),qbs_new_txt_len(")-",2)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2066=*_FUNC_ALLOCARRAY_LONG_EI- 1 ))),qbs_new_txt_len("]+1;",4)),_FUNC_ALLOCARRAY_STRING_CR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13046);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13047);}while(r); S_14344:; if ((-(*_FUNC_ALLOCARRAY_LONG_CURE== 1 ))||new_error){ if(qbevent){evnt(13049);if(r)goto S_14344;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SD,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_SD,_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(_FUNC_ALLOCARRAY_LONG_EI)),qbs_new_txt_len("]=1;",4)),_FUNC_ALLOCARRAY_STRING_CR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13051);}while(r); }else{ do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SD,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_SD,_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(_FUNC_ALLOCARRAY_LONG_EI)),qbs_new_txt_len("]=",2)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2067=*_FUNC_ALLOCARRAY_LONG_EI+ 4 ))),qbs_new_txt_len("]*",2)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2068=*_FUNC_ALLOCARRAY_LONG_EI+ 3 ))),qbs_new_txt_len("];",2)),_FUNC_ALLOCARRAY_STRING_CR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13053);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13055);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13056);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI- 8 ; if(!qbevent)break;evnt(13057);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_CURE=*_FUNC_ALLOCARRAY_LONG_CURE+ 1 ; if(!qbevent)break;evnt(13058);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13059);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13059);}while(r); do{ goto LABEL_AANEXTE; if(!qbevent)break;evnt(13060);}while(r); } S_14357:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(13062);if(r)goto S_14357;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B- 1 ; if(!qbevent)break;evnt(13062);}while(r); } S_14360:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(_FUNC_ALLOCARRAY_STRING_E2),qbs_new_txt_len("TO",2)))&(-(*_FUNC_ALLOCARRAY_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(13063);if(r)goto S_14360;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,_FUNC_ALLOCARRAY_STRING_E3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13064);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13065);}while(r); }else{ do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_E3,__STRING1_SP),_FUNC_ALLOCARRAY_STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13067);}while(r); } LABEL_AANEXTE:; if(qbevent){evnt(13069);r=0;} } fornext_exit_2059:; do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SD,qbs_left(_FUNC_ALLOCARRAY_STRING_SD,_FUNC_ALLOCARRAY_STRING_SD->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13071);}while(r); LABEL_UNDEFINEDARRAY:; if(qbevent){evnt(13073);r=0;} do{ *_FUNC_ALLOCARRAY_LONG_CMEM= 0 ; if(!qbevent)break;evnt(13076);}while(r); S_14369:; if ((-(*__INTEGER_ARRAYDESC== 0 ))||new_error){ if(qbevent){evnt(13077);if(r)goto S_14369;} S_14370:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13078);if(r)goto S_14370;} do{ *_FUNC_ALLOCARRAY_LONG_CMEM= 1 ; if(!qbevent)break;evnt(13078);}while(r); } }else{ S_14374:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__INTEGER_ARRAYDESC)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13080);if(r)goto S_14374;} do{ *_FUNC_ALLOCARRAY_LONG_CMEM= 1 ; if(!qbevent)break;evnt(13080);}while(r); } } do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY=*_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS; if(!qbevent)break;evnt(13083);}while(r); S_14379:; if (((-(*__LONG_SUBFUNCN!= 0 ))&(-(*__LONG_DIMSTATIC== 0 )))||new_error){ if(qbevent){evnt(13084);if(r)goto S_14379;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13084);}while(r); } S_14382:; if ((-(*__LONG_DIMSTATIC== 3 ))||new_error){ if(qbevent){evnt(13085);if(r)goto S_14382;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13085);}while(r); } S_14385:; if ((*__INTEGER_DYNAMICMODE)||new_error){ if(qbevent){evnt(13086);if(r)goto S_14385;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13086);}while(r); } S_14388:; if ((*__INTEGER_REDIMOPTION)||new_error){ if(qbevent){evnt(13087);if(r)goto S_14388;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13087);}while(r); } S_14391:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(13088);if(r)goto S_14391;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13088);}while(r); } S_14394:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(13090);if(r)goto S_14394;} S_14395:; if ((-(*_FUNC_ALLOCARRAY_LONG_STATICARRAY== 1 ))||new_error){ if(qbevent){evnt(13091);if(r)goto S_14395;} S_14396:; if ((*_FUNC_ALLOCARRAY_LONG_DESCSTATIC)||new_error){ if(qbevent){evnt(13092);if(r)goto S_14396;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot redefine a static array!",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13092);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13092);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13093);}while(r); } } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT,FUNC_STR2(_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13102);}while(r); S_14404:; if ((-(*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE< 0 ))||new_error){ if(qbevent){evnt(13103);if(r)goto S_14404;} do{ *_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE=-(*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE); if(!qbevent)break;evnt(13104);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT,qbs_add(FUNC_STR2(_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE),qbs_new_txt_len("/8+1",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13105);}while(r); } S_14408:; if ((-(*__INTEGER_ARRAYDESC== 0 ))||new_error){ if(qbevent){evnt(13110);if(r)goto S_14408;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2070; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("ptrszint *",10),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2070; skip2070: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13111);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2071; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (!",5),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("){",2)), 0 , 0 , 1 ); if (new_error) goto skip2071; skip2071: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13112);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2072; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("=(ptrszint*)mem_static_malloc(",30)),FUNC_STR2(&(pass2073=( 4 **_FUNC_ALLOCARRAY_LONG_NUME)+( 4 )+( 1 )))),qbs_new_txt_len("*ptrsz);",8)), 0 , 0 , 1 ); if (new_error) goto skip2072; skip2072: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13113);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2074; sub_file_print(tmp_fileno,qbs_new_txt_len("new_mem_lock();",15), 0 , 0 , 1 ); if (new_error) goto skip2074; skip2074: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13115);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2075; sub_file_print(tmp_fileno,qbs_new_txt_len("mem_lock_tmp->type=4;",21), 0 , 0 , 1 ); if (new_error) goto skip2075; skip2075: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13116);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2076; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((ptrszint*)",12),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len(")[",2)),FUNC_STR2(&(pass2077=( 4 **_FUNC_ALLOCARRAY_LONG_NUME)+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("]=(ptrszint)mem_lock_tmp;",25)), 0 , 0 , 1 ); if (new_error) goto skip2076; skip2076: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13117);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SIZESTR,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13121);}while(r); S_14417:; fornext_value2079= 1 ; fornext_finalvalue2079=*_FUNC_ALLOCARRAY_LONG_NUME; fornext_step2079= 1 ; if (fornext_step2079<0) fornext_step_negative2079=1; else fornext_step_negative2079=0; if (new_error) goto fornext_error2079; goto fornext_entrylabel2079; while(1){ fornext_value2079=fornext_step2079+(*_FUNC_ALLOCARRAY_LONG_I); fornext_entrylabel2079: *_FUNC_ALLOCARRAY_LONG_I=fornext_value2079; if (fornext_step_negative2079){ if (fornext_value2079fornext_finalvalue2079) break; } fornext_error2079:; if(qbevent){evnt(13122);if(r)goto S_14417;} S_14418:; if ((-(*_FUNC_ALLOCARRAY_LONG_I!= 1 ))||new_error){ if(qbevent){evnt(13123);if(r)goto S_14418;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SIZESTR,qbs_add(_FUNC_ALLOCARRAY_STRING_SIZESTR,qbs_new_txt_len("*",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13123);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SIZESTR,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_SIZESTR,_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2080=(*_FUNC_ALLOCARRAY_LONG_I* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13124);}while(r); } fornext_exit_2078:; do{ qbs_set(_FUNC_ALLOCARRAY_STRING_ELESIZESTR,_FUNC_ALLOCARRAY_STRING_SIZESTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13126);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SIZESTR,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_SIZESTR,qbs_new_txt_len("*",1)),_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13127);}while(r); S_14425:; if ((*_FUNC_ALLOCARRAY_LONG_STATICARRAY)||new_error){ if(qbevent){evnt(13132);if(r)goto S_14425;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2081; sub_file_print(tmp_fileno,_FUNC_ALLOCARRAY_STRING_SD, 0 , 0 , 1 ); if (new_error) goto skip2081; skip2081: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13134);}while(r); S_14427:; if ((*_FUNC_ALLOCARRAY_LONG_CMEM&(-(*_FUNC_ALLOCARRAY_LONG_STRINGARRAY== 0 )))||new_error){ if(qbevent){evnt(13139);if(r)goto S_14427;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2082; sub_file_print(tmp_fileno,qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[0]=(ptrszint)cmem_static_pointer;",34)), 0 , 0 , 1 ); if (new_error) goto skip2082; skip2082: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13142);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2083; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if ((cmem_static_pointer+=((",28),_FUNC_ALLOCARRAY_STRING_SIZESTR),qbs_new_txt_len(")+15)&-16)>cmem_dynamic_base) error(257);",41)), 0 , 0 , 1 ); if (new_error) goto skip2083; skip2083: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13144);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2084; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if ((",5),_FUNC_ALLOCARRAY_STRING_SIZESTR),qbs_new_txt_len(")>65536) error(257);",20)), 0 , 0 , 1 ); if (new_error) goto skip2084; skip2084: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13146);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2085; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memset((void*)(",15),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]),0,",7)),_FUNC_ALLOCARRAY_STRING_SIZESTR),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2085; skip2085: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13148);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2086; sub_file_print(tmp_fileno,qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[2]=1+2+4;",10)), 0 , 0 , 1 ); if (new_error) goto skip2086; skip2086: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13150);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2087; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[0]=(ptrszint)mem_static_malloc(",32)),_FUNC_ALLOCARRAY_STRING_SIZESTR),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2087; skip2087: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13153);}while(r); S_14435:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13154);if(r)goto S_14435;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2088; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_FUNC_ALLOCARRAY_STRING_ELESIZESTR),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2088; skip2088: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13156);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2089; sub_file_print(tmp_fileno,qbs_new_txt_len("while(tmp_long--){",18), 0 , 0 , 1 ); if (new_error) goto skip2089; skip2089: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13157);}while(r); S_14438:; if ((*_FUNC_ALLOCARRAY_LONG_CMEM)||new_error){ if(qbevent){evnt(13158);if(r)goto S_14438;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2090; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("((uint64*)(",11),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);",42)), 0 , 0 , 1 ); if (new_error) goto skip2090; skip2090: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13159);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2091; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("((uint64*)(",11),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]))[tmp_long]=(uint64)qbs_new(0,0);",37)), 0 , 0 , 1 ); if (new_error) goto skip2091; skip2091: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13161);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2092; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2092; skip2092: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13163);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2093; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memset((void*)(",15),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]),0,",7)),_FUNC_ALLOCARRAY_STRING_SIZESTR),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2093; skip2093: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13166);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2094; sub_file_print(tmp_fileno,qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[2]=1+2;",8)), 0 , 0 , 1 ); if (new_error) goto skip2094; skip2094: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13168);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2095; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2095; skip2095: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13171);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY=*_FUNC_ALLOCARRAY_LONG_NUME+ 65536 ; if(!qbevent)break;evnt(13172);}while(r); } S_14452:; if ((-(*_FUNC_ALLOCARRAY_LONG_STATICARRAY== 0 ))||new_error){ if(qbevent){evnt(13177);if(r)goto S_14452;} S_14453:; if ((-(*_FUNC_ALLOCARRAY_LONG_UNDEFINED== 0 ))||new_error){ if(qbevent){evnt(13179);if(r)goto S_14453;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (",4)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[2]&2){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13184);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("error(10);",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13185);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("}else{",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13186);}while(r); S_14457:; if ((-(*__INTEGER_REDIMOPTION== 0 ))||new_error){ if(qbevent){evnt(13191);if(r)goto S_14457;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (",4)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[2]&1){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13192);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("error(10);",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13193);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("}else{",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13194);}while(r); }else{ do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("((mem_lock*)((ptrszint*)",24)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len(")[",2)),FUNC_STR2(&(pass2096=( 4 **_FUNC_ALLOCARRAY_LONG_NUME)+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("])->id=(++mem_lock_id);",23))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13202);}while(r); S_14463:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13204);if(r)goto S_14463;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("static int32 preserved_elements;",32))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13205);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (",4)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[2]&1){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13209);}while(r); S_14467:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13211);if(r)goto S_14467;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("preserved_elements=",19)),_FUNC_ALLOCARRAY_STRING_ELESIZESTR),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13212);}while(r); do{ goto LABEL_SKIPERASE; if(!qbevent)break;evnt(13213);}while(r); } S_14471:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13217);if(r)goto S_14471;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("tmp_long=",9)),_FUNC_ALLOCARRAY_STRING_ELESIZESTR),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13218);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("while(tmp_long--) qbs_free((qbs*)((uint64*)(",44)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]))[tmp_long]);",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13219);}while(r); } S_14475:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13222);if(r)goto S_14475;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("free((void*)(",13)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]));",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13224);}while(r); }else{ do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (",4)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[2]&4){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13227);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("cmem_dynamic_free((uint8*)(",27)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]));",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13228);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("}else{",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13229);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("free((void*)(",13)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]));",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13230);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13231);}while(r); } LABEL_SKIPERASE:; if(qbevent){evnt(13234);r=0;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13236);}while(r); S_14485:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13237);if(r)goto S_14485;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("else preserved_elements=0;",26))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13238);}while(r); } } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),_FUNC_ALLOCARRAY_STRING_SD)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13248);}while(r); S_14490:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13249);if(r)goto S_14490;} S_14491:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13253);if(r)goto S_14491;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (preserved_elements){",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13254);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("static ptrszint tmp_long2;",26))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13256);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("tmp_long=",9)),_FUNC_ALLOCARRAY_STRING_ELESIZESTR),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13259);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (tmp_longfornext_finalvalue2116) break; } fornext_error2116:; if(qbevent){evnt(13384);if(r)goto S_14582;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_I* 4 ; if(!qbevent)break;evnt(13385);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2117; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(_FUNC_ALLOCARRAY_LONG_B)),qbs_new_txt_len("]=2147483647;",13)), 0 , 0 , 1 ); if (new_error) goto skip2117; skip2117: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13386);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2118; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2119=*_FUNC_ALLOCARRAY_LONG_B+ 1 ))),qbs_new_txt_len("]=0;",4)), 0 , 0 , 1 ); if (new_error) goto skip2118; skip2118: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13387);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2120; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2121=*_FUNC_ALLOCARRAY_LONG_B+ 2 ))),qbs_new_txt_len("]=0;",4)), 0 , 0 , 1 ); if (new_error) goto skip2120; skip2120: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13388);}while(r); } fornext_exit_2115:; S_14588:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13390);if(r)goto S_14588;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2122; sub_file_print(tmp_fileno,qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[0]=(ptrszint)¬hingstring;",29)), 0 , 0 , 1 ); if (new_error) goto skip2122; skip2122: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13392);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2123; sub_file_print(tmp_fileno,qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[0]=(ptrszint)nothingvalue;",27)), 0 , 0 , 1 ); if (new_error) goto skip2123; skip2123: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13395);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2124; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2124; skip2124: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13397);}while(r); } S_14595:; if ((-(*_FUNC_ALLOCARRAY_LONG_UNDEFINED== 0 ))||new_error){ if(qbevent){evnt(13400);if(r)goto S_14595;} S_14596:; if ((-(*__INTEGER_REDIMOPTION== 0 ))||new_error){ if(qbevent){evnt(13402);if(r)goto S_14596;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13402);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13403);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY=*_FUNC_ALLOCARRAY_LONG_NUME; if(!qbevent)break;evnt(13407);}while(r); S_14602:; if ((-(*_FUNC_ALLOCARRAY_LONG_UNDEFINED== -1 ))||new_error){ if(qbevent){evnt(13408);if(r)goto S_14602;} do{ *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY= -1 ; if(!qbevent)break;evnt(13408);}while(r); } } S_14606:; if ((-(*_FUNC_ALLOCARRAY_LONG_AUTOARY== 0 ))||new_error){ if(qbevent){evnt(13412);if(r)goto S_14606;} S_14607:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(13413);if(r)goto S_14607;} do{ *_FUNC_ALLOCARRAY_LONG_FH=func_freefile(); if(!qbevent)break;evnt(13414);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12)), 5 ,NULL,NULL,*_FUNC_ALLOCARRAY_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13414);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_FUNC_ALLOCARRAY_LONG_FH; if (new_error) goto skip2125; sub_file_print(tmp_fileno,_FUNC_ALLOCARRAY_STRING_F12, 0 , 0 , 1 ); if (new_error) goto skip2125; skip2125: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13414);}while(r); do{ sub_close(*_FUNC_ALLOCARRAY_LONG_FH,1); if(!qbevent)break;evnt(13414);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2126; sub_file_print(tmp_fileno,_FUNC_ALLOCARRAY_STRING_F12, 0 , 0 , 1 ); if (new_error) goto skip2126; skip2126: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13416);}while(r); } } do{ *__INTEGER_DIMSHARED=*_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST; if(!qbevent)break;evnt(13428);}while(r); do{ qbs_set(__STRING_TLAYOUT,_FUNC_ALLOCARRAY_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13430);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free20.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY; } qbs* FUNC_ARRAYREFERENCE(qbs*_FUNC_ARRAYREFERENCE_STRING_INDEXES,int32*_FUNC_ARRAYREFERENCE_LONG_TYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data21.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(13434);}while(r); do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_IDNUMBER,FUNC_STR2(__LONG_CURRENTID)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13444);}while(r); do{ if(!qbevent)break;evnt(13446);}while(r); do{ memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)),(((char*)__UDT_ID)+(0)),2860); if(!qbevent)break;evnt(13448);}while(r); do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_STRING_INDEXES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13450);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_TYP=*(int32*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(512))+*__LONG_ISARRAY+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(13451);}while(r); do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13452);}while(r); S_14625:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13454);if(r)goto S_14625;} do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13455);}while(r); do{ goto LABEL_GOTARRAYINDEX; if(!qbevent)break;evnt(13456);}while(r); } do{ *_FUNC_ARRAYREFERENCE_LONG_N=FUNC_NUMELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13459);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_ELEMENTS= 1 ; if(!qbevent)break;evnt(13462);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_B= 0 ; if(!qbevent)break;evnt(13463);}while(r); S_14632:; fornext_value2129= 1 ; fornext_finalvalue2129=*_FUNC_ARRAYREFERENCE_LONG_N; fornext_step2129= 1 ; if (fornext_step2129<0) fornext_step_negative2129=1; else fornext_step_negative2129=0; if (new_error) goto fornext_error2129; goto fornext_entrylabel2129; while(1){ fornext_value2129=fornext_step2129+(*_FUNC_ARRAYREFERENCE_LONG_I); fornext_entrylabel2129: *_FUNC_ARRAYREFERENCE_LONG_I=fornext_value2129; if (fornext_step_negative2129){ if (fornext_value2129fornext_finalvalue2129) break; } fornext_error2129:; if(qbevent){evnt(13464);if(r)goto S_14632;} do{ *_FUNC_ARRAYREFERENCE_LONG_A=qbs_asc(FUNC_GETELEMENT(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13465);}while(r); S_14634:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_A== 40 ))||new_error){ if(qbevent){evnt(13466);if(r)goto S_14634;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B+ 1 ; if(!qbevent)break;evnt(13466);}while(r); } S_14637:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_A== 41 ))||new_error){ if(qbevent){evnt(13467);if(r)goto S_14637;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B- 1 ; if(!qbevent)break;evnt(13467);}while(r); } S_14640:; if (((-(*_FUNC_ARRAYREFERENCE_LONG_A== 44 ))&(-(*_FUNC_ARRAYREFERENCE_LONG_B== 0 )))||new_error){ if(qbevent){evnt(13468);if(r)goto S_14640;} do{ *_FUNC_ARRAYREFERENCE_LONG_ELEMENTS=*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS+ 1 ; if(!qbevent)break;evnt(13468);}while(r); } } fornext_exit_2128:; S_14644:; if ((-(*(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(516))== -1 ))||new_error){ if(qbevent){evnt(13471);if(r)goto S_14644;} S_14645:; if (((-(((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]!= 0 ))&(-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS!=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])])))||new_error){ if(qbevent){evnt(13472);if(r)goto S_14645;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot change the number of elements an array has!",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13472);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13472);}while(r); } S_14649:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS== 1 ))||new_error){ if(qbevent){evnt(13473);if(r)goto S_14649;} do{ *(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(516))= 1 ; if(!qbevent)break;evnt(13473);}while(r); do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+516))= 1 ; if(!qbevent)break;evnt(13473);}while(r); } do{ tmp_long=array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[tmp_long]=*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS; if(!qbevent)break;evnt(13474);}while(r); }else{ S_14655:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS!=*(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(516))))||new_error){ if(qbevent){evnt(13476);if(r)goto S_14655;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot change the number of elements an array has!",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13476);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13476);}while(r); } } do{ *_FUNC_ARRAYREFERENCE_LONG_CURARG= 1 ; if(!qbevent)break;evnt(13479);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_FIRSTI= 1 ; if(!qbevent)break;evnt(13480);}while(r); S_14662:; fornext_value2131= 1 ; fornext_finalvalue2131=*_FUNC_ARRAYREFERENCE_LONG_N; fornext_step2131= 1 ; if (fornext_step2131<0) fornext_step_negative2131=1; else fornext_step_negative2131=0; if (new_error) goto fornext_error2131; goto fornext_entrylabel2131; while(1){ fornext_value2131=fornext_step2131+(*_FUNC_ARRAYREFERENCE_LONG_I); fornext_entrylabel2131: *_FUNC_ARRAYREFERENCE_LONG_I=fornext_value2131; if (fornext_step_negative2131){ if (fornext_value2131fornext_finalvalue2131) break; } fornext_error2131:; if(qbevent){evnt(13481);if(r)goto S_14662;} do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_L,FUNC_GETELEMENT(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13482);}while(r); S_14664:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(13483);if(r)goto S_14664;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B+ 1 ; if(!qbevent)break;evnt(13483);}while(r); } S_14667:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(13484);if(r)goto S_14667;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B- 1 ; if(!qbevent)break;evnt(13484);}while(r); } S_14670:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(",",1)))&(-(*_FUNC_ARRAYREFERENCE_LONG_B== 0 )))|(-(*_FUNC_ARRAYREFERENCE_LONG_I==*_FUNC_ARRAYREFERENCE_LONG_N))))||new_error){ if(qbevent){evnt(13485);if(r)goto S_14670;} S_14671:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_I==*_FUNC_ARRAYREFERENCE_LONG_N))||new_error){ if(qbevent){evnt(13486);if(r)goto S_14671;} S_14672:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(13487);if(r)goto S_14672;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Array index missing",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13487);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13487);}while(r); } do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_E,FUNC_EVALUATETOTYP(FUNC_GETELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_FIRSTI,_FUNC_ARRAYREFERENCE_LONG_I),&(pass2132= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13488);}while(r); S_14677:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13489);if(r)goto S_14677;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13489);}while(r); } }else{ do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_E,FUNC_EVALUATETOTYP(FUNC_GETELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_FIRSTI,&(pass2133=*_FUNC_ARRAYREFERENCE_LONG_I- 1 )),&(pass2134= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13491);}while(r); S_14682:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13492);if(r)goto S_14682;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13492);}while(r); } } S_14686:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13494);if(r)goto S_14686;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Array index missing",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13494);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13494);}while(r); } do{ *_FUNC_ARRAYREFERENCE_LONG_ARGI=((*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS-*_FUNC_ARRAYREFERENCE_LONG_CURARG)* 4 )+( 4 ); if(!qbevent)break;evnt(13495);}while(r); S_14691:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(13496);if(r)goto S_14691;} do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("array_check((",13)),_FUNC_ARRAYREFERENCE_STRING_E),qbs_new_txt_len(")-",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(_FUNC_ARRAYREFERENCE_LONG_ARGI)),qbs_new_txt_len("],",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2135=*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 1 ))),qbs_new_txt_len("])+",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13497);}while(r); }else{ do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("array_check((",13)),_FUNC_ARRAYREFERENCE_STRING_E),qbs_new_txt_len(")-",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(_FUNC_ARRAYREFERENCE_LONG_ARGI)),qbs_new_txt_len("],",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2136=*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 1 ))),qbs_new_txt_len("])*",3)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2137=*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 2 ))),qbs_new_txt_len("]+",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13499);}while(r); } do{ *_FUNC_ARRAYREFERENCE_LONG_FIRSTI=*_FUNC_ARRAYREFERENCE_LONG_I+ 1 ; if(!qbevent)break;evnt(13501);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_CURARG=*_FUNC_ARRAYREFERENCE_LONG_CURARG+ 1 ; if(!qbevent)break;evnt(13502);}while(r); } } fornext_exit_2130:; do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_left(_FUNC_ARRAYREFERENCE_STRING_R,_FUNC_ARRAYREFERENCE_STRING_R->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13505);}while(r); LABEL_GOTARRAYINDEX:; if(qbevent){evnt(13506);r=0;} do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_IDNUMBER,__STRING1_SP3),_FUNC_ARRAYREFERENCE_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13508);}while(r); do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_ARRAYREFERENCE,_FUNC_ARRAYREFERENCE_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13509);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free21.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_ARRAYREFERENCE_STRING_ARRAYREFERENCE);return _FUNC_ARRAYREFERENCE_STRING_ARRAYREFERENCE; } void SUB_ASSIGN(qbs*_SUB_ASSIGN_STRING_A,int32*_SUB_ASSIGN_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data22.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_14703:; fornext_value2141= 1 ; fornext_finalvalue2141=*_SUB_ASSIGN_LONG_N; fornext_step2141= 1 ; if (fornext_step2141<0) fornext_step_negative2141=1; else fornext_step_negative2141=0; if (new_error) goto fornext_error2141; goto fornext_entrylabel2141; while(1){ fornext_value2141=fornext_step2141+(*_SUB_ASSIGN_LONG_I); fornext_entrylabel2141: *_SUB_ASSIGN_LONG_I=fornext_value2141; if (fornext_step_negative2141){ if (fornext_value2141fornext_finalvalue2141) break; } fornext_error2141:; if(qbevent){evnt(13515);if(r)goto S_14703;} do{ *_SUB_ASSIGN_LONG_C=qbs_asc(FUNC_GETELEMENT(_SUB_ASSIGN_STRING_A,_SUB_ASSIGN_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13516);}while(r); S_14705:; if ((-(*_SUB_ASSIGN_LONG_C== 40 ))||new_error){ if(qbevent){evnt(13517);if(r)goto S_14705;} do{ *_SUB_ASSIGN_LONG_B=*_SUB_ASSIGN_LONG_B+ 1 ; if(!qbevent)break;evnt(13517);}while(r); } S_14708:; if ((-(*_SUB_ASSIGN_LONG_C== 41 ))||new_error){ if(qbevent){evnt(13518);if(r)goto S_14708;} do{ *_SUB_ASSIGN_LONG_B=*_SUB_ASSIGN_LONG_B- 1 ; if(!qbevent)break;evnt(13518);}while(r); } S_14711:; if (((-(*_SUB_ASSIGN_LONG_C== 61 ))&(-(*_SUB_ASSIGN_LONG_B== 0 )))||new_error){ if(qbevent){evnt(13519);if(r)goto S_14711;} S_14712:; if ((-(*_SUB_ASSIGN_LONG_I== 1 ))||new_error){ if(qbevent){evnt(13520);if(r)goto S_14712;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ... =",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13520);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13520);}while(r); } S_14716:; if ((-(*_SUB_ASSIGN_LONG_I==*_SUB_ASSIGN_LONG_N))||new_error){ if(qbevent){evnt(13521);if(r)goto S_14716;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected = ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13521);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13521);}while(r); } do{ qbs_set(_SUB_ASSIGN_STRING_A2,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(_SUB_ASSIGN_STRING_A,&(pass2142= 1 ),&(pass2143=*_SUB_ASSIGN_LONG_I- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13523);}while(r); S_14721:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13524);if(r)goto S_14721;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13524);}while(r); } do{ qbs_set(_SUB_ASSIGN_STRING_L,qbs_add(qbs_add(qbs_add(__STRING_TLAYOUT,__STRING1_SP),qbs_new_txt_len("=",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13525);}while(r); S_14725:; if ((-(*_SUB_ASSIGN_LONG_I== 2 ))||new_error){ if(qbevent){evnt(13528);if(r)goto S_14725;} do{ *_SUB_ASSIGN_LONG_TRY=FUNC_FINDID(_SUB_ASSIGN_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13529);}while(r); S_14727:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13530);if(r)goto S_14727;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13530);}while(r); } S_14730:; while((*_SUB_ASSIGN_LONG_TRY)||new_error){ if(qbevent){evnt(13531);if(r)goto S_14730;} S_14731:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(13532);if(r)goto S_14731;} S_14732:; if ((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2638))))||new_error){ if(qbevent){evnt(13533);if(r)goto S_14732;} S_14733:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(13534);if(r)goto S_14733;} do{ SUB_MAKEIDREFER(_SUB_ASSIGN_STRING_A2,_SUB_ASSIGN_LONG_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13535);}while(r); do{ goto LABEL_ASSIGNSIMPLEVARIABLE; if(!qbevent)break;evnt(13536);}while(r); } } } S_14739:; if ((-(*_SUB_ASSIGN_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(13540);if(r)goto S_14739;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(13540);}while(r); do{ *_SUB_ASSIGN_LONG_TRY=FUNC_FINDID(_SUB_ASSIGN_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13540);}while(r); }else{ do{ *_SUB_ASSIGN_LONG_TRY= 0 ; if(!qbevent)break;evnt(13540);}while(r); } S_14745:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13541);if(r)goto S_14745;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13541);}while(r); } } dl_exit_2144:; } do{ qbs_set(_SUB_ASSIGN_STRING_A2,FUNC_EVALUATE(_SUB_ASSIGN_STRING_A2,_SUB_ASSIGN_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13545);}while(r); S_14751:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13545);if(r)goto S_14751;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13545);}while(r); } LABEL_ASSIGNSIMPLEVARIABLE:; if(qbevent){evnt(13546);r=0;} S_14754:; if ((-((*_SUB_ASSIGN_LONG_TYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(13547);if(r)goto S_14754;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable =",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13547);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13547);}while(r); } do{ SUB_SETREFER(_SUB_ASSIGN_STRING_A2,_SUB_ASSIGN_LONG_TYP,FUNC_GETELEMENTS(_SUB_ASSIGN_STRING_A,&(pass2145=*_SUB_ASSIGN_LONG_I+ 1 ),_SUB_ASSIGN_LONG_N),&(pass2146= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13548);}while(r); S_14759:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13549);if(r)goto S_14759;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13549);}while(r); } do{ qbs_set(__STRING_TLAYOUT,qbs_add(_SUB_ASSIGN_STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13550);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13552);}while(r); } } fornext_exit_2140:; do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13556);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13556);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free22.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_CLEARID(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data23.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ memcpy((((char*)__UDT_ID)+(0)),(((char*)__UDT_CLEARIDDATA)+(0)),2860); if(!qbevent)break;evnt(13560);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free23.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_CLOSEMAIN(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data24.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ SUB_XEND(); if(!qbevent)break;evnt(13564);}while(r); S_14770:; if ((-(*__LONG_C_CORE== 0 ))||new_error){ if(qbevent){evnt(13566);if(r)goto S_14770;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2147; sub_file_print(tmp_fileno,qbs_new_txt_len("return NULL;",12), 0 , 0 , 1 ); if (new_error) goto skip2147; skip2147: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13566);}while(r); } S_14773:; if ((-(*__LONG_C_CORE== 1 ))||new_error){ if(qbevent){evnt(13567);if(r)goto S_14773;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2148; sub_file_print(tmp_fileno,qbs_new_txt_len("return;",7), 0 , 0 , 1 ); if (new_error) goto skip2148; skip2148: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13567);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2149; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2149; skip2149: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13569);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip2150; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2150; skip2150: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13570);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip2151; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2151; skip2151: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13571);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip2152; sub_file_print(tmp_fileno,qbs_new_txt_len("error(3);",9), 0 , 0 , 1 ); if (new_error) goto skip2152; skip2152: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13572);}while(r); do{ *__INTEGER_CLOSEDMAIN= 1 ; if(!qbevent)break;evnt(13574);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free24.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_COUNTELEMENTS(qbs*_FUNC_COUNTELEMENTS_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data25.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_COUNTELEMENTS_LONG_N=FUNC_NUMELEMENTS(_FUNC_COUNTELEMENTS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13579);}while(r); do{ *_FUNC_COUNTELEMENTS_LONG_C= 1 ; if(!qbevent)break;evnt(13580);}while(r); S_14783:; fornext_value2155= 1 ; fornext_finalvalue2155=*_FUNC_COUNTELEMENTS_LONG_N; fornext_step2155= 1 ; if (fornext_step2155<0) fornext_step_negative2155=1; else fornext_step_negative2155=0; if (new_error) goto fornext_error2155; goto fornext_entrylabel2155; while(1){ fornext_value2155=fornext_step2155+(*_FUNC_COUNTELEMENTS_LONG_I); fornext_entrylabel2155: *_FUNC_COUNTELEMENTS_LONG_I=fornext_value2155; if (fornext_step_negative2155){ if (fornext_value2155fornext_finalvalue2155) break; } fornext_error2155:; if(qbevent){evnt(13581);if(r)goto S_14783;} do{ qbs_set(_FUNC_COUNTELEMENTS_STRING_E,FUNC_GETELEMENT(_FUNC_COUNTELEMENTS_STRING_A,_FUNC_COUNTELEMENTS_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13582);}while(r); S_14785:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_COUNTELEMENTS_STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(13583);if(r)goto S_14785;} do{ *_FUNC_COUNTELEMENTS_LONG_B=*_FUNC_COUNTELEMENTS_LONG_B+ 1 ; if(!qbevent)break;evnt(13583);}while(r); } S_14788:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_COUNTELEMENTS_STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(13584);if(r)goto S_14788;} do{ *_FUNC_COUNTELEMENTS_LONG_B=*_FUNC_COUNTELEMENTS_LONG_B- 1 ; if(!qbevent)break;evnt(13584);}while(r); } S_14791:; if ((-(*_FUNC_COUNTELEMENTS_LONG_B< 0 ))||new_error){ if(qbevent){evnt(13585);if(r)goto S_14791;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unexpected ) encountered",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13585);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13585);}while(r); } S_14795:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_COUNTELEMENTS_STRING_E,qbs_new_txt_len(",",1)))&(-(*_FUNC_COUNTELEMENTS_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(13586);if(r)goto S_14795;} do{ *_FUNC_COUNTELEMENTS_LONG_C=*_FUNC_COUNTELEMENTS_LONG_C+ 1 ; if(!qbevent)break;evnt(13586);}while(r); } } fornext_exit_2154:; do{ *_FUNC_COUNTELEMENTS_LONG_COUNTELEMENTS=*_FUNC_COUNTELEMENTS_LONG_C; if(!qbevent)break;evnt(13588);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free25.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_COUNTELEMENTS_LONG_COUNTELEMENTS; } int32 FUNC_DIM2(qbs*_FUNC_DIM2_STRING_VARNAME,qbs*_FUNC_DIM2_STRING_TYP2,int32*_FUNC_DIM2_LONG_METHOD,qbs*_FUNC_DIM2_STRING_ELEMENTS){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data26.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_DIM2_STRING_TYP,_FUNC_DIM2_STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13613);}while(r); do{ *_FUNC_DIM2_LONG_DIM2= 1 ; if(!qbevent)break;evnt(13614);}while(r); S_14802:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(13616);if(r)goto S_14802;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2159; sub_file_print(tmp_fileno,qbs_new_txt_len("dim2 called",11), 0 , 1 , 0 ); if (new_error) goto skip2159; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_DIM2_LONG_METHOD)), 1 , 0 , 1 ); if (new_error) goto skip2159; skip2159: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13616);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_CVARNAME,_FUNC_DIM2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13618);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_L,_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13619);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_VARNAME,qbs_ucase(_FUNC_DIM2_STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13620);}while(r); S_14808:; if ((-(*__INTEGER_DIMSFARRAY== 1 ))||new_error){ if(qbevent){evnt(13622);if(r)goto S_14808;} do{ *_FUNC_DIM2_LONG_F= 0 ; if(!qbevent)break;evnt(13622);}while(r); }else{ do{ *_FUNC_DIM2_LONG_F= 1 ; if(!qbevent)break;evnt(13622);}while(r); } S_14813:; if (((-(*__LONG_DIMSTATIC!= 0 ))&(-(*__INTEGER_DIMSHARED== 0 )))||new_error){ if(qbevent){evnt(13624);if(r)goto S_14813;} do{ *__INTEGER_DEFDATAHANDLE= 18 ; if(!qbevent)break;evnt(13627);}while(r); do{ sub_close( 13 ,1); if(!qbevent)break;evnt(13628);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12)), 5 ,NULL,NULL, 13 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13628);}while(r); do{ sub_close( 19 ,1); if(!qbevent)break;evnt(13629);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12)), 5 ,NULL,NULL, 19 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13629);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,qbs_add(qbs_add(qbs_add(__STRING_MODULE,qbs_new_txt_len("_",1)),__STRING_SUBFUNC),qbs_new_txt_len("_",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13633);}while(r); S_14821:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_TYP->len== 0 )))||new_error){ if(qbevent){evnt(13636);if(r)goto S_14821;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("DIM2: No type specified!",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13636);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13636);}while(r); } S_14825:; fornext_value2162= 1 ; fornext_finalvalue2162=*__LONG_LASTTYPE; fornext_step2162= 1 ; if (fornext_step2162<0) fornext_step_negative2162=1; else fornext_step_negative2162=0; if (new_error) goto fornext_error2162; goto fornext_entrylabel2162; while(1){ fornext_value2162=fornext_step2162+(*_FUNC_DIM2_LONG_I); fornext_entrylabel2162: *_FUNC_DIM2_LONG_I=fornext_value2162; if (fornext_step_negative2162){ if (fornext_value2162fornext_finalvalue2162) break; } fornext_error2162:; if(qbevent){evnt(13640);if(r)goto S_14825;} S_14826:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_TYP,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[(array_check((*_FUNC_DIM2_LONG_I)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]))*256],256,1)))))||new_error){ if(qbevent){evnt(13641);if(r)goto S_14826;} do{ qbs_set(__STRING_DIM2TYPEPASSBACK,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*_FUNC_DIM2_LONG_I)-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13642);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),_FUNC_DIM2_STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13644);}while(r); S_14829:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13647);if(r)goto S_14829;} do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(13648);}while(r); S_14831:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(13649);if(r)goto S_14831;} do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13650);}while(r); S_14833:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13651);if(r)goto S_14833;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13651);}while(r); } S_14836:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(13652);if(r)goto S_14836;} S_14837:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(13653);if(r)goto S_14837;} do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13654);}while(r); do{ *__INTEGER_ARRAYDESC=*__LONG_CURRENTID; if(!qbevent)break;evnt(13655);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13655);}while(r); do{ goto dl_exit_2163; if(!qbevent)break;evnt(13656);}while(r); } S_14843:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(13658);if(r)goto S_14843;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(13658);}while(r); do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13658);}while(r); }else{ do{ *_FUNC_DIM2_LONG_TRY= 0 ; if(!qbevent)break;evnt(13658);}while(r); } S_14849:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13659);if(r)goto S_14849;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13659);}while(r); } } dl_exit_2163:; } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_add(_FUNC_DIM2_STRING_SCOPE2,qbs_new_txt_len("ARRAY_",6)),_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13662);}while(r); do{ *_FUNC_DIM2_LONG_BITS=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_DIM2_LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(13663);}while(r); S_14856:; if ((((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[array_check((*_FUNC_DIM2_LONG_I)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5])])||new_error){ if(qbevent){evnt(13664);if(r)goto S_14856;} S_14857:; if ((*_FUNC_DIM2_LONG_BITS% 8 )||new_error){ if(qbevent){evnt(13665);if(r)goto S_14857;} do{ *_FUNC_DIM2_LONG_BITS=*_FUNC_DIM2_LONG_BITS+ 8 -(*_FUNC_DIM2_LONG_BITS% 8 ); if(!qbevent)break;evnt(13665);}while(r); } } S_14861:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(13668);if(r)goto S_14861;} S_14862:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_DIM2_STRING_ELEMENTS->len== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(13670);if(r)goto S_14862;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(13671);}while(r); S_14864:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(13671);if(r)goto S_14864;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13671);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2165=-(*_FUNC_DIM2_LONG_BITS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13673);}while(r); S_14869:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13674);if(r)goto S_14869;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13674);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13675);}while(r); S_14873:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(13676);if(r)goto S_14873;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13676);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(13677);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(13680);}while(r); S_14879:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(13681);if(r)goto S_14879;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(13682);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(13683);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(13684);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13686);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_UDTTYPE+*_FUNC_DIM2_LONG_I; if(!qbevent)break;evnt(13690);}while(r); S_14888:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13691);if(r)goto S_14888;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(13691);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); if(!qbevent)break;evnt(13692);}while(r); S_14892:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(13694);if(r)goto S_14892;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(13694);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(13694);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(13696);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(13697);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(13698);}while(r); S_14899:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13699);if(r)goto S_14899;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13699);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13700);}while(r); } do{ *_FUNC_DIM2_LONG_BITS=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_DIM2_LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(13704);}while(r); do{ *_FUNC_DIM2_LONG_BYTES=*_FUNC_DIM2_LONG_BITS/ 8 ; if(!qbevent)break;evnt(13704);}while(r); S_14906:; if ((*_FUNC_DIM2_LONG_BITS% 8 )||new_error){ if(qbevent){evnt(13705);if(r)goto S_14906;} do{ *_FUNC_DIM2_LONG_BYTES=*_FUNC_DIM2_LONG_BYTES+ 1 ; if(!qbevent)break;evnt(13706);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13708);}while(r); S_14910:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13709);if(r)goto S_14910;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2166; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("void *",6),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2166; skip2166: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13709);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(13710);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); if(!qbevent)break;evnt(13711);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_UDTTYPE+*_FUNC_DIM2_LONG_I; if(!qbevent)break;evnt(13712);}while(r); S_14916:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13713);if(r)goto S_14916;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(13714);}while(r); S_14918:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13715);if(r)goto S_14918;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2167; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2167; skip2167: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13715);}while(r); } S_14921:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13716);if(r)goto S_14921;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2168; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2168; skip2168: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13716);}while(r); } S_14924:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13717);if(r)goto S_14924;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2169; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen- 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13741);}while(r); S_14965:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_TYP->len== 0 )))||new_error){ if(qbevent){evnt(13742);if(r)goto S_14965;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected more type information after _UNSIGNED!",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13742);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13742);}while(r); } } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13745);}while(r); S_14971:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_DIM2_STRING_TYP, 6 ),qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(13747);if(r)goto S_14971;} S_14972:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_TYP->len> 6 )))||new_error){ if(qbevent){evnt(13749);if(r)goto S_14972;} S_14973:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_DIM2_STRING_TYP, 9 ),qbs_new_txt_len("STRING * ",9))))||new_error){ if(qbevent){evnt(13750);if(r)goto S_14973;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * number/constant",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13750);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13750);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_C,qbs_right(_FUNC_DIM2_STRING_TYP,_FUNC_DIM2_STRING_TYP->len- 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13752);}while(r); do{ *_FUNC_DIM2_LONG_HASHFOUND= 0 ; if(!qbevent)break;evnt(13755);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_HASHNAME,_FUNC_DIM2_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13756);}while(r); do{ *_FUNC_DIM2_LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(13757);}while(r); do{ *_FUNC_DIM2_LONG_HASHRES=FUNC_HASHFINDREV(_FUNC_DIM2_STRING_HASHNAME,_FUNC_DIM2_LONG_HASHCHKFLAGS,_FUNC_DIM2_LONG_HASHRESFLAGS,_FUNC_DIM2_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13758);}while(r); S_14982:; while((*_FUNC_DIM2_LONG_HASHRES)||new_error){ if(qbevent){evnt(13759);if(r)goto S_14982;} S_14983:; if (((-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_DIM2_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]==*__LONG_SUBFUNCN))|(-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_DIM2_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]== 0 )))||new_error){ if(qbevent){evnt(13760);if(r)goto S_14983;} S_14984:; if ((((int32*)(__ARRAY_LONG_CONSTDEFINED[0]))[array_check((*_FUNC_DIM2_LONG_HASHRESREF)-__ARRAY_LONG_CONSTDEFINED[4],__ARRAY_LONG_CONSTDEFINED[5])])||new_error){ if(qbevent){evnt(13761);if(r)goto S_14984;} do{ *_FUNC_DIM2_LONG_HASHFOUND= 1 ; if(!qbevent)break;evnt(13762);}while(r); do{ goto dl_exit_2181; if(!qbevent)break;evnt(13763);}while(r); } } S_14989:; if ((-(*_FUNC_DIM2_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(13766);if(r)goto S_14989;} do{ *_FUNC_DIM2_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_DIM2_LONG_HASHRESFLAGS,_FUNC_DIM2_LONG_HASHRESREF); if(!qbevent)break;evnt(13766);}while(r); }else{ do{ *_FUNC_DIM2_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(13766);}while(r); } } dl_exit_2181:; S_14995:; if ((*_FUNC_DIM2_LONG_HASHFOUND)||new_error){ if(qbevent){evnt(13768);if(r)goto S_14995;} do{ *_FUNC_DIM2_LONG_I2=*_FUNC_DIM2_LONG_HASHRESREF; if(!qbevent)break;evnt(13769);}while(r); do{ *_FUNC_DIM2_LONG_T=((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_DIM2_LONG_I2)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]; if(!qbevent)break;evnt(13770);}while(r); S_14998:; if ((*_FUNC_DIM2_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(13771);if(r)goto S_14998;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * numeric-constant",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13771);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13771);}while(r); } S_15002:; if ((*_FUNC_DIM2_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(13773);if(r)goto S_15002;} do{ *_FUNC_DIM2_FLOAT_V=((long double*)(__ARRAY_FLOAT_CONSTFLOAT[0]))[array_check((*_FUNC_DIM2_LONG_I2)-__ARRAY_FLOAT_CONSTFLOAT[4],__ARRAY_FLOAT_CONSTFLOAT[5])]; if(!qbevent)break;evnt(13774);}while(r); do{ *_FUNC_DIM2_INTEGER64_V=qbr(*_FUNC_DIM2_FLOAT_V); if(!qbevent)break;evnt(13775);}while(r); do{ *_FUNC_DIM2_UINTEGER64_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(13776);}while(r); }else{ S_15007:; if ((*_FUNC_DIM2_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(13778);if(r)goto S_15007;} do{ *_FUNC_DIM2_UINTEGER64_V=((uint64*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]))[array_check((*_FUNC_DIM2_LONG_I2)-__ARRAY_UINTEGER64_CONSTUINTEGER[4],__ARRAY_UINTEGER64_CONSTUINTEGER[5])]; if(!qbevent)break;evnt(13779);}while(r); do{ *_FUNC_DIM2_INTEGER64_V=*_FUNC_DIM2_UINTEGER64_V; if(!qbevent)break;evnt(13780);}while(r); do{ *_FUNC_DIM2_FLOAT_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(13781);}while(r); }else{ do{ *_FUNC_DIM2_INTEGER64_V=((int64*)(__ARRAY_INTEGER64_CONSTINTEGER[0]))[array_check((*_FUNC_DIM2_LONG_I2)-__ARRAY_INTEGER64_CONSTINTEGER[4],__ARRAY_INTEGER64_CONSTINTEGER[5])]; if(!qbevent)break;evnt(13783);}while(r); do{ *_FUNC_DIM2_FLOAT_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(13784);}while(r); do{ *_FUNC_DIM2_UINTEGER64_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(13785);}while(r); } } S_15017:; if (((-(*_FUNC_DIM2_INTEGER64_V< 1 ))|(-(*_FUNC_DIM2_INTEGER64_V> 9999999999ll )))||new_error){ if(qbevent){evnt(13788);if(r)goto S_15017;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("STRING * out-of-range constant",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13788);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13788);}while(r); } do{ *_FUNC_DIM2_LONG_BYTES=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(13789);}while(r); do{ goto LABEL_CONSTANTLENSTR; if(!qbevent)break;evnt(13790);}while(r); } S_15024:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_DIM2_STRING_C)== 0 )))||new_error){ if(qbevent){evnt(13793);if(r)goto S_15024;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number/Constant expected after *",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13793);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13793);}while(r); } S_15028:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_C->len> 10 )))||new_error){ if(qbevent){evnt(13794);if(r)goto S_15028;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Too many characters in number after *",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13794);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13794);}while(r); } do{ *_FUNC_DIM2_LONG_BYTES=qbr(func_val(_FUNC_DIM2_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13795);}while(r); S_15033:; if ((-(*_FUNC_DIM2_LONG_BYTES== 0 ))||new_error){ if(qbevent){evnt(13796);if(r)goto S_15033;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot create a fixed string of length 0",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13796);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13796);}while(r); } LABEL_CONSTANTLENSTR:; if(qbevent){evnt(13797);r=0;} do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("STRING",6),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len("_",1)),_FUNC_DIM2_STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13798);}while(r); S_15038:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13801);if(r)goto S_15038;} do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(13802);}while(r); S_15040:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(13803);if(r)goto S_15040;} do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_DIM2_STRING_VARNAME,qbs_new_txt_len("$",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13804);}while(r); S_15042:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13805);if(r)goto S_15042;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13805);}while(r); } S_15045:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(13806);if(r)goto S_15045;} S_15046:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(13807);if(r)goto S_15046;} do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13808);}while(r); do{ *__INTEGER_ARRAYDESC=*__LONG_CURRENTID; if(!qbevent)break;evnt(13809);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13809);}while(r); do{ goto dl_exit_2183; if(!qbevent)break;evnt(13810);}while(r); } S_15052:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(13812);if(r)goto S_15052;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(13812);}while(r); do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_DIM2_STRING_VARNAME,qbs_new_txt_len("$",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13812);}while(r); }else{ do{ *_FUNC_DIM2_LONG_TRY= 0 ; if(!qbevent)break;evnt(13812);}while(r); } S_15058:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13813);if(r)goto S_15058;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13813);}while(r); } } dl_exit_2183:; } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_add(_FUNC_DIM2_STRING_SCOPE2,qbs_new_txt_len("ARRAY_",6)),_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13816);}while(r); S_15064:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(13822);if(r)goto S_15064;} S_15065:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_DIM2_STRING_ELEMENTS->len== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(13824);if(r)goto S_15065;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(13825);}while(r); S_15067:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(13825);if(r)goto S_15067;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13825);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,_FUNC_DIM2_LONG_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13827);}while(r); S_15072:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13828);if(r)goto S_15072;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13828);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13829);}while(r); S_15076:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(13830);if(r)goto S_15076;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13830);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(13831);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(13834);}while(r); S_15082:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(13835);if(r)goto S_15082;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(13836);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(13837);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(13838);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13840);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(13844);}while(r); S_15091:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13845);if(r)goto S_15091;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(13845);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); if(!qbevent)break;evnt(13846);}while(r); S_15095:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(13847);if(r)goto S_15095;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(13847);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(13847);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(13849);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(13850);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(540))=*_FUNC_DIM2_LONG_BYTES; if(!qbevent)break;evnt(13851);}while(r); S_15102:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(13852);if(r)goto S_15102;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_add(qbs_new_txt_len("$",1),FUNC_STR2(_FUNC_DIM2_LONG_BYTES))); if(!qbevent)break;evnt(13853);}while(r); } S_15105:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(13855);if(r)goto S_15105;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_add(qbs_new_txt_len("$",1),FUNC_STR2(_FUNC_DIM2_LONG_BYTES))); if(!qbevent)break;evnt(13856);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(13858);}while(r); S_15109:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13859);if(r)goto S_15109;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13859);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13860);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13864);}while(r); S_15115:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13865);if(r)goto S_15115;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2185; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2185; skip2185: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13865);}while(r); } S_15118:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13866);if(r)goto S_15118;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 19 ; if (new_error) goto skip2186; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_FUNC_DIM2_STRING_N),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2186; skip2186: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13866);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(13867);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); if(!qbevent)break;evnt(13868);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(13869);}while(r); S_15124:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13870);if(r)goto S_15124;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(13871);}while(r); S_15126:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13872);if(r)goto S_15126;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2187; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2187; skip2187: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13872);}while(r); } S_15129:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13873);if(r)goto S_15129;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2188; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2188; skip2188: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13873);}while(r); } S_15132:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13874);if(r)goto S_15132;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2189; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_spchr,0,",8)),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2191; skip2191: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13876);}while(r); } S_15141:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13877);if(r)goto S_15141;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2192; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2192; skip2192: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13877);}while(r); } }else{ S_15145:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13879);if(r)goto S_15145;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2193; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2193; skip2193: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13879);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_O,qbs_add(qbs_add(qbs_new_txt_len("(uint8*)mem_static_malloc(",26),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13880);}while(r); S_15149:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13881);if(r)goto S_15149;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2194; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=qbs_new_fixed(",15)),_FUNC_DIM2_STRING_O),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(",0);",4)), 0 , 0 , 1 ); if (new_error) goto skip2194; skip2194: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13881);}while(r); } S_15152:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13882);if(r)goto S_15152;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2195; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memset(",7),_FUNC_DIM2_STRING_N),qbs_new_txt_len("->chr,0,",8)),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2195; skip2195: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13882);}while(r); } S_15155:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13883);if(r)goto S_15155;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2196; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2196; skip2196: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13883);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(540))=*_FUNC_DIM2_LONG_BYTES; if(!qbevent)break;evnt(13885);}while(r); S_15160:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(13886);if(r)goto S_15160;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_add(qbs_new_txt_len("$",1),FUNC_STR2(_FUNC_DIM2_LONG_BYTES))); if(!qbevent)break;evnt(13887);}while(r); } S_15163:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(13889);if(r)goto S_15163;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_add(qbs_new_txt_len("$",1),FUNC_STR2(_FUNC_DIM2_LONG_BYTES))); if(!qbevent)break;evnt(13890);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(13892);}while(r); S_15167:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13893);if(r)goto S_15167;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13893);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13894);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_new_txt_len("STRING_",7),_FUNC_DIM2_STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13898);}while(r); S_15173:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13901);if(r)goto S_15173;} do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(13902);}while(r); S_15175:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(13903);if(r)goto S_15175;} do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_DIM2_STRING_VARNAME,qbs_new_txt_len("$",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13904);}while(r); S_15177:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13905);if(r)goto S_15177;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13905);}while(r); } S_15180:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(13906);if(r)goto S_15180;} S_15181:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(13907);if(r)goto S_15181;} do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13908);}while(r); do{ *__INTEGER_ARRAYDESC=*__LONG_CURRENTID; if(!qbevent)break;evnt(13909);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13909);}while(r); do{ goto dl_exit_2197; if(!qbevent)break;evnt(13910);}while(r); } S_15187:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(13912);if(r)goto S_15187;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(13912);}while(r); do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_DIM2_STRING_VARNAME,qbs_new_txt_len("$",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13912);}while(r); }else{ do{ *_FUNC_DIM2_LONG_TRY= 0 ; if(!qbevent)break;evnt(13912);}while(r); } S_15193:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13913);if(r)goto S_15193;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13913);}while(r); } } dl_exit_2197:; } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_add(_FUNC_DIM2_STRING_SCOPE2,qbs_new_txt_len("ARRAY_",6)),_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13916);}while(r); S_15199:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(13922);if(r)goto S_15199;} S_15200:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_DIM2_STRING_ELEMENTS->len== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(13924);if(r)goto S_15200;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(13925);}while(r); S_15202:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(13925);if(r)goto S_15202;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13925);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2199= -2147483647 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13927);}while(r); S_15207:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13928);if(r)goto S_15207;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13928);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13929);}while(r); S_15211:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(13930);if(r)goto S_15211;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13930);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(13931);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(13934);}while(r); S_15217:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(13935);if(r)goto S_15217;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(13936);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(13937);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(13938);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13940);}while(r); } } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); if(!qbevent)break;evnt(13944);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(13945);}while(r); S_15227:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13946);if(r)goto S_15227;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(13946);}while(r); } S_15230:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(13947);if(r)goto S_15230;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(13947);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(13947);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(13949);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(13950);}while(r); S_15236:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(13951);if(r)goto S_15236;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(13952);}while(r); } S_15239:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(13954);if(r)goto S_15239;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(13955);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(13957);}while(r); S_15243:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13958);if(r)goto S_15243;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13958);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13959);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13963);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(13964);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); if(!qbevent)break;evnt(13965);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(13966);}while(r); S_15252:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13967);if(r)goto S_15252;} S_15253:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13968);if(r)goto S_15253;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2200; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2200; skip2200: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13968);}while(r); } S_15256:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13969);if(r)goto S_15256;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2201; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len(")",1)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=qbs_new_cmem(0,0);",19)), 0 , 0 , 1 ); if (new_error) goto skip2201; skip2201: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13969);}while(r); } do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(13970);}while(r); }else{ S_15261:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13972);if(r)goto S_15261;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2202; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2202; skip2202: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13972);}while(r); } S_15264:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13973);if(r)goto S_15264;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2203; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len(")",1)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=qbs_new(0,0);",14)), 0 , 0 , 1 ); if (new_error) goto skip2203; skip2203: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13973);}while(r); } } S_15268:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(13975);if(r)goto S_15268;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 19 ; if (new_error) goto skip2204; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_FUNC_DIM2_STRING_N),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2204; skip2204: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13975);}while(r); } S_15271:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(13976);if(r)goto S_15271;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(13977);}while(r); } S_15274:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(13979);if(r)goto S_15274;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(13980);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(13982);}while(r); S_15278:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13983);if(r)goto S_15278;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13983);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(13984);}while(r); } S_15283:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_DIM2_STRING_TYP, 4 ),qbs_new_txt_len("_BIT",4))))||new_error){ if(qbevent){evnt(13987);if(r)goto S_15283;} S_15284:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_TYP->len> 4 )))||new_error){ if(qbevent){evnt(13988);if(r)goto S_15284;} S_15285:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_DIM2_STRING_TYP, 7 ),qbs_new_txt_len("_BIT * ",7))))||new_error){ if(qbevent){evnt(13989);if(r)goto S_15285;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected _BIT * number",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13989);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13989);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_C,qbs_right(_FUNC_DIM2_STRING_TYP,_FUNC_DIM2_STRING_TYP->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13990);}while(r); S_15290:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_DIM2_STRING_C)== 0 )))||new_error){ if(qbevent){evnt(13991);if(r)goto S_15290;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number expected after *",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13991);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13991);}while(r); } S_15294:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_C->len> 2 )))||new_error){ if(qbevent){evnt(13992);if(r)goto S_15294;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Too many characters in number after *",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13992);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13992);}while(r); } do{ *_FUNC_DIM2_LONG_BITS=qbr(func_val(_FUNC_DIM2_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13993);}while(r); S_15299:; if ((-(*_FUNC_DIM2_LONG_BITS== 0 ))||new_error){ if(qbevent){evnt(13994);if(r)goto S_15299;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot create a bit variable of size 0 bits",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13994);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13994);}while(r); } S_15303:; if ((-(*_FUNC_DIM2_LONG_BITS> 57 ))||new_error){ if(qbevent){evnt(13995);if(r)goto S_15303;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot create a bit variable of size > 24 bits",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13995);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13995);}while(r); } }else{ do{ *_FUNC_DIM2_LONG_BITS= 1 ; if(!qbevent)break;evnt(13997);}while(r); } S_15310:; if ((-(*_FUNC_DIM2_LONG_BITS<= 32 ))||new_error){ if(qbevent){evnt(13999);if(r)goto S_15310;} do{ qbs_set(_FUNC_DIM2_STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13999);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_CT,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13999);}while(r); } S_15315:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14000);if(r)goto S_15315;} do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_new_txt_len("U",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14000);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_CT,qbs_add(qbs_new_txt_len("u",1),_FUNC_DIM2_STRING_CT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14000);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("BIT",3)),FUNC_STR2(_FUNC_DIM2_LONG_BITS)),qbs_new_txt_len("_",1)),_FUNC_DIM2_STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14001);}while(r); S_15320:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14004);if(r)goto S_15320;} do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(14005);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_CMPS,_FUNC_DIM2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14006);}while(r); S_15323:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14006);if(r)goto S_15323;} do{ qbs_set(_FUNC_DIM2_STRING_CMPS,qbs_add(_FUNC_DIM2_STRING_CMPS,qbs_new_txt_len("~",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14006);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_CMPS,qbs_add(qbs_add(_FUNC_DIM2_STRING_CMPS,qbs_new_txt_len("`",1)),FUNC_STR2(_FUNC_DIM2_LONG_BITS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14007);}while(r); S_15327:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14008);if(r)goto S_15327;} do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_CMPS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14009);}while(r); S_15329:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14010);if(r)goto S_15329;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14010);}while(r); } S_15332:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(14011);if(r)goto S_15332;} S_15333:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(14012);if(r)goto S_15333;} do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14013);}while(r); do{ *__INTEGER_ARRAYDESC=*__LONG_CURRENTID; if(!qbevent)break;evnt(14014);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14014);}while(r); do{ goto dl_exit_2208; if(!qbevent)break;evnt(14015);}while(r); } S_15339:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(14017);if(r)goto S_15339;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(14017);}while(r); do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_CMPS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14017);}while(r); }else{ do{ *_FUNC_DIM2_LONG_TRY= 0 ; if(!qbevent)break;evnt(14017);}while(r); } S_15345:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14018);if(r)goto S_15345;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14018);}while(r); } } dl_exit_2208:; } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(qbs_add(_FUNC_DIM2_STRING_SCOPE2,qbs_new_txt_len("ARRAY_",6)),_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14021);}while(r); S_15351:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14027);if(r)goto S_15351;} S_15352:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_DIM2_STRING_ELEMENTS->len== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14029);if(r)goto S_15352;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14030);}while(r); S_15354:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14030);if(r)goto S_15354;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14030);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2210=-(*_FUNC_DIM2_LONG_BITS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14032);}while(r); S_15359:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14033);if(r)goto S_15359;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14033);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14034);}while(r); S_15363:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14035);if(r)goto S_15363;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14035);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14036);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14039);}while(r); S_15369:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14040);if(r)goto S_15369;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14041);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14042);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14043);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14045);}while(r); } } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); if(!qbevent)break;evnt(14049);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_BITTYPE- 1 +*_FUNC_DIM2_LONG_BITS; if(!qbevent)break;evnt(14050);}while(r); S_15379:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14051);if(r)goto S_15379;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14051);}while(r); } S_15382:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14052);if(r)goto S_15382;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14052);}while(r); } S_15385:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14053);if(r)goto S_15385;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14053);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14053);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14055);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14056);}while(r); S_15391:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(14057);if(r)goto S_15391;} S_15392:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14058);if(r)goto S_15392;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_add(qbs_new_txt_len("~`",2),FUNC_STR2(_FUNC_DIM2_LONG_BITS))); if(!qbevent)break;evnt(14058);}while(r); }else{ do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_add(qbs_new_txt_len("`",1),FUNC_STR2(_FUNC_DIM2_LONG_BITS))); if(!qbevent)break;evnt(14058);}while(r); } } S_15398:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(14060);if(r)goto S_15398;} S_15399:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14061);if(r)goto S_15399;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_add(qbs_new_txt_len("~`",2),FUNC_STR2(_FUNC_DIM2_LONG_BITS))); if(!qbevent)break;evnt(14061);}while(r); }else{ do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_add(qbs_new_txt_len("`",1),FUNC_STR2(_FUNC_DIM2_LONG_BITS))); if(!qbevent)break;evnt(14061);}while(r); } } do{ SUB_REGID(); if(!qbevent)break;evnt(14063);}while(r); S_15406:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14064);if(r)goto S_15406;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14064);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14065);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14068);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2211; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2211; skip2211: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14069);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2212; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2212; skip2212: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14070);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2213; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=4;",11), 0 , 0 , 1 ); if (new_error) goto skip2213; skip2213: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14071);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2214; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14120);if(r)goto S_15484;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14121);}while(r); S_15486:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14121);if(r)goto S_15486;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14121);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2220= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14123);}while(r); S_15491:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14124);if(r)goto S_15491;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14124);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14125);}while(r); S_15495:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14126);if(r)goto S_15495;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14126);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14127);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14130);}while(r); S_15501:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14131);if(r)goto S_15501;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14132);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14133);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14134);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14136);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_BYTETYPE; if(!qbevent)break;evnt(14140);}while(r); S_15510:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14140);if(r)goto S_15510;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14140);}while(r); } S_15513:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14141);if(r)goto S_15513;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14141);}while(r); } S_15516:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14142);if(r)goto S_15516;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14142);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14142);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14144);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14145);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14147);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14148);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_BYTETYPE; if(!qbevent)break;evnt(14149);}while(r); S_15526:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14149);if(r)goto S_15526;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14149);}while(r); } S_15529:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14150);if(r)goto S_15529;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2221; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2221; skip2221: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14150);}while(r); } S_15532:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14151);if(r)goto S_15532;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2222; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2222; skip2222: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14151);}while(r); } S_15535:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14152);if(r)goto S_15535;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14153);}while(r); S_15537:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14154);if(r)goto S_15537;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2223; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=1;",11), 0 , 0 , 1 ); if (new_error) goto skip2223; skip2223: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14154);}while(r); } S_15540:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14155);if(r)goto S_15540;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2224; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2224; skip2224: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14155);}while(r); } S_15543:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14156);if(r)goto S_15543;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2225; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14201);if(r)goto S_15618;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14202);}while(r); S_15620:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14202);if(r)goto S_15620;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14202);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2231= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14204);}while(r); S_15625:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14205);if(r)goto S_15625;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14205);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14206);}while(r); S_15629:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14207);if(r)goto S_15629;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14207);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14208);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14211);}while(r); S_15635:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14212);if(r)goto S_15635;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14213);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14214);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14215);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14217);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(14222);}while(r); S_15644:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14222);if(r)goto S_15644;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14222);}while(r); } S_15647:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14223);if(r)goto S_15647;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14223);}while(r); } S_15650:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14224);if(r)goto S_15650;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14224);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14224);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14226);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14227);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14229);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14230);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(14231);}while(r); S_15660:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14231);if(r)goto S_15660;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14231);}while(r); } S_15663:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14232);if(r)goto S_15663;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2232; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2232; skip2232: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14232);}while(r); } S_15666:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14233);if(r)goto S_15666;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2233; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2233; skip2233: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14233);}while(r); } S_15669:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14234);if(r)goto S_15669;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14235);}while(r); S_15671:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14236);if(r)goto S_15671;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2234; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=2;",11), 0 , 0 , 1 ); if (new_error) goto skip2234; skip2234: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14236);}while(r); } S_15674:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14237);if(r)goto S_15674;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2235; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2235; skip2235: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14237);}while(r); } S_15677:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14238);if(r)goto S_15677;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2236; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14289);if(r)goto S_15752;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14290);}while(r); S_15754:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14290);if(r)goto S_15754;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14290);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2242=*__LONG_OS_BITS/ 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14292);}while(r); S_15759:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14293);if(r)goto S_15759;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14293);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14294);}while(r); S_15763:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14295);if(r)goto S_15763;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14295);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14296);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14299);}while(r); S_15769:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14300);if(r)goto S_15769;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14301);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14302);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14303);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14305);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(14309);}while(r); S_15778:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14309);if(r)goto S_15778;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14309);}while(r); } S_15781:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14310);if(r)goto S_15781;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14310);}while(r); } S_15784:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14311);if(r)goto S_15784;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14311);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14311);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14313);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14314);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14316);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14317);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(14318);}while(r); S_15794:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14318);if(r)goto S_15794;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14318);}while(r); } S_15797:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14319);if(r)goto S_15797;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2243; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2243; skip2243: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14319);}while(r); } S_15800:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14320);if(r)goto S_15800;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2244; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2244; skip2244: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14320);}while(r); } S_15803:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14321);if(r)goto S_15803;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14322);}while(r); S_15805:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14323);if(r)goto S_15805;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2245; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(&(pass2246=*__LONG_OS_BITS/ 8 ))),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2245; skip2245: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14323);}while(r); } S_15808:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14324);if(r)goto S_15808;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2247; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2247; skip2247: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14324);}while(r); } S_15811:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14325);if(r)goto S_15811;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2248; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14373);if(r)goto S_15886;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14374);}while(r); S_15888:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14374);if(r)goto S_15888;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14374);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2255= 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14376);}while(r); S_15893:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14377);if(r)goto S_15893;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14377);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14378);}while(r); S_15897:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14379);if(r)goto S_15897;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14379);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14380);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14383);}while(r); S_15903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14384);if(r)goto S_15903;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14385);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14386);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14387);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14389);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_LONGTYPE; if(!qbevent)break;evnt(14393);}while(r); S_15912:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14393);if(r)goto S_15912;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14393);}while(r); } S_15915:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14394);if(r)goto S_15915;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14394);}while(r); } S_15918:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14395);if(r)goto S_15918;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14395);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14395);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14397);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14398);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14400);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14401);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_LONGTYPE; if(!qbevent)break;evnt(14402);}while(r); S_15928:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14402);if(r)goto S_15928;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14402);}while(r); } S_15931:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14403);if(r)goto S_15931;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2256; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2256; skip2256: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14403);}while(r); } S_15934:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14404);if(r)goto S_15934;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2257; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2257; skip2257: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14404);}while(r); } S_15937:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14405);if(r)goto S_15937;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14406);}while(r); S_15939:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14407);if(r)goto S_15939;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2258; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=4;",11), 0 , 0 , 1 ); if (new_error) goto skip2258; skip2258: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14407);}while(r); } S_15942:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14408);if(r)goto S_15942;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2259; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2259; skip2259: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14408);}while(r); } S_15945:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14409);if(r)goto S_15945;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2260; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14457);if(r)goto S_16020;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14458);}while(r); S_16022:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14458);if(r)goto S_16022;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14458);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2266= 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14460);}while(r); S_16027:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14461);if(r)goto S_16027;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14461);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14462);}while(r); S_16031:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14463);if(r)goto S_16031;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14463);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14464);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14467);}while(r); S_16037:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14468);if(r)goto S_16037;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14469);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14470);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14471);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14473);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(14477);}while(r); S_16046:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14477);if(r)goto S_16046;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14477);}while(r); } S_16049:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14478);if(r)goto S_16049;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14478);}while(r); } S_16052:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14479);if(r)goto S_16052;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14479);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14479);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14481);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14482);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14484);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14485);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(14486);}while(r); S_16062:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14486);if(r)goto S_16062;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14486);}while(r); } S_16065:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14487);if(r)goto S_16065;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2267; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2267; skip2267: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14487);}while(r); } S_16068:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14488);if(r)goto S_16068;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2268; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2268; skip2268: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14488);}while(r); } S_16071:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14489);if(r)goto S_16071;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14490);}while(r); S_16073:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14491);if(r)goto S_16073;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2269; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=8;",11), 0 , 0 , 1 ); if (new_error) goto skip2269; skip2269: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14491);}while(r); } S_16076:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14492);if(r)goto S_16076;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2270; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2270; skip2270: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14492);}while(r); } S_16079:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14493);if(r)goto S_16079;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2271; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14541);if(r)goto S_16150;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14542);}while(r); S_16152:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14542);if(r)goto S_16152;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14542);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2277= 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14544);}while(r); S_16157:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14545);if(r)goto S_16157;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14545);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14546);}while(r); S_16161:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14547);if(r)goto S_16161;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14547);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14548);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14551);}while(r); S_16167:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14552);if(r)goto S_16167;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14553);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14554);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14555);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14557);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(14561);}while(r); S_16176:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14562);if(r)goto S_16176;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14562);}while(r); } S_16179:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14563);if(r)goto S_16179;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14563);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14563);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14565);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14566);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14568);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14569);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(14570);}while(r); S_16189:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14571);if(r)goto S_16189;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2278; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2278; skip2278: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14571);}while(r); } S_16192:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14572);if(r)goto S_16192;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2279; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2279; skip2279: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14572);}while(r); } S_16195:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14573);if(r)goto S_16195;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14574);}while(r); S_16197:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14575);if(r)goto S_16197;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2280; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=4;",11), 0 , 0 , 1 ); if (new_error) goto skip2280; skip2280: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14575);}while(r); } S_16200:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14576);if(r)goto S_16200;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2281; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2281; skip2281: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14576);}while(r); } S_16203:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14577);if(r)goto S_16203;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2282; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14623);if(r)goto S_16262;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14624);}while(r); S_16264:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14624);if(r)goto S_16264;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14624);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2288= 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14626);}while(r); S_16269:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14627);if(r)goto S_16269;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14627);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14628);}while(r); S_16273:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14629);if(r)goto S_16273;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14629);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14630);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14633);}while(r); S_16279:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14634);if(r)goto S_16279;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14635);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14636);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14637);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14639);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(14643);}while(r); S_16288:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14644);if(r)goto S_16288;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14644);}while(r); } S_16291:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14645);if(r)goto S_16291;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14645);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14645);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14647);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14648);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14650);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14651);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(14652);}while(r); S_16301:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14653);if(r)goto S_16301;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2289; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2289; skip2289: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14653);}while(r); } S_16304:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14654);if(r)goto S_16304;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2290; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2290; skip2290: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14654);}while(r); } S_16307:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14655);if(r)goto S_16307;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14656);}while(r); S_16309:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14657);if(r)goto S_16309;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2291; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=8;",11), 0 , 0 , 1 ); if (new_error) goto skip2291; skip2291: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14657);}while(r); } S_16312:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14658);if(r)goto S_16312;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2292; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2292; skip2292: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14658);}while(r); } S_16315:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14659);if(r)goto S_16315;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2293; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14705);if(r)goto S_16374;} do{ *__LONG_E=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]; if(!qbevent)break;evnt(14706);}while(r); S_16376:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14706);if(r)goto S_16376;} do{ qbs_set(_FUNC_DIM2_STRING_ELEMENTS,qbs_add(_FUNC_DIM2_STRING_ELEMENTS,FUNC_STR2(__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14706);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2299= 32 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14708);}while(r); S_16381:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14709);if(r)goto S_16381;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14709);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_L,qbs_add(qbs_add(_FUNC_DIM2_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14710);}while(r); S_16385:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14711);if(r)goto S_16385;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14711);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14712);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14715);}while(r); S_16391:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14716);if(r)goto S_16391;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14717);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2844))=*__LONG_GLINKID; if(!qbevent)break;evnt(14718);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2848))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14719);}while(r); }else{ do{ *_FUNC_DIM2_LONG_NUME=qbr(func_val(_FUNC_DIM2_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14721);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(14725);}while(r); S_16400:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14726);if(r)goto S_16400;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14726);}while(r); } S_16403:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14727);if(r)goto S_16403;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14727);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14727);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14729);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); if(!qbevent)break;evnt(14730);}while(r); }else{ do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_add(_FUNC_DIM2_STRING_SCOPE2,_FUNC_DIM2_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14732);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14733);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(14734);}while(r); S_16413:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14735);if(r)goto S_16413;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2300; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_CT,qbs_new_txt_len(" *",2)),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2300; skip2300: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14735);}while(r); } S_16416:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14736);if(r)goto S_16416;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2301; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2301; skip2301: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14736);}while(r); } S_16419:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14737);if(r)goto S_16419;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14738);}while(r); S_16421:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14739);if(r)goto S_16421;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2302; sub_file_print(tmp_fileno,qbs_new_txt_len("cmem_sp-=32;",12), 0 , 0 , 1 ); if (new_error) goto skip2302; skip2302: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14739);}while(r); } S_16424:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14740);if(r)goto S_16424;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2303; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_DIM2_STRING_N,qbs_new_txt_len("=(",2)),_FUNC_DIM2_STRING_CT),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2303; skip2303: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14740);}while(r); } S_16427:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14741);if(r)goto S_16427;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2304; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_sp=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_DIM2_LONG_DIM2; } qbs* FUNC_UDTREFERENCE(qbs*_FUNC_UDTREFERENCE_STRING_O,qbs*_FUNC_UDTREFERENCE_STRING_A,int32*_FUNC_UDTREFERENCE_LONG_TYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data27.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_UDTREFERENCE_STRING_OBAK,_FUNC_UDTREFERENCE_STRING_O); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14785);}while(r); do{ qbs_set(_FUNC_UDTREFERENCE_STRING_R,qbs_add(FUNC_STR2(__LONG_CURRENTID),__STRING1_SP3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14790);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_O= 0 ; if(!qbevent)break;evnt(14793);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_INCMEM= 0 ; if(!qbevent)break;evnt(14795);}while(r); S_16473:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(14796);if(r)goto S_16473;} do{ *_FUNC_UDTREFERENCE_LONG_U=*(int32*)(((char*)__UDT_ID)+(536))& 511 ; if(!qbevent)break;evnt(14797);}while(r); S_16475:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(14798);if(r)goto S_16475;} do{ *_FUNC_UDTREFERENCE_LONG_INCMEM= 1 ; if(!qbevent)break;evnt(14798);}while(r); } }else{ do{ *_FUNC_UDTREFERENCE_LONG_U=*(int32*)(((char*)__UDT_ID)+(512))& 511 ; if(!qbevent)break;evnt(14800);}while(r); S_16480:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(14801);if(r)goto S_16480;} do{ *_FUNC_UDTREFERENCE_LONG_INCMEM= 1 ; if(!qbevent)break;evnt(14801);}while(r); } } do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(14803);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_N=FUNC_NUMELEMENTS(_FUNC_UDTREFERENCE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14805);}while(r); S_16486:; if ((-(*_FUNC_UDTREFERENCE_LONG_N== 0 ))||new_error){ if(qbevent){evnt(14806);if(r)goto S_16486;} do{ goto LABEL_FULLUDT; if(!qbevent)break;evnt(14806);}while(r); } do{ *_FUNC_UDTREFERENCE_LONG_I= 1 ; if(!qbevent)break;evnt(14808);}while(r); LABEL_UDTFINDELENEXT:; if(qbevent){evnt(14809);r=0;} S_16490:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(_FUNC_UDTREFERENCE_STRING_A,_FUNC_UDTREFERENCE_LONG_I),qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(14810);if(r)goto S_16490;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected .",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14810);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14810);}while(r); } do{ *_FUNC_UDTREFERENCE_LONG_I=*_FUNC_UDTREFERENCE_LONG_I+ 1 ; if(!qbevent)break;evnt(14811);}while(r); do{ qbs_set(_FUNC_UDTREFERENCE_STRING_N,FUNC_GETELEMENT(_FUNC_UDTREFERENCE_STRING_A,_FUNC_UDTREFERENCE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14812);}while(r); do{ qbs_set(_FUNC_UDTREFERENCE_STRING_NSYM,FUNC_REMOVESYMBOL(_FUNC_UDTREFERENCE_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14813);}while(r); S_16497:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_UDTREFERENCE_STRING_NSYM->len))||new_error){ if(qbevent){evnt(14813);if(r)goto S_16497;} do{ *_FUNC_UDTREFERENCE_LONG_NTYP=FUNC_TYPNAME2TYP(_FUNC_UDTREFERENCE_STRING_NSYM); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14813);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_NTYPSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(14813);}while(r); } S_16501:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14814);if(r)goto S_16501;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14814);}while(r); } S_16504:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_UDTREFERENCE_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14816);if(r)goto S_16504;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected .elementname",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14816);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14816);}while(r); } LABEL_UDTFINDELE:; if(qbevent){evnt(14817);r=0;} S_16508:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(14818);if(r)goto S_16508;} do{ *__LONG_E=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_FUNC_UDTREFERENCE_LONG_U)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(14818);}while(r); }else{ do{ *__LONG_E=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(14818);}while(r); } S_16513:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(14819);if(r)goto S_16513;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Element not defined",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14819);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14819);}while(r); } do{ qbs_set(_FUNC_UDTREFERENCE_STRING_N2,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[(array_check((*__LONG_E)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14820);}while(r); S_16518:; if ((((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[array_check((*__LONG_E)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5])])||new_error){ if(qbevent){evnt(14821);if(r)goto S_16518;} S_16519:; if ((*_FUNC_UDTREFERENCE_LONG_O% 8 )||new_error){ if(qbevent){evnt(14822);if(r)goto S_16519;} do{ *_FUNC_UDTREFERENCE_LONG_O=*_FUNC_UDTREFERENCE_LONG_O+( 8 -(*_FUNC_UDTREFERENCE_LONG_O% 8 )); if(!qbevent)break;evnt(14822);}while(r); } } S_16523:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_UDTREFERENCE_STRING_N,_FUNC_UDTREFERENCE_STRING_N2)))||new_error){ if(qbevent){evnt(14825);if(r)goto S_16523;} do{ *_FUNC_UDTREFERENCE_LONG_O=*_FUNC_UDTREFERENCE_LONG_O+((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]; if(!qbevent)break;evnt(14827);}while(r); do{ goto LABEL_UDTFINDELE; if(!qbevent)break;evnt(14828);}while(r); } S_16527:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_UDTREFERENCE_STRING_NSYM->len))||new_error){ if(qbevent){evnt(14832);if(r)goto S_16527;} S_16528:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(14834);if(r)goto S_16528;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid symbol after user defined type",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14834);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14834);}while(r); } S_16532:; if (((-(*_FUNC_UDTREFERENCE_LONG_NTYP!=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]))|(-(*_FUNC_UDTREFERENCE_LONG_NTYPSIZE!=((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])])))||new_error){ if(qbevent){evnt(14835);if(r)goto S_16532;} S_16533:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_UDTREFERENCE_STRING_NSYM,qbs_new_txt_len("$",1)))&((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)!= 0 )))))||new_error){ if(qbevent){evnt(14836);if(r)goto S_16533;} do{ goto LABEL_CORRECTSYMBOL; if(!qbevent)break;evnt(14836);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Incorrect symbol after element name",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14837);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14837);}while(r); } } LABEL_CORRECTSYMBOL:; if(qbevent){evnt(14840);r=0;} S_16540:; if ((-(*_FUNC_UDTREFERENCE_LONG_I!=*_FUNC_UDTREFERENCE_LONG_N))||new_error){ if(qbevent){evnt(14843);if(r)goto S_16540;} S_16541:; if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(14844);if(r)goto S_16541;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected user defined type",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14844);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14844);}while(r); } do{ *_FUNC_UDTREFERENCE_LONG_U=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 ; if(!qbevent)break;evnt(14845);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(14846);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_I=*_FUNC_UDTREFERENCE_LONG_I+ 1 ; if(!qbevent)break;evnt(14847);}while(r); do{ goto LABEL_UDTFINDELENEXT; if(!qbevent)break;evnt(14848);}while(r); } S_16550:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(14852);if(r)goto S_16550;} do{ *_FUNC_UDTREFERENCE_LONG_U=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 ; if(!qbevent)break;evnt(14853);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(14854);}while(r); } LABEL_FULLUDT:; if(qbevent){evnt(14857);r=0;} do{ qbs_set(_FUNC_UDTREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_UDTREFERENCE_STRING_R,FUNC_STR2(_FUNC_UDTREFERENCE_LONG_U)),__STRING1_SP3),FUNC_STR2(__LONG_E)),__STRING1_SP3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14859);}while(r); S_16555:; if ((*_FUNC_UDTREFERENCE_LONG_O% 8 )||new_error){ if(qbevent){evnt(14861);if(r)goto S_16555;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("QB64 cannot handle bit offsets within user defined types yet",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14861);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14861);}while(r); } do{ *_FUNC_UDTREFERENCE_LONG_O=*_FUNC_UDTREFERENCE_LONG_O/ 8 ; if(!qbevent)break;evnt(14862);}while(r); S_16560:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_UDTREFERENCE_STRING_O,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14864);if(r)goto S_16560;} S_16561:; if ((-(*_FUNC_UDTREFERENCE_LONG_O!= 0 ))||new_error){ if(qbevent){evnt(14865);if(r)goto S_16561;} do{ qbs_set(_FUNC_UDTREFERENCE_STRING_O,qbs_add(qbs_add(_FUNC_UDTREFERENCE_STRING_O,qbs_new_txt_len("+",1)),FUNC_STR2(_FUNC_UDTREFERENCE_LONG_O))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14866);}while(r); } }else{ do{ qbs_set(_FUNC_UDTREFERENCE_STRING_O,FUNC_STR2(_FUNC_UDTREFERENCE_LONG_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14869);}while(r); } do{ qbs_set(_FUNC_UDTREFERENCE_STRING_R,qbs_add(_FUNC_UDTREFERENCE_STRING_R,_FUNC_UDTREFERENCE_STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14872);}while(r); do{ qbs_set(_FUNC_UDTREFERENCE_STRING_UDTREFERENCE,_FUNC_UDTREFERENCE_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14874);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_TYP=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]+*__LONG_ISUDT+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(14875);}while(r); S_16570:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(14878);if(r)goto S_16570;} do{ *_FUNC_UDTREFERENCE_LONG_TYP=*_FUNC_UDTREFERENCE_LONG_U+*__LONG_ISUDT+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(14879);}while(r); } S_16573:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_UDTREFERENCE_STRING_OBAK,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14882);if(r)goto S_16573;} do{ *_FUNC_UDTREFERENCE_LONG_TYP=*_FUNC_UDTREFERENCE_LONG_TYP+*__LONG_ISARRAY; if(!qbevent)break;evnt(14882);}while(r); } S_16576:; if ((*_FUNC_UDTREFERENCE_LONG_INCMEM)||new_error){ if(qbevent){evnt(14883);if(r)goto S_16576;} do{ *_FUNC_UDTREFERENCE_LONG_TYP=*_FUNC_UDTREFERENCE_LONG_TYP+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14883);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free27.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_UDTREFERENCE_STRING_UDTREFERENCE);return _FUNC_UDTREFERENCE_STRING_UDTREFERENCE; } qbs* FUNC_EVALUATE(qbs*_FUNC_EVALUATE_STRING_A2,int32*_FUNC_EVALUATE_LONG_TYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data28.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if (_FUNC_EVALUATE_ARRAY_STRING_BLOCK[2]&2){ error(10); }else{ if (_FUNC_EVALUATE_ARRAY_STRING_BLOCK[2]&1){ error(10); }else{ _FUNC_EVALUATE_ARRAY_STRING_BLOCK[4]= 0 ; _FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]=( 1000 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4]+1; _FUNC_EVALUATE_ARRAY_STRING_BLOCK[6]=1; _FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]=(ptrszint)malloc(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]*8); if (!_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]) error(257); _FUNC_EVALUATE_ARRAY_STRING_BLOCK[2]|=1; tmp_long=_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]; if (_FUNC_EVALUATE_ARRAY_STRING_BLOCK[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(14890);}while(r); do{ if (_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[2]&2){ error(10); }else{ if (_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[2]&1){ error(10); }else{ _FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4]= 0 ; _FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]=( 1000 )-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4]+1; _FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[6]=1; if (_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[2]&4){ _FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]*2); memset((void*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]),0,_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]*2); }else{ _FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]=(ptrszint)calloc(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]*2,1); if (!_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]) error(257); } _FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[2]|=1; } } if(!qbevent)break;evnt(14891);}while(r); do{ if (_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[2]&2){ error(10); }else{ if (_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[2]&1){ error(10); }else{ _FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4]= 0 ; _FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]=( 1000 )-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4]+1; _FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[6]=1; if (_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[2]&4){ _FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]*4); memset((void*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]),0,_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]*4); }else{ _FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]=(ptrszint)calloc(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]*4,1); if (!_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]) error(257); } _FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[2]|=1; } } if(!qbevent)break;evnt(14892);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14895);}while(r); do{ *_FUNC_EVALUATE_LONG_TYP= -1 ; if(!qbevent)break;evnt(14896);}while(r); S_16584:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(14898);if(r)goto S_16584;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2313; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("evaluating:[",12),_FUNC_EVALUATE_STRING_A2),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip2313; skip2313: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14898);}while(r); } do{ *_FUNC_EVALUATE_LONG_BLOCKN= 0 ; if(!qbevent)break;evnt(14907);}while(r); do{ *_FUNC_EVALUATE_LONG_N=FUNC_NUMELEMENTS(_FUNC_EVALUATE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14908);}while(r); do{ *_FUNC_EVALUATE_LONG_B= 0 ; if(!qbevent)break;evnt(14909);}while(r); S_16590:; fornext_value2315= 1 ; fornext_finalvalue2315=*_FUNC_EVALUATE_LONG_N; fornext_step2315= 1 ; if (fornext_step2315<0) fornext_step_negative2315=1; else fornext_step_negative2315=0; if (new_error) goto fornext_error2315; goto fornext_entrylabel2315; while(1){ fornext_value2315=fornext_step2315+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2315: *_FUNC_EVALUATE_LONG_I=fornext_value2315; if (fornext_step_negative2315){ if (fornext_value2315fornext_finalvalue2315) break; } fornext_error2315:; if(qbevent){evnt(14910);if(r)goto S_16590;} LABEL_REEVALUATE:; if(qbevent){evnt(14912);r=0;} do{ qbs_set(_FUNC_EVALUATE_STRING_L,FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14917);}while(r); S_16592:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(14920);if(r)goto S_16592;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2316; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("#*#*#* reevaluating:",20),_FUNC_EVALUATE_STRING_L), 0 , 1 , 0 ); if (new_error) goto skip2316; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_I)), 1 , 0 , 1 ); if (new_error) goto skip2316; skip2316: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14920);}while(r); } S_16595:; if ((-(*_FUNC_EVALUATE_LONG_I!=*_FUNC_EVALUATE_LONG_N))||new_error){ if(qbevent){evnt(14923);if(r)goto S_16595;} do{ qbs_set(_FUNC_EVALUATE_STRING_NEXTL,FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,&(pass2317=*_FUNC_EVALUATE_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14923);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATE_STRING_NEXTL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14923);}while(r); } S_16600:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(14927);if(r)goto S_16600;} S_16601:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(14929);if(r)goto S_16601;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2318; sub_file_print(tmp_fileno,_FUNC_EVALUATE_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2318; skip2318: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14929);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_L2,_FUNC_EVALUATE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14931);}while(r); S_16605:; fornext_value2320= 1 ; fornext_finalvalue2320= 4 ; fornext_step2320= 1 ; if (fornext_step2320<0) fornext_step_negative2320=1; else fornext_step_negative2320=0; if (new_error) goto fornext_error2320; goto fornext_entrylabel2320; while(1){ fornext_value2320=fornext_step2320+(*_FUNC_EVALUATE_LONG_TRY_METHOD); fornext_entrylabel2320: *_FUNC_EVALUATE_LONG_TRY_METHOD=fornext_value2320; if (fornext_step_negative2320){ if (fornext_value2320fornext_finalvalue2320) break; } fornext_error2320:; if(qbevent){evnt(14932);if(r)goto S_16605;} do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14933);}while(r); S_16607:; if (((-(*_FUNC_EVALUATE_LONG_TRY_METHOD== 2 ))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD== 4 )))||new_error){ if(qbevent){evnt(14934);if(r)goto S_16607;} S_16608:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14935);if(r)goto S_16608;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14935);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_DTYP,FUNC_REMOVESYMBOL(_FUNC_EVALUATE_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14936);}while(r); S_16612:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14936);if(r)goto S_16612;} do{ qbs_set(_FUNC_EVALUATE_STRING_DTYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14936);}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(14936);}while(r); } S_16616:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_EVALUATE_STRING_DTYP->len== 0 )))||new_error){ if(qbevent){evnt(14937);if(r)goto S_16616;} S_16617:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_EVALUATE_STRING_L)== 0 )))||new_error){ if(qbevent){evnt(14938);if(r)goto S_16617;} S_16618:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISVALIDVARIABLE(_FUNC_EVALUATE_STRING_L)))||new_error){ if(qbevent){evnt(14939);if(r)goto S_16618;} S_16619:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATE_STRING_L, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(14940);if(r)goto S_16619;} do{ *_FUNC_EVALUATE_LONG_V= 27 ; if(!qbevent)break;evnt(14940);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_V=qbs_asc(qbs_ucase(_FUNC_EVALUATE_STRING_L))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14940);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_L,qbs_add(_FUNC_EVALUATE_STRING_L,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*_FUNC_EVALUATE_LONG_V)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14941);}while(r); } } }else{ do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14945);}while(r); } } do{ *_FUNC_EVALUATE_LONG_TRY=FUNC_FINDID(_FUNC_EVALUATE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14948);}while(r); S_16632:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14949);if(r)goto S_16632;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14949);}while(r); } S_16635:; while((*_FUNC_EVALUATE_LONG_TRY)||new_error){ if(qbevent){evnt(14950);if(r)goto S_16635;} S_16636:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(14952);if(r)goto S_16636;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2323; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_TRY)), 1 , 0 , 1 ); if (new_error) goto skip2323; skip2323: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(14952);}while(r); } S_16639:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_NEXTL,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(14955);if(r)goto S_16639;} S_16640:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(14956);if(r)goto S_16640;} S_16641:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2638))))&(-(*_FUNC_EVALUATE_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(14957);if(r)goto S_16641;} do{ *_FUNC_EVALUATE_LONG_ARRAYID=*__LONG_CURRENTID; if(!qbevent)break;evnt(14958);}while(r); do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(14959);}while(r); do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I+ 2 ; if(!qbevent)break;evnt(14960);}while(r); do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(14961);}while(r); LABEL_EVALNEXTELE3:; if(qbevent){evnt(14962);r=0;} do{ qbs_set(_FUNC_EVALUATE_STRING_L2,FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14963);}while(r); S_16647:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(14964);if(r)goto S_16647;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(14964);}while(r); } S_16650:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(14965);if(r)goto S_16650;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(14966);}while(r); S_16652:; if ((-(*_FUNC_EVALUATE_LONG_B2== -1 ))||new_error){ if(qbevent){evnt(14967);if(r)goto S_16652;} do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_ARRAYREFERENCE(FUNC_GETELEMENTS(_FUNC_EVALUATE_STRING_A,&(pass2324=*_FUNC_EVALUATE_LONG_I+ 2 ),&(pass2325=*_FUNC_EVALUATE_LONG_I2- 1 )),_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14968);}while(r); S_16654:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14969);if(r)goto S_16654;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14969);}while(r); } do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I2; if(!qbevent)break;evnt(14970);}while(r); S_16658:; if ((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(14973);if(r)goto S_16658;} do{ SUB_GETID(_FUNC_EVALUATE_LONG_ARRAYID); if(!qbevent)break;evnt(14975);}while(r); S_16660:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14976);if(r)goto S_16660;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14976);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_O,qbs_right(_FUNC_EVALUATE_STRING_C,_FUNC_EVALUATE_STRING_C->len-func_instr(NULL,_FUNC_EVALUATE_STRING_C,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14977);}while(r); do{ *_FUNC_EVALUATE_LONG_U=*_FUNC_EVALUATE_LONG_TYP2& 511 ; if(!qbevent)break;evnt(14979);}while(r); do{ *_FUNC_EVALUATE_LONG_S=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATE_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(14980);}while(r); S_16666:; if ((((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[array_check((*_FUNC_EVALUATE_LONG_U)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5])])||new_error){ if(qbevent){evnt(14981);if(r)goto S_16666;} S_16667:; if ((*_FUNC_EVALUATE_LONG_S% 8 )||new_error){ if(qbevent){evnt(14982);if(r)goto S_16667;} do{ *_FUNC_EVALUATE_LONG_S=*_FUNC_EVALUATE_LONG_S+( 8 -(*_FUNC_EVALUATE_LONG_S% 8 )); if(!qbevent)break;evnt(14982);}while(r); } do{ *_FUNC_EVALUATE_LONG_S=*_FUNC_EVALUATE_LONG_S/ 8 ; if(!qbevent)break;evnt(14983);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_O,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATE_STRING_O),qbs_new_txt_len(")*",2)),FUNC_STR2(_FUNC_EVALUATE_LONG_S))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14985);}while(r); do{ goto LABEL_EVALUDT; if(!qbevent)break;evnt(14987);}while(r); } do{ goto LABEL_EVALEDNEXTELE3; if(!qbevent)break;evnt(14990);}while(r); } } do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I2+ 1 ; if(!qbevent)break;evnt(14993);}while(r); do{ goto LABEL_EVALNEXTELE3; if(!qbevent)break;evnt(14994);}while(r); LABEL_EVALEDNEXTELE3:; if(qbevent){evnt(14995);r=0;} do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(14996);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),_FUNC_EVALUATE_STRING_C); if(!qbevent)break;evnt(14997);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 2 ; if(!qbevent)break;evnt(14998);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*_FUNC_EVALUATE_LONG_TYP2; if(!qbevent)break;evnt(14999);}while(r); S_16684:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15000);if(r)goto S_16684;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15000);}while(r); } do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15001);}while(r); } } }else{ S_16691:; if (((-(*(int32*)(((char*)__UDT_ID)+(536))!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)== 0 )))||new_error){ if(qbevent){evnt(15009);if(r)goto S_16691;} S_16692:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2638))))&(-(*_FUNC_EVALUATE_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(15010);if(r)goto S_16692;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15011);}while(r); do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15012);}while(r); do{ SUB_MAKEIDREFER(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])),(&(((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15013);}while(r); S_16696:; if (((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15014);if(r)goto S_16696;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15014);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 2 ; if(!qbevent)break;evnt(15015);}while(r); do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15016);}while(r); } } S_16703:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(15021);if(r)goto S_16703;} S_16704:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2638))))&(-(*_FUNC_EVALUATE_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(15022);if(r)goto S_16704;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15023);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15024);}while(r); LABEL_EVALUDT:; if(qbevent){evnt(15025);r=0;} do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(15026);}while(r); do{ *_FUNC_EVALUATE_LONG_I3=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15027);}while(r); S_16709:; fornext_value2328=*_FUNC_EVALUATE_LONG_I3; fornext_finalvalue2328=*_FUNC_EVALUATE_LONG_N; fornext_step2328= 1 ; if (fornext_step2328<0) fornext_step_negative2328=1; else fornext_step_negative2328=0; if (new_error) goto fornext_error2328; goto fornext_entrylabel2328; while(1){ fornext_value2328=fornext_step2328+(*_FUNC_EVALUATE_LONG_I2); fornext_entrylabel2328: *_FUNC_EVALUATE_LONG_I2=fornext_value2328; if (fornext_step_negative2328){ if (fornext_value2328fornext_finalvalue2328) break; } fornext_error2328:; if(qbevent){evnt(15028);if(r)goto S_16709;} do{ qbs_set(_FUNC_EVALUATE_STRING_E2,FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15029);}while(r); S_16711:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15030);if(r)goto S_16711;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(15030);}while(r); } S_16714:; if ((-(*_FUNC_EVALUATE_LONG_B2== 0 ))||new_error){ if(qbevent){evnt(15031);if(r)goto S_16714;} S_16715:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATE_STRING_E2,qbs_new_txt_len(")",1)))|(FUNC_ISOPERATOR(_FUNC_EVALUATE_STRING_E2))))||new_error){ if(qbevent){evnt(15032);if(r)goto S_16715;} do{ *_FUNC_EVALUATE_LONG_I4=*_FUNC_EVALUATE_LONG_I2- 1 ; if(!qbevent)break;evnt(15033);}while(r); do{ goto LABEL_GOTUDT; if(!qbevent)break;evnt(15034);}while(r); } } S_16720:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15037);if(r)goto S_16720;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(15037);}while(r); } } fornext_exit_2327:; do{ *_FUNC_EVALUATE_LONG_I4=*_FUNC_EVALUATE_LONG_N; if(!qbevent)break;evnt(15039);}while(r); LABEL_GOTUDT:; if(qbevent){evnt(15040);r=0;} S_16725:; if ((-(*_FUNC_EVALUATE_LONG_I4<*_FUNC_EVALUATE_LONG_I3))||new_error){ if(qbevent){evnt(15041);if(r)goto S_16725;} do{ qbs_set(_FUNC_EVALUATE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15041);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATE_STRING_E,FUNC_GETELEMENTS(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I3,_FUNC_EVALUATE_LONG_I4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15041);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_E,FUNC_UDTREFERENCE(_FUNC_EVALUATE_STRING_O,_FUNC_EVALUATE_STRING_E,_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15043);}while(r); S_16731:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15044);if(r)goto S_16731;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15044);}while(r); } do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I4; if(!qbevent)break;evnt(15045);}while(r); do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15046);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),_FUNC_EVALUATE_STRING_E); if(!qbevent)break;evnt(15047);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 2 ; if(!qbevent)break;evnt(15048);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*_FUNC_EVALUATE_LONG_TYP2; if(!qbevent)break;evnt(15049);}while(r); do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15052);}while(r); } } } S_16743:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 1 ))||new_error){ if(qbevent){evnt(15059);if(r)goto S_16743;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15060);}while(r); S_16745:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,&(pass2329=*_FUNC_EVALUATE_LONG_I+ 1 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15061);if(r)goto S_16745;} do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I+ 2 ; if(!qbevent)break;evnt(15062);}while(r); do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(15063);}while(r); do{ *_FUNC_EVALUATE_LONG_ARGS= 1 ; if(!qbevent)break;evnt(15064);}while(r); LABEL_EVALNEXTELE:; if(qbevent){evnt(15065);r=0;} do{ qbs_set(_FUNC_EVALUATE_STRING_L2,FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15066);}while(r); S_16750:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15067);if(r)goto S_16750;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(15067);}while(r); } S_16753:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15068);if(r)goto S_16753;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(15069);}while(r); S_16755:; if ((-(*_FUNC_EVALUATE_LONG_B2== -1 ))||new_error){ if(qbevent){evnt(15070);if(r)goto S_16755;} S_16756:; if ((-(*_FUNC_EVALUATE_LONG_I2==(*_FUNC_EVALUATE_LONG_I+ 2 )))||new_error){ if(qbevent){evnt(15071);if(r)goto S_16756;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected (...)",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15071);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15071);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_EVALUATEFUNC(FUNC_GETELEMENTS(_FUNC_EVALUATE_STRING_A,&(pass2330=*_FUNC_EVALUATE_LONG_I+ 2 ),&(pass2331=*_FUNC_EVALUATE_LONG_I2- 1 )),_FUNC_EVALUATE_LONG_ARGS,_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15072);}while(r); S_16761:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15073);if(r)goto S_16761;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15073);}while(r); } do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I2; if(!qbevent)break;evnt(15074);}while(r); do{ goto LABEL_EVALEDNEXTELE; if(!qbevent)break;evnt(15075);}while(r); } } S_16768:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len(",",1)))&(-(*_FUNC_EVALUATE_LONG_B2== 0 ))))||new_error){ if(qbevent){evnt(15078);if(r)goto S_16768;} do{ *_FUNC_EVALUATE_LONG_ARGS=*_FUNC_EVALUATE_LONG_ARGS+ 1 ; if(!qbevent)break;evnt(15078);}while(r); } do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I2+ 1 ; if(!qbevent)break;evnt(15079);}while(r); do{ goto LABEL_EVALNEXTELE; if(!qbevent)break;evnt(15080);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_EVALUATEFUNC(qbs_new_txt_len("",0),&(pass2332= 0 ),_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15083);}while(r); S_16775:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15084);if(r)goto S_16775;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15084);}while(r); } } LABEL_EVALEDNEXTELE:; if(qbevent){evnt(15086);r=0;} do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15087);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),_FUNC_EVALUATE_STRING_C); if(!qbevent)break;evnt(15088);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 2 ; if(!qbevent)break;evnt(15089);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*_FUNC_EVALUATE_LONG_TYP2; if(!qbevent)break;evnt(15090);}while(r); S_16783:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15091);if(r)goto S_16783;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15091);}while(r); } do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15092);}while(r); } S_16788:; if ((-(*_FUNC_EVALUATE_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(15095);if(r)goto S_16788;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(15095);}while(r); do{ *_FUNC_EVALUATE_LONG_TRY=FUNC_FINDID(_FUNC_EVALUATE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15095);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_TRY= 0 ; if(!qbevent)break;evnt(15095);}while(r); } S_16794:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15096);if(r)goto S_16794;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15096);}while(r); } } dl_exit_2322:; } fornext_exit_2319:; S_16799:; if ((-(*_FUNC_EVALUATE_LONG_I!=*_FUNC_EVALUATE_LONG_N))||new_error){ if(qbevent){evnt(15102);if(r)goto S_16799;} S_16800:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,&(pass2333=*_FUNC_EVALUATE_LONG_I+ 1 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15103);if(r)goto S_16800;} S_16801:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_EVALUATE_STRING_L)== 0 )))||new_error){ if(qbevent){evnt(15104);if(r)goto S_16801;} S_16802:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISVALIDVARIABLE(_FUNC_EVALUATE_STRING_L)))||new_error){ if(qbevent){evnt(15105);if(r)goto S_16802;} S_16803:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15106);if(r)goto S_16803;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2334; sub_file_print(tmp_fileno,qbs_new_txt_len("**************",14), 0 , 0 , 1 ); if (new_error) goto skip2334; skip2334: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15107);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2335; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("about to auto-create array:",27),_FUNC_EVALUATE_STRING_L), 0 , 1 , 0 ); if (new_error) goto skip2335; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_I)), 1 , 0 , 1 ); if (new_error) goto skip2335; skip2335: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15108);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2336; sub_file_print(tmp_fileno,qbs_new_txt_len("**************",14), 0 , 0 , 1 ); if (new_error) goto skip2336; skip2336: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15109);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_DTYP,FUNC_REMOVESYMBOL(_FUNC_EVALUATE_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15111);}while(r); S_16809:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15112);if(r)goto S_16809;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15112);}while(r); } do{ *_FUNC_EVALUATE_LONG_NUME= 1 ; if(!qbevent)break;evnt(15114);}while(r); do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(15115);}while(r); S_16814:; fornext_value2338=*_FUNC_EVALUATE_LONG_I+ 2 ; fornext_finalvalue2338=*_FUNC_EVALUATE_LONG_N; fornext_step2338= 1 ; if (fornext_step2338<0) fornext_step_negative2338=1; else fornext_step_negative2338=0; if (new_error) goto fornext_error2338; goto fornext_entrylabel2338; while(1){ fornext_value2338=fornext_step2338+(*_FUNC_EVALUATE_LONG_I2); fornext_entrylabel2338: *_FUNC_EVALUATE_LONG_I2=fornext_value2338; if (fornext_step_negative2338){ if (fornext_value2338fornext_finalvalue2338) break; } fornext_error2338:; if(qbevent){evnt(15116);if(r)goto S_16814;} do{ qbs_set(_FUNC_EVALUATE_STRING_E,FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15117);}while(r); S_16816:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15118);if(r)goto S_16816;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(15118);}while(r); } S_16819:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_EVALUATE_LONG_B2== 0 ))&(qbs_equal(_FUNC_EVALUATE_STRING_E,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(15119);if(r)goto S_16819;} do{ *_FUNC_EVALUATE_LONG_NUME=*_FUNC_EVALUATE_LONG_NUME+ 1 ; if(!qbevent)break;evnt(15119);}while(r); } S_16822:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15120);if(r)goto S_16822;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(15120);}while(r); } S_16825:; if ((-(*_FUNC_EVALUATE_LONG_B2== -1 ))||new_error){ if(qbevent){evnt(15121);if(r)goto S_16825;} do{ goto fornext_exit_2337; if(!qbevent)break;evnt(15121);}while(r); } } fornext_exit_2337:; do{ qbs_set(_FUNC_EVALUATE_STRING_FAKEE,qbs_new_txt_len("10",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15123);}while(r); S_16830:; fornext_value2340= 2 ; fornext_finalvalue2340=*_FUNC_EVALUATE_LONG_NUME; fornext_step2340= 1 ; if (fornext_step2340<0) fornext_step_negative2340=1; else fornext_step_negative2340=0; if (new_error) goto fornext_error2340; goto fornext_entrylabel2340; while(1){ fornext_value2340=fornext_step2340+(*_FUNC_EVALUATE_LONG_I2); fornext_entrylabel2340: *_FUNC_EVALUATE_LONG_I2=fornext_value2340; if (fornext_step_negative2340){ if (fornext_value2340fornext_finalvalue2340) break; } fornext_error2340:; if(qbevent){evnt(15123);if(r)goto S_16830;} do{ qbs_set(_FUNC_EVALUATE_STRING_FAKEE,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATE_STRING_FAKEE,__STRING1_SP),qbs_new_txt_len(",",1)),__STRING1_SP),qbs_new_txt_len("10",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15123);}while(r); } fornext_exit_2339:; S_16833:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15124);if(r)goto S_16833;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2341; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("evaluate:creating undefined array using dim2(",45),_FUNC_EVALUATE_STRING_L),qbs_new_txt_len(",",1)),_FUNC_EVALUATE_STRING_DTYP),qbs_new_txt_len(",1,",3)),_FUNC_EVALUATE_STRING_FAKEE),qbs_new_txt_len(")",1)), 0 , 0 , 1 ); if (new_error) goto skip2341; skip2341: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15124);}while(r); } S_16836:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15125);if(r)goto S_16836;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15125);}while(r); } do{ *_FUNC_EVALUATE_LONG_OLDDIMSTATIC=*__LONG_DIMSTATIC; if(!qbevent)break;evnt(15126);}while(r); do{ *_FUNC_EVALUATE_LONG_METHOD= 1 ; if(!qbevent)break;evnt(15127);}while(r); S_16841:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(15128);if(r)goto S_16841;} do{ *__LONG_AUTOARRAY= 1 ; if(!qbevent)break;evnt(15129);}while(r); do{ *_FUNC_EVALUATE_LONG_XI= 1 ; if(!qbevent)break;evnt(15132);}while(r); S_16844:; fornext_value2343= 1 ; fornext_finalvalue2343=*__LONG_STATICARRAYLISTN; fornext_step2343= 1 ; if (fornext_step2343<0) fornext_step_negative2343=1; else fornext_step_negative2343=0; if (new_error) goto fornext_error2343; goto fornext_entrylabel2343; while(1){ fornext_value2343=fornext_step2343+(*_FUNC_EVALUATE_LONG_X); fornext_entrylabel2343: *_FUNC_EVALUATE_LONG_X=fornext_value2343; if (fornext_step_negative2343){ if (fornext_value2343fornext_finalvalue2343) break; } fornext_error2343:; if(qbevent){evnt(15133);if(r)goto S_16844;} do{ qbs_set(_FUNC_EVALUATE_STRING_VARNAME2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,_FUNC_EVALUATE_LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15134);}while(r); do{ *_FUNC_EVALUATE_LONG_XI=*_FUNC_EVALUATE_LONG_XI+ 1 ; if(!qbevent)break;evnt(15134);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_TYP2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,_FUNC_EVALUATE_LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15135);}while(r); do{ *_FUNC_EVALUATE_LONG_XI=*_FUNC_EVALUATE_LONG_XI+ 1 ; if(!qbevent)break;evnt(15135);}while(r); do{ *_FUNC_EVALUATE_LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_STATICARRAYLIST,_FUNC_EVALUATE_LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15136);}while(r); do{ *_FUNC_EVALUATE_LONG_XI=*_FUNC_EVALUATE_LONG_XI+ 1 ; if(!qbevent)break;evnt(15136);}while(r); S_16851:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_FUNC_EVALUATE_STRING_L),qbs_ucase(_FUNC_EVALUATE_STRING_VARNAME2))))||new_error){ if(qbevent){evnt(15138);if(r)goto S_16851;} do{ qbs_set(_FUNC_EVALUATE_STRING_L3,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15139);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_S,FUNC_REMOVESYMBOL(_FUNC_EVALUATE_STRING_L3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15139);}while(r); S_16854:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(FUNC_SYMBOL2FULLTYPENAME(_FUNC_EVALUATE_STRING_DTYP),_FUNC_EVALUATE_STRING_TYP2))|(((-(*_FUNC_EVALUATE_LONG_DIMMETHOD2== 0 ))&(qbs_equal(_FUNC_EVALUATE_STRING_S,qbs_new_txt_len("",0)))))))||new_error){ if(qbevent){evnt(15140);if(r)goto S_16854;} S_16855:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15141);if(r)goto S_16855;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15141);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_VARNAME2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15143);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_DTYP,_FUNC_EVALUATE_STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15144);}while(r); do{ *_FUNC_EVALUATE_LONG_METHOD=*_FUNC_EVALUATE_LONG_DIMMETHOD2; if(!qbevent)break;evnt(15145);}while(r); do{ *__LONG_DIMSTATIC= 3 ; if(!qbevent)break;evnt(15146);}while(r); } S_16863:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15148);if(r)goto S_16863;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15148);}while(r); } } } fornext_exit_2342:; } do{ *_FUNC_EVALUATE_LONG_IGNORE=FUNC_DIM2(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_DTYP,_FUNC_EVALUATE_LONG_METHOD,_FUNC_EVALUATE_STRING_FAKEE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15152);}while(r); S_16870:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15153);if(r)goto S_16870;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15153);}while(r); } do{ *__LONG_DIMSTATIC=*_FUNC_EVALUATE_LONG_OLDDIMSTATIC; if(!qbevent)break;evnt(15154);}while(r); S_16874:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15155);if(r)goto S_16874;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2344; sub_file_print(tmp_fileno,qbs_new_txt_len("#*#*#* dim2 has returned!!!",27), 0 , 0 , 1 ); if (new_error) goto skip2344; skip2344: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15155);}while(r); } do{ goto LABEL_REEVALUATE; if(!qbevent)break;evnt(15156);}while(r); } } } } do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15162);}while(r); } S_16884:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15166);if(r)goto S_16884;} S_16885:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(15167);if(r)goto S_16885;} do{ *_FUNC_EVALUATE_LONG_I1=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15167);}while(r); } do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B+ 1 ; if(!qbevent)break;evnt(15168);}while(r); } S_16890:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(15171);if(r)goto S_16890;} do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15172);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),_FUNC_EVALUATE_STRING_L); if(!qbevent)break;evnt(15173);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(15174);}while(r); } S_16895:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15177);if(r)goto S_16895;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B- 1 ; if(!qbevent)break;evnt(15178);}while(r); S_16897:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(15179);if(r)goto S_16897;} do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_EVALUATE(FUNC_GETELEMENTS(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I1,&(pass2345=*_FUNC_EVALUATE_LONG_I- 1 )),_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15180);}while(r); S_16899:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15181);if(r)goto S_16899;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15181);}while(r); } S_16902:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15182);if(r)goto S_16902;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15182);}while(r); } do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15183);}while(r); S_16906:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(15184);if(r)goto S_16906;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),_FUNC_EVALUATE_STRING_C); if(!qbevent)break;evnt(15185);}while(r); }else{ do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATE_STRING_C),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15187);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(15189);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_BLOCKN)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*_FUNC_EVALUATE_LONG_TYP2; if(!qbevent)break;evnt(15190);}while(r); } } LABEL_EVALED:; if(qbevent){evnt(15193);r=0;} } fornext_exit_2314:; do{ qbs_set(_FUNC_EVALUATE_STRING_R,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15196);}while(r); S_16917:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15198);if(r)goto S_16917;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2346; sub_file_print(tmp_fileno,qbs_new_txt_len("evaluated blocks:",17), 0 , 0 , 0 ); if (new_error) goto skip2346; skip2346: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15198);}while(r); } S_16920:; fornext_value2348= 1 ; fornext_finalvalue2348=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2348= 1 ; if (fornext_step2348<0) fornext_step_negative2348=1; else fornext_step_negative2348=0; if (new_error) goto fornext_error2348; goto fornext_entrylabel2348; while(1){ fornext_value2348=fornext_step2348+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2348: *_FUNC_EVALUATE_LONG_I=fornext_value2348; if (fornext_step_negative2348){ if (fornext_value2348fornext_finalvalue2348) break; } fornext_error2348:; if(qbevent){evnt(15199);if(r)goto S_16920;} S_16921:; if ((-(*_FUNC_EVALUATE_LONG_I!=*_FUNC_EVALUATE_LONG_BLOCKN))||new_error){ if(qbevent){evnt(15200);if(r)goto S_16921;} S_16922:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15201);if(r)goto S_16922;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2349; sub_file_print(tmp_fileno,qbs_add(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])),func_chr( 219 )), 0 , 0 , 0 ); if (new_error) goto skip2349; skip2349: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15201);}while(r); } }else{ S_16926:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15203);if(r)goto S_16926;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2350; sub_file_print(tmp_fileno,((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])), 0 , 0 , 1 ); if (new_error) goto skip2350; skip2350: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15203);}while(r); } } } fornext_exit_2347:; S_16931:; fornext_value2352= 1 ; fornext_finalvalue2352=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2352= 1 ; if (fornext_step2352<0) fornext_step_negative2352=1; else fornext_step_negative2352=0; if (new_error) goto fornext_error2352; goto fornext_entrylabel2352; while(1){ fornext_value2352=fornext_step2352+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2352: *_FUNC_EVALUATE_LONG_I=fornext_value2352; if (fornext_step_negative2352){ if (fornext_value2352fornext_finalvalue2352) break; } fornext_error2352:; if(qbevent){evnt(15210);if(r)goto S_16931;} S_16932:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])))== 0 )))||new_error){ if(qbevent){evnt(15211);if(r)goto S_16932;} S_16933:; if ((-(((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5])]== 0 ))||new_error){ if(qbevent){evnt(15212);if(r)goto S_16933;} do{ *_FUNC_EVALUATE_LONG_C=qbs_asc(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])), 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15215);}while(r); S_16935:; if (((-(*_FUNC_EVALUATE_LONG_C== 45 ))|(((-(*_FUNC_EVALUATE_LONG_C>= 48 ))&(-(*_FUNC_EVALUATE_LONG_C<= 57 )))))||new_error){ if(qbevent){evnt(15216);if(r)goto S_16935;} do{ qbs_set(_FUNC_EVALUATE_STRING_NUM,((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15217);}while(r); do{ *_FUNC_EVALUATE_LONG_F= 0 ; if(!qbevent)break;evnt(15219);}while(r); do{ *_FUNC_EVALUATE_LONG_X=func_instr(NULL,_FUNC_EVALUATE_STRING_NUM,qbs_new_txt_len("E",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15220);}while(r); S_16939:; if ((*_FUNC_EVALUATE_LONG_X)||new_error){ if(qbevent){evnt(15221);if(r)goto S_16939;} do{ *_FUNC_EVALUATE_LONG_F= 1 ; if(!qbevent)break;evnt(15222);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15222);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_X=func_instr(NULL,_FUNC_EVALUATE_STRING_NUM,qbs_new_txt_len("D",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15224);}while(r); S_16944:; if ((*_FUNC_EVALUATE_LONG_X)||new_error){ if(qbevent){evnt(15225);if(r)goto S_16944;} do{ *_FUNC_EVALUATE_LONG_F= 2 ; if(!qbevent)break;evnt(15226);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15226);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_X=func_instr(NULL,_FUNC_EVALUATE_STRING_NUM,qbs_new_txt_len("F",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15228);}while(r); S_16949:; if ((*_FUNC_EVALUATE_LONG_X)||new_error){ if(qbevent){evnt(15229);if(r)goto S_16949;} do{ *_FUNC_EVALUATE_LONG_F= 3 ; if(!qbevent)break;evnt(15230);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15230);}while(r); } } } S_16955:; if ((*_FUNC_EVALUATE_LONG_F)||new_error){ if(qbevent){evnt(15234);if(r)goto S_16955;} S_16956:; if (((-(*_FUNC_EVALUATE_LONG_F== 2 ))|(-(*_FUNC_EVALUATE_LONG_F== 3 )))||new_error){ if(qbevent){evnt(15236);if(r)goto S_16956;} do{ sub_mid(_FUNC_EVALUATE_STRING_NUM,*_FUNC_EVALUATE_LONG_X, 1 ,qbs_new_txt_len("E",1),1); if(!qbevent)break;evnt(15236);}while(r); } S_16959:; if ((-(*_FUNC_EVALUATE_LONG_F== 3 ))||new_error){ if(qbevent){evnt(15237);if(r)goto S_16959;} do{ qbs_set(_FUNC_EVALUATE_STRING_NUM,qbs_add(_FUNC_EVALUATE_STRING_NUM,qbs_new_txt_len("L",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15237);}while(r); } }else{ do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=FUNC_TYPNAME2TYP(FUNC_REMOVESYMBOL(_FUNC_EVALUATE_STRING_NUM)); if(!qbevent)break;evnt(15240);}while(r); S_16964:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15241);if(r)goto S_16964;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15241);}while(r); } S_16967:; if ((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(15242);if(r)goto S_16967;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15242);}while(r); } S_16970:; if ((-((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]& 511 )> 32 ))||new_error){ if(qbevent){evnt(15243);if(r)goto S_16970;} S_16971:; if ((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(15244);if(r)goto S_16971;} do{ qbs_set(_FUNC_EVALUATE_STRING_NUM,qbs_add(_FUNC_EVALUATE_STRING_NUM,qbs_new_txt_len("ull",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15244);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATE_STRING_NUM,qbs_add(_FUNC_EVALUATE_STRING_NUM,qbs_new_txt_len("ll",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15244);}while(r); } } } do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len(" ",1),_FUNC_EVALUATE_STRING_NUM),qbs_new_txt_len(" ",1))); if(!qbevent)break;evnt(15247);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(15248);}while(r); do{ goto LABEL_EVALEDBLOCK; if(!qbevent)break;evnt(15249);}while(r); } S_16982:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])), 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(15307);if(r)goto S_16982;} S_16983:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])), 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(15308);if(r)goto S_16983;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("qbs_new_txt_len(",16),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15309);}while(r); }else{ do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("qbs_new_txt(",12),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15311);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[tmp_long]=*__LONG_ISSTRING; if(!qbevent)break;evnt(15313);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(15314);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15315);}while(r); do{ goto LABEL_EVALEDBLOCK; if(!qbevent)break;evnt(15316);}while(r); } S_16993:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISVALIDVARIABLE(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])))))||new_error){ if(qbevent){evnt(15320);if(r)goto S_16993;} do{ qbs_set(_FUNC_EVALUATE_STRING_X,((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15321);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_TYP,FUNC_REMOVESYMBOL(_FUNC_EVALUATE_STRING_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15323);}while(r); S_16996:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15324);if(r)goto S_16996;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15324);}while(r); } S_16999:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_EVALUATE_STRING_TYP->len== 0 )))||new_error){ if(qbevent){evnt(15327);if(r)goto S_16999;} S_17000:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATE_STRING_X, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(15328);if(r)goto S_17000;} do{ *_FUNC_EVALUATE_LONG_V= 27 ; if(!qbevent)break;evnt(15328);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_V=qbs_asc(qbs_ucase(_FUNC_EVALUATE_STRING_X))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15328);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_TYP,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*_FUNC_EVALUATE_LONG_V)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15329);}while(r); } do{ *_FUNC_EVALUATE_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_EVALUATE_STRING_X,_FUNC_EVALUATE_STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15333);}while(r); S_17008:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15334);if(r)goto S_17008;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15334);}while(r); } S_17011:; while((*_FUNC_EVALUATE_LONG_TRY)||new_error){ if(qbevent){evnt(15335);if(r)goto S_17011;} S_17012:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15336);if(r)goto S_17012;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2355; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_TRY)), 1 , 0 , 1 ); if (new_error) goto skip2355; skip2355: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15336);}while(r); } S_17015:; if (((-(*(int32*)(((char*)__UDT_ID)+(536))!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)== 0 )))||new_error){ if(qbevent){evnt(15337);if(r)goto S_17015;} do{ goto LABEL_SIMPLEVARFOUND; if(!qbevent)break;evnt(15338);}while(r); } S_17018:; if ((-(*_FUNC_EVALUATE_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(15340);if(r)goto S_17018;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(15340);}while(r); do{ *_FUNC_EVALUATE_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_EVALUATE_STRING_X,_FUNC_EVALUATE_STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15340);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_TRY= 0 ; if(!qbevent)break;evnt(15340);}while(r); } S_17024:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15341);if(r)goto S_17024;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15341);}while(r); } } dl_exit_2354:; S_17028:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15344);if(r)goto S_17028;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2356; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("CREATING VARIABLE:",18),_FUNC_EVALUATE_STRING_X), 0 , 0 , 1 ); if (new_error) goto skip2356; skip2356: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15344);}while(r); } do{ *_FUNC_EVALUATE_LONG_RETVAL=FUNC_DIM2(_FUNC_EVALUATE_STRING_X,_FUNC_EVALUATE_STRING_TYP,&(pass2357= 1 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15345);}while(r); S_17032:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15346);if(r)goto S_17032;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15346);}while(r); } LABEL_SIMPLEVARFOUND:; if(qbevent){evnt(15348);r=0;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15349);}while(r); do{ SUB_MAKEIDREFER(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])),(&(((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15350);}while(r); S_17037:; if (((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15351);if(r)goto S_17037;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15351);}while(r); } S_17040:; if ((-(*_FUNC_EVALUATE_LONG_BLOCKN== 1 ))||new_error){ if(qbevent){evnt(15352);if(r)goto S_17040;} S_17041:; if (((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(15353);if(r)goto S_17041;} do{ goto LABEL_RETURNPOINTER; if(!qbevent)break;evnt(15353);}while(r); } } do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),FUNC_REFER(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])),(&(((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])])),&(pass2358= 0 ))); if(!qbevent)break;evnt(15356);}while(r); S_17046:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15356);if(r)goto S_17046;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15356);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5]); if (!new_error) ((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(15357);}while(r); do{ goto LABEL_EVALEDBLOCK; if(!qbevent)break;evnt(15358);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid expression",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15360);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15360);}while(r); }else{ S_17055:; if (((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(15363);if(r)goto S_17055;} S_17056:; if ((-(*_FUNC_EVALUATE_LONG_BLOCKN== 1 ))||new_error){ if(qbevent){evnt(15364);if(r)goto S_17056;} do{ goto LABEL_RETURNPOINTER; if(!qbevent)break;evnt(15364);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),FUNC_REFER(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])),(&(((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])])),&(pass2359= 0 ))); if(!qbevent)break;evnt(15368);}while(r); S_17060:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15369);if(r)goto S_17060;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15369);}while(r); } } } } LABEL_EVALEDBLOCK:; if(qbevent){evnt(15375);r=0;} } fornext_exit_2351:; S_17067:; if ((-(*_FUNC_EVALUATE_LONG_BLOCKN== 1 ))||new_error){ if(qbevent){evnt(15380);if(r)goto S_17067;} S_17068:; if ((((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5])])||new_error){ if(qbevent){evnt(15381);if(r)goto S_17068;} S_17069:; if (((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(15382);if(r)goto S_17069;} LABEL_RETURNPOINTER:; if(qbevent){evnt(15383);r=0;} S_17070:; if (((((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15384);if(r)goto S_17070;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15384);}while(r); } S_17073:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15385);if(r)goto S_17073;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2360; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("evaluated reference:",20),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))), 0 , 0 , 1 ); if (new_error) goto skip2360; skip2360: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15385);}while(r); } do{ *_FUNC_EVALUATE_LONG_TYP=((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]; if(!qbevent)break;evnt(15386);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_EVALUATE,((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15387);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15388);}while(r); } } } S_17082:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15401);if(r)goto S_17082;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2361; sub_file_print(tmp_fileno,qbs_new_txt_len("applying operators:",19), 0 , 0 , 0 ); if (new_error) goto skip2361; skip2361: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15401);}while(r); } S_17085:; if ((-(*_FUNC_EVALUATE_LONG_TYP== -1 ))||new_error){ if(qbevent){evnt(15404);if(r)goto S_17085;} do{ *_FUNC_EVALUATE_LONG_TYP=((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]; if(!qbevent)break;evnt(15405);}while(r); S_17087:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])))))||new_error){ if(qbevent){evnt(15408);if(r)goto S_17087;} do{ *_FUNC_EVALUATE_LONG_TYP=((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check(( 2 )-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]; if(!qbevent)break;evnt(15409);}while(r); } } do{ *_FUNC_EVALUATE_LONG_NONOP= 0 ; if(!qbevent)break;evnt(15413);}while(r); S_17092:; fornext_value2363= 1 ; fornext_finalvalue2363=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2363= 1 ; if (fornext_step2363<0) fornext_step_negative2363=1; else fornext_step_negative2363=0; if (new_error) goto fornext_error2363; goto fornext_entrylabel2363; while(1){ fornext_value2363=fornext_step2363+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2363: *_FUNC_EVALUATE_LONG_I=fornext_value2363; if (fornext_step_negative2363){ if (fornext_value2363fornext_finalvalue2363) break; } fornext_error2363:; if(qbevent){evnt(15414);if(r)goto S_17092;} S_17093:; if ((-(((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5])]== 0 ))||new_error){ if(qbevent){evnt(15416);if(r)goto S_17093;} do{ *_FUNC_EVALUATE_LONG_ISOP=FUNC_ISOPERATOR(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15417);}while(r); S_17095:; if ((*_FUNC_EVALUATE_LONG_ISOP)||new_error){ if(qbevent){evnt(15418);if(r)goto S_17095;} do{ *_FUNC_EVALUATE_LONG_NONOP= 0 ; if(!qbevent)break;evnt(15419);}while(r); do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15421);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_O,((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15424);}while(r); do{ *_FUNC_EVALUATE_LONG_U=FUNC_OPERATORUSAGE(_FUNC_EVALUATE_STRING_O,_FUNC_EVALUATE_LONG_TYP,_FUNC_EVALUATE_STRING_I,_FUNC_EVALUATE_LONG_LHSTYP,_FUNC_EVALUATE_LONG_RHSTYP,_FUNC_EVALUATE_LONG_RESULT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15425);}while(r); S_17100:; if ((-(*_FUNC_EVALUATE_LONG_U!= 5 ))||new_error){ if(qbevent){evnt(15427);if(r)goto S_17100;} do{ *_FUNC_EVALUATE_LONG_NONOP= 1 ; if(!qbevent)break;evnt(15428);}while(r); S_17102:; if (((-(*_FUNC_EVALUATE_LONG_I== 1 ))|(-(((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(15429);if(r)goto S_17102;} S_17103:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_EVALUATE_LONG_I== 1 ))&(-(*_FUNC_EVALUATE_LONG_BLOCKN== 1 ))&(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("-",1)))))||new_error){ if(qbevent){evnt(15430);if(r)goto S_17103;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Expected variable/value after '",31),qbs_ucase(_FUNC_EVALUATE_STRING_O)),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15430);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15430);}while(r); } do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Expected variable/value before '",32),qbs_ucase(_FUNC_EVALUATE_STRING_O)),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15431);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15431);}while(r); } } S_17111:; if (((-(*_FUNC_EVALUATE_LONG_I==*_FUNC_EVALUATE_LONG_BLOCKN))|(-(((int16*)(_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[4],_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(15434);if(r)goto S_17111;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Expected variable/value after '",31),qbs_ucase(_FUNC_EVALUATE_STRING_O)),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15434);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15434);}while(r); } do{ *_FUNC_EVALUATE_LONG_OLDTYP=*_FUNC_EVALUATE_LONG_TYP; if(!qbevent)break;evnt(15442);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP=((int32*)(_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[4],_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[5])]; if(!qbevent)break;evnt(15443);}while(r); S_17117:; if (((-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISSTRING)== 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISSTRING)!= 0 )))||new_error){ if(qbevent){evnt(15455);if(r)goto S_17117;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert number to string",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15456);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15456);}while(r); } do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 0 ; if(!qbevent)break;evnt(15460);}while(r); do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 0 ; if(!qbevent)break;evnt(15461);}while(r); S_17123:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISOFFSET)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISOFFSET)!= 0 )))||new_error){ if(qbevent){evnt(15462);if(r)goto S_17123;} do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 2 ; if(!qbevent)break;evnt(15463);}while(r); S_17125:; if ((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(15464);if(r)goto S_17125;} S_17126:; if ((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISUNSIGNED)== 0 ))||new_error){ if(qbevent){evnt(15465);if(r)goto S_17126;} do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 1 ; if(!qbevent)break;evnt(15465);}while(r); } } S_17130:; if ((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(15467);if(r)goto S_17130;} S_17131:; if ((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISUNSIGNED)== 0 ))||new_error){ if(qbevent){evnt(15468);if(r)goto S_17131;} do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 1 ; if(!qbevent)break;evnt(15468);}while(r); } } S_17135:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("*",1)))|(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("/",1)))|(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("^",1)))))||new_error){ if(qbevent){evnt(15474);if(r)goto S_17135;} S_17136:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("*",1)))|(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("^",1)))))||new_error){ if(qbevent){evnt(15475);if(r)goto S_17136;} S_17137:; if (((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)!= 0 )))||new_error){ if(qbevent){evnt(15477);if(r)goto S_17137;} do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 1 ; if(!qbevent)break;evnt(15478);}while(r); S_17139:; if ((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15479);if(r)goto S_17139;} do{ *_FUNC_EVALUATE_LONG_LHSTYP= 2 ; if(!qbevent)break;evnt(15479);}while(r); } S_17142:; if ((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15480);if(r)goto S_17142;} do{ *_FUNC_EVALUATE_LONG_RHSTYP= 2 ; if(!qbevent)break;evnt(15480);}while(r); } } } S_17147:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("/",1)))|(qbs_equal(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("^",1)))))||new_error){ if(qbevent){evnt(15483);if(r)goto S_17147;} do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 1 ; if(!qbevent)break;evnt(15485);}while(r); S_17149:; if ((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15486);if(r)goto S_17149;} do{ *_FUNC_EVALUATE_LONG_LHSTYP= 2 ; if(!qbevent)break;evnt(15486);}while(r); } S_17152:; if ((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15487);if(r)goto S_17152;} do{ *_FUNC_EVALUATE_LONG_RHSTYP= 2 ; if(!qbevent)break;evnt(15487);}while(r); } } }else{ S_17157:; if ((*_FUNC_EVALUATE_LONG_LHSTYP& 2 )||new_error){ if(qbevent){evnt(15490);if(r)goto S_17157;} do{ *_FUNC_EVALUATE_LONG_LHSTYP= 1 ; if(!qbevent)break;evnt(15490);}while(r); } S_17160:; if ((*_FUNC_EVALUATE_LONG_RHSTYP& 2 )||new_error){ if(qbevent){evnt(15491);if(r)goto S_17160;} do{ *_FUNC_EVALUATE_LONG_RHSTYP= 1 ; if(!qbevent)break;evnt(15491);}while(r); } } S_17164:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(15494);if(r)goto S_17164;} do{ *_FUNC_EVALUATE_LONG_RESULT= 1 ; if(!qbevent)break;evnt(15494);}while(r); } } S_17168:; if (((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15501);if(r)goto S_17168;} S_17169:; if ((-((*_FUNC_EVALUATE_LONG_LHSTYP& 4 )== 0 ))||new_error){ if(qbevent){evnt(15502);if(r)goto S_17169;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert string to number",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15502);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15502);}while(r); } }else{ S_17174:; if ((-(*_FUNC_EVALUATE_LONG_LHSTYP== 4 ))||new_error){ if(qbevent){evnt(15505);if(r)goto S_17174;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert number to string",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15505);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15505);}while(r); } S_17178:; if (((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15506);if(r)goto S_17178;} S_17179:; if ((-((*_FUNC_EVALUATE_LONG_LHSTYP& 2 )== 0 ))||new_error){ if(qbevent){evnt(15507);if(r)goto S_17179;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15509);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 64 ; if(!qbevent)break;evnt(15510);}while(r); } }else{ S_17184:; if ((-((*_FUNC_EVALUATE_LONG_LHSTYP& 1 )== 0 ))||new_error){ if(qbevent){evnt(15514);if(r)goto S_17184;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("((long double)(",15),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len("))",2))); if(!qbevent)break;evnt(15516);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15517);}while(r); } } } S_17190:; if (((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15522);if(r)goto S_17190;} S_17191:; if ((-((*_FUNC_EVALUATE_LONG_RHSTYP& 4 )== 0 ))||new_error){ if(qbevent){evnt(15523);if(r)goto S_17191;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert string to number",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15523);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15523);}while(r); } }else{ S_17196:; if ((-(*_FUNC_EVALUATE_LONG_RHSTYP== 4 ))||new_error){ if(qbevent){evnt(15526);if(r)goto S_17196;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert number to string",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15526);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15526);}while(r); } S_17200:; if (((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15527);if(r)goto S_17200;} S_17201:; if ((-((*_FUNC_EVALUATE_LONG_RHSTYP& 2 )== 0 ))||new_error){ if(qbevent){evnt(15528);if(r)goto S_17201;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15530);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 64 ; if(!qbevent)break;evnt(15531);}while(r); } }else{ S_17206:; if ((-((*_FUNC_EVALUATE_LONG_RHSTYP& 1 )== 0 ))||new_error){ if(qbevent){evnt(15535);if(r)goto S_17206;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("((long double)(",15),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len("))",2))); if(!qbevent)break;evnt(15537);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15538);}while(r); } } } S_17212:; if ((-(*_FUNC_EVALUATE_LONG_ISOP== 7 ))||new_error){ if(qbevent){evnt(15544);if(r)goto S_17212;} S_17213:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)!= 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)!= 0 )))||new_error){ if(qbevent){evnt(15554);if(r)goto S_17213;} do{ *_FUNC_EVALUATE_LONG_S1=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(15555);}while(r); do{ *_FUNC_EVALUATE_LONG_S2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(15555);}while(r); S_17216:; if ((-(*_FUNC_EVALUATE_LONG_S2<*_FUNC_EVALUATE_LONG_S1))||new_error){ if(qbevent){evnt(15556);if(r)goto S_17216;} do{ *_FUNC_EVALUATE_LONG_S1=*_FUNC_EVALUATE_LONG_S2; if(!qbevent)break;evnt(15556);}while(r); } S_17219:; if ((-(*_FUNC_EVALUATE_LONG_S1== 32 ))||new_error){ if(qbevent){evnt(15557);if(r)goto S_17219;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("((float)(",9),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len("))",2))); if(!qbevent)break;evnt(15558);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 32 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15558);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("((float)(",9),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len("))",2))); if(!qbevent)break;evnt(15559);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 32 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15559);}while(r); } S_17225:; if ((-(*_FUNC_EVALUATE_LONG_S1== 64 ))||new_error){ if(qbevent){evnt(15561);if(r)goto S_17225;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("((double)(",10),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len("))",2))); if(!qbevent)break;evnt(15562);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15562);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("((double)(",10),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len("))",2))); if(!qbevent)break;evnt(15563);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15563);}while(r); } } } do{ *_FUNC_EVALUATE_LONG_TYP=*_FUNC_EVALUATE_LONG_NEWTYP; if(!qbevent)break;evnt(15568);}while(r); S_17234:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISSTRING)== 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(15575);if(r)goto S_17234;} S_17235:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)!= 0 )))||new_error){ if(qbevent){evnt(15576);if(r)goto S_17235;} do{ *_FUNC_EVALUATE_LONG_B= 0 ; if(!qbevent)break;evnt(15578);}while(r); S_17237:; if (((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15578);if(r)goto S_17237;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(15578);}while(r); } S_17240:; if (((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15579);if(r)goto S_17240;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(15580);}while(r); S_17242:; if ((-(*_FUNC_EVALUATE_LONG_B2>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(15580);if(r)goto S_17242;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B2; if(!qbevent)break;evnt(15580);}while(r); } } do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISFLOAT+*_FUNC_EVALUATE_LONG_B; if(!qbevent)break;evnt(15582);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(15587);}while(r); do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(15587);}while(r); S_17250:; if ((-(*_FUNC_EVALUATE_LONG_B2>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(15587);if(r)goto S_17250;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B2; if(!qbevent)break;evnt(15587);}while(r); } do{ *_FUNC_EVALUATE_LONG_TYP= 64 ; if(!qbevent)break;evnt(15588);}while(r); S_17254:; if ((-(*_FUNC_EVALUATE_LONG_B== 64 ))||new_error){ if(qbevent){evnt(15589);if(r)goto S_17254;} S_17255:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISUNSIGNED)!= 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISUNSIGNED)!= 0 )))||new_error){ if(qbevent){evnt(15590);if(r)goto S_17255;} do{ *_FUNC_EVALUATE_LONG_TYP= 64 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(15590);}while(r); } } } } S_17261:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(15595);if(r)goto S_17261;} S_17262:; if (((-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFLOAT)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISSTRING)!= 0 )))||new_error){ if(qbevent){evnt(15596);if(r)goto S_17262;} do{ *_FUNC_EVALUATE_LONG_TYP= 64 ; if(!qbevent)break;evnt(15596);}while(r); } } S_17266:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(15598);if(r)goto S_17266;} S_17267:; if ((-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15599);if(r)goto S_17267;} do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISFLOAT+ 256 ; if(!qbevent)break;evnt(15599);}while(r); } } S_17271:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 4 ))||new_error){ if(qbevent){evnt(15601);if(r)goto S_17271;} do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(15602);}while(r); } S_17274:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 8 ))||new_error){ if(qbevent){evnt(15604);if(r)goto S_17274;} do{ *_FUNC_EVALUATE_LONG_TYP= 32 ; if(!qbevent)break;evnt(15605);}while(r); } S_17277:; if ((*_FUNC_EVALUATE_LONG_OFFSETMODE)||new_error){ if(qbevent){evnt(15609);if(r)goto S_17277;} S_17278:; if ((-(*_FUNC_EVALUATE_LONG_RESULT!= 8 ))||new_error){ if(qbevent){evnt(15610);if(r)goto S_17278;} do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15611);}while(r); S_17280:; if ((-(*_FUNC_EVALUATE_LONG_OFFSETMODE== 2 ))||new_error){ if(qbevent){evnt(15611);if(r)goto S_17280;} do{ *_FUNC_EVALUATE_LONG_TYP=*_FUNC_EVALUATE_LONG_TYP+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(15611);}while(r); } } } S_17285:; if ((-(*_FUNC_EVALUATE_LONG_U== 2 ))||new_error){ if(qbevent){evnt(15616);if(r)goto S_17285;} S_17286:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_I,qbs_new_txt_len("pow2",4))))||new_error){ if(qbevent){evnt(15617);if(r)goto S_17286;} S_17287:; if ((*_FUNC_EVALUATE_LONG_OFFSETMODE)||new_error){ if(qbevent){evnt(15619);if(r)goto S_17287;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Operator '^' cannot be used with an _OFFSET",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15619);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15619);}while(r); } do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(15623);}while(r); S_17292:; if ((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(15624);if(r)goto S_17292;} }else{ S_17294:; if ((-(*_FUNC_EVALUATE_LONG_B> 16 ))||new_error){ if(qbevent){evnt(15627);if(r)goto S_17294;} do{ *_FUNC_EVALUATE_LONG_B= 64 ; if(!qbevent)break;evnt(15627);}while(r); } S_17297:; if ((-(*_FUNC_EVALUATE_LONG_B> 32 ))||new_error){ if(qbevent){evnt(15628);if(r)goto S_17297;} do{ *_FUNC_EVALUATE_LONG_B= 256 ; if(!qbevent)break;evnt(15628);}while(r); } S_17300:; if ((-(*_FUNC_EVALUATE_LONG_B<= 16 ))||new_error){ if(qbevent){evnt(15629);if(r)goto S_17300;} do{ *_FUNC_EVALUATE_LONG_B= 32 ; if(!qbevent)break;evnt(15629);}while(r); } } do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(15631);}while(r); S_17305:; if ((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(15632);if(r)goto S_17305;} S_17306:; if ((-(*_FUNC_EVALUATE_LONG_B2>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(15633);if(r)goto S_17306;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B2; if(!qbevent)break;evnt(15633);}while(r); } }else{ do{ *_FUNC_EVALUATE_LONG_B3= 32 ; if(!qbevent)break;evnt(15635);}while(r); S_17311:; if ((-(*_FUNC_EVALUATE_LONG_B2> 16 ))||new_error){ if(qbevent){evnt(15636);if(r)goto S_17311;} do{ *_FUNC_EVALUATE_LONG_B3= 64 ; if(!qbevent)break;evnt(15636);}while(r); } S_17314:; if ((-(*_FUNC_EVALUATE_LONG_B2> 32 ))||new_error){ if(qbevent){evnt(15637);if(r)goto S_17314;} do{ *_FUNC_EVALUATE_LONG_B3= 256 ; if(!qbevent)break;evnt(15637);}while(r); } S_17317:; if ((-(*_FUNC_EVALUATE_LONG_B3>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(15638);if(r)goto S_17317;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B3; if(!qbevent)break;evnt(15638);}while(r); } } do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISFLOAT+*_FUNC_EVALUATE_LONG_B; if(!qbevent)break;evnt(15640);}while(r); } } S_17324:; if ((-(*_FUNC_EVALUATE_LONG_U== 5 ))||new_error){ if(qbevent){evnt(15647);if(r)goto S_17324;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_add(_FUNC_EVALUATE_STRING_I,qbs_new_txt_len("(",1)),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15648);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15649);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15649);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(15649);}while(r); } S_17330:; if ((-(*_FUNC_EVALUATE_LONG_U== 1 ))||new_error){ if(qbevent){evnt(15654);if(r)goto S_17330;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])),_FUNC_EVALUATE_STRING_I),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])))); if(!qbevent)break;evnt(15655);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15656);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15656);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15656);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(15656);}while(r); } S_17337:; if ((-(*_FUNC_EVALUATE_LONG_U== 2 ))||new_error){ if(qbevent){evnt(15659);if(r)goto S_17337;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATE_STRING_I,qbs_new_txt_len("(",1)),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(",",1)),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15660);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15661);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15661);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15661);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(15661);}while(r); } S_17344:; if ((-(*_FUNC_EVALUATE_LONG_U== 3 ))||new_error){ if(qbevent){evnt(15664);if(r)goto S_17344;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("-(",2),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),_FUNC_EVALUATE_STRING_I),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15665);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15666);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15666);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15666);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(15666);}while(r); } S_17351:; if ((-(*_FUNC_EVALUATE_LONG_U== 4 ))||new_error){ if(qbevent){evnt(15669);if(r)goto S_17351;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("~",1),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),_FUNC_EVALUATE_STRING_I),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I+ 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])))); if(!qbevent)break;evnt(15670);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I- 1 )-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15671);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(15671);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15671);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(15671);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("ERROR: Operator could not be applied correctly!",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15676);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15676);}while(r); LABEL_OPERATORAPPLIED:; if(qbevent){evnt(15677);r=0;} S_17360:; if ((*_FUNC_EVALUATE_LONG_OFFSETCVI)||new_error){ if(qbevent){evnt(15679);if(r)goto S_17360;} do{ tmp_long=array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])]))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(15679);}while(r); do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 0 ; if(!qbevent)break;evnt(15679);}while(r); } do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 0 ; if(!qbevent)break;evnt(15680);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_NONOP=*_FUNC_EVALUATE_LONG_NONOP+ 1 ; if(!qbevent)break;evnt(15683);}while(r); } }else{ do{ *_FUNC_EVALUATE_LONG_NONOP=*_FUNC_EVALUATE_LONG_NONOP+ 1 ; if(!qbevent)break;evnt(15686);}while(r); } S_17371:; if ((-(*_FUNC_EVALUATE_LONG_NONOP> 1 ))||new_error){ if(qbevent){evnt(15688);if(r)goto S_17371;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected operator in equation",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15688);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15688);}while(r); } } fornext_exit_2362:; S_17376:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15690);if(r)goto S_17376;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2364; sub_file_print(tmp_fileno,qbs_new_txt_len("",0), 0 , 0 , 1 ); if (new_error) goto skip2364; skip2364: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15690);}while(r); } S_17379:; fornext_value2366= 1 ; fornext_finalvalue2366=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2366= 1 ; if (fornext_step2366<0) fornext_step_negative2366=1; else fornext_step_negative2366=0; if (new_error) goto fornext_error2366; goto fornext_entrylabel2366; while(1){ fornext_value2366=fornext_step2366+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2366: *_FUNC_EVALUATE_LONG_I=fornext_value2366; if (fornext_step_negative2366){ if (fornext_value2366fornext_finalvalue2366) break; } fornext_error2366:; if(qbevent){evnt(15693);if(r)goto S_17379;} do{ qbs_set(_FUNC_EVALUATE_STRING_R,qbs_add(_FUNC_EVALUATE_STRING_R,((qbs*)(((uint64*)(_FUNC_EVALUATE_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATE_LONG_I)-_FUNC_EVALUATE_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATE_ARRAY_STRING_BLOCK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15694);}while(r); } fornext_exit_2365:; S_17382:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15697);if(r)goto S_17382;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2367; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("evaluated:",10),_FUNC_EVALUATE_STRING_R),qbs_new_txt_len(" AS TYPE:",9)), 0 , 0 , 0 ); if (new_error) goto skip2367; skip2367: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15698);}while(r); S_17384:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15699);if(r)goto S_17384;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2368; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISSTRING]",10), 0 , 0 , 0 ); if (new_error) goto skip2368; skip2368: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15699);}while(r); } S_17387:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15700);if(r)goto S_17387;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2369; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISFLOAT]",9), 0 , 0 , 0 ); if (new_error) goto skip2369; skip2369: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15700);}while(r); } S_17390:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(15701);if(r)goto S_17390;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2370; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISUNSIGNED]",12), 0 , 0 , 0 ); if (new_error) goto skip2370; skip2370: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15701);}while(r); } S_17393:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(15702);if(r)goto S_17393;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2371; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISPOINTER]",11), 0 , 0 , 0 ); if (new_error) goto skip2371; skip2371: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15702);}while(r); } S_17396:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(15703);if(r)goto S_17396;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2372; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISFIXEDLENGTH]",15), 0 , 0 , 0 ); if (new_error) goto skip2372; skip2372: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15703);}while(r); } S_17399:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(15704);if(r)goto S_17399;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2373; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISINCONVENTIONALMEMORY]",24), 0 , 0 , 0 ); if (new_error) goto skip2373; skip2373: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15704);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2374; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("(size in bits=",14),FUNC_STR2(&(pass2375=*_FUNC_EVALUATE_LONG_TYP& 511 ))),qbs_new_txt_len(")",1)), 0 , 0 , 1 ); if (new_error) goto skip2374; skip2374: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15705);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_EVALUATE,_FUNC_EVALUATE_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15709);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free28.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_EVALUATE_STRING_EVALUATE);return _FUNC_EVALUATE_STRING_EVALUATE; } qbs* FUNC_EVALUATEFUNC(qbs*_FUNC_EVALUATEFUNC_STRING_A2,int32*_FUNC_EVALUATEFUNC_LONG_ARGS,int32*_FUNC_EVALUATEFUNC_LONG_TYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data29.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_A,_FUNC_EVALUATEFUNC_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15719);}while(r); S_17406:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15721);if(r)goto S_17406;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2377; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("evaluatingfunction:",19),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))),qbs_new_txt_len(":",1)),_FUNC_EVALUATEFUNC_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2377; skip2377: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15721);}while(r); } do{ if(!qbevent)break;evnt(15723);}while(r); do{ memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)),(((char*)__UDT_ID)+(0)),2860); if(!qbevent)break;evnt(15725);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15726);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*(int32*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2378)); if(!qbevent)break;evnt(15727);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TARGETID=*__LONG_CURRENTID; if(!qbevent)break;evnt(15728);}while(r); S_17414:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(550)),256,1)),qbs_new_txt_len("func_stub",9))))||new_error){ if(qbevent){evnt(15730);if(r)goto S_17414;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Command not implemented",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15730);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15730);}while(r); } do{ SUB_SETDEPENDENCY(&(pass2378=*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(546)))); if(!qbevent)break;evnt(15732);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_PASSOMIT= 0 ; if(!qbevent)break;evnt(15734);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST= 0 ; if(!qbevent)break;evnt(15735);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST= 0 ; if(!qbevent)break;evnt(15735);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_F,qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(1610)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15737);}while(r); S_17423:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_EVALUATEFUNC_STRING_F->len))||new_error){ if(qbevent){evnt(15738);if(r)goto S_17423;} do{ *_FUNC_EVALUATEFUNC_LONG_SQB= 0 ; if(!qbevent)break;evnt(15741);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_A= 0 ; if(!qbevent)break;evnt(15742);}while(r); S_17426:; fornext_value2381= 1 ; fornext_finalvalue2381=_FUNC_EVALUATEFUNC_STRING_F->len; fornext_step2381= 1 ; if (fornext_step2381<0) fornext_step_negative2381=1; else fornext_step_negative2381=0; if (new_error) goto fornext_error2381; goto fornext_entrylabel2381; while(1){ fornext_value2381=fornext_step2381+(*_FUNC_EVALUATEFUNC_LONG_FI); fornext_entrylabel2381: *_FUNC_EVALUATEFUNC_LONG_FI=fornext_value2381; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2381){ if (fornext_value2381fornext_finalvalue2381) break; } fornext_error2381:; if(qbevent){evnt(15743);if(r)goto S_17426;} do{ *_FUNC_EVALUATEFUNC_LONG_FA=qbs_asc(_FUNC_EVALUATEFUNC_STRING_F,*_FUNC_EVALUATEFUNC_LONG_FI); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15744);}while(r); S_17428:; if ((-(*_FUNC_EVALUATEFUNC_LONG_FA== 63 ))||new_error){ if(qbevent){evnt(15745);if(r)goto S_17428;} do{ *_FUNC_EVALUATEFUNC_LONG_A=*_FUNC_EVALUATEFUNC_LONG_A+ 1 ; if(!qbevent)break;evnt(15746);}while(r); S_17430:; if (((-(*_FUNC_EVALUATEFUNC_LONG_SQB!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST== 0 )))||new_error){ if(qbevent){evnt(15747);if(r)goto S_17430;} do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST=*_FUNC_EVALUATEFUNC_LONG_A; if(!qbevent)break;evnt(15747);}while(r); } } S_17434:; if ((-(*_FUNC_EVALUATEFUNC_LONG_FA== 91 ))||new_error){ if(qbevent){evnt(15749);if(r)goto S_17434;} do{ *_FUNC_EVALUATEFUNC_LONG_SQB= 1 ; if(!qbevent)break;evnt(15749);}while(r); } S_17437:; if ((-(*_FUNC_EVALUATEFUNC_LONG_FA== 93 ))||new_error){ if(qbevent){evnt(15750);if(r)goto S_17437;} do{ *_FUNC_EVALUATEFUNC_LONG_SQB= 0 ; if(!qbevent)break;evnt(15750);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST=*_FUNC_EVALUATEFUNC_LONG_A; if(!qbevent)break;evnt(15750);}while(r); } } fornext_exit_2380:; do{ *_FUNC_EVALUATEFUNC_LONG_OMITARGS=*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST-*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST+ 1 ; if(!qbevent)break;evnt(15752);}while(r); S_17443:; if (((-(*_FUNC_EVALUATEFUNC_LONG_ARGS!=(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(808))-*_FUNC_EVALUATEFUNC_LONG_OMITARGS)))&(-(*_FUNC_EVALUATEFUNC_LONG_ARGS!=*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(808)))))||new_error){ if(qbevent){evnt(15754);if(r)goto S_17443;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Incorrect number of arguments passed to function",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15754);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15754);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_PASSOMIT= 1 ; if(!qbevent)break;evnt(15756);}while(r); S_17448:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(808))==*_FUNC_EVALUATEFUNC_LONG_ARGS))||new_error){ if(qbevent){evnt(15758);if(r)goto S_17448;} do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST= 0 ; if(!qbevent)break;evnt(15758);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST= 0 ; if(!qbevent)break;evnt(15758);}while(r); } }else{ S_17453:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ASC",3)))&(-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 2 ))))||new_error){ if(qbevent){evnt(15762);if(r)goto S_17453;} do{ goto LABEL_SKIPARGNUMCHK; if(!qbevent)break;evnt(15762);}while(r); } S_17456:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(808))!=*_FUNC_EVALUATEFUNC_LONG_ARGS))||new_error){ if(qbevent){evnt(15763);if(r)goto S_17456;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Incorrect number of arguments passed to function",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15763);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15763);}while(r); } } LABEL_SKIPARGNUMCHK:; if(qbevent){evnt(15767);r=0;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(550)),256,1)),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15769);}while(r); S_17462:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(808))!= 0 ))||new_error){ if(qbevent){evnt(15772);if(r)goto S_17462;} do{ *_FUNC_EVALUATEFUNC_LONG_CURARG= 1 ; if(!qbevent)break;evnt(15774);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_FIRSTI= 1 ; if(!qbevent)break;evnt(15775);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_N=FUNC_NUMELEMENTS(_FUNC_EVALUATEFUNC_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15777);}while(r); S_17466:; if ((-(*_FUNC_EVALUATEFUNC_LONG_N== 0 ))||new_error){ if(qbevent){evnt(15778);if(r)goto S_17466;} do{ *_FUNC_EVALUATEFUNC_LONG_I= 0 ; if(!qbevent)break;evnt(15778);}while(r); do{ goto LABEL_NOARGS; if(!qbevent)break;evnt(15778);}while(r); } S_17470:; fornext_value2384= 1 ; fornext_finalvalue2384=*_FUNC_EVALUATEFUNC_LONG_N; fornext_step2384= 1 ; if (fornext_step2384<0) fornext_step_negative2384=1; else fornext_step_negative2384=0; if (new_error) goto fornext_error2384; goto fornext_entrylabel2384; while(1){ fornext_value2384=fornext_step2384+(*_FUNC_EVALUATEFUNC_LONG_I); fornext_entrylabel2384: *_FUNC_EVALUATEFUNC_LONG_I=fornext_value2384; if (fornext_step_negative2384){ if (fornext_value2384fornext_finalvalue2384) break; } fornext_error2384:; if(qbevent){evnt(15780);if(r)goto S_17470;} S_17471:; if (((-(*_FUNC_EVALUATEFUNC_LONG_CURARG>=*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST))&(-(*_FUNC_EVALUATEFUNC_LONG_CURARG<=*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(15784);if(r)goto S_17471;} LABEL_NOARGS:; if(qbevent){evnt(15785);r=0;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(810)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15786);}while(r); S_17473:; fornext_value2386= 1 ; fornext_finalvalue2386=*_FUNC_EVALUATEFUNC_LONG_OMITARGS- 1 ; fornext_step2386= 1 ; if (fornext_step2386<0) fornext_step_negative2386=1; else fornext_step_negative2386=0; if (new_error) goto fornext_error2386; goto fornext_entrylabel2386; while(1){ fornext_value2386=fornext_step2386+(*_FUNC_EVALUATEFUNC_LONG_FI); fornext_entrylabel2386: *_FUNC_EVALUATEFUNC_LONG_FI=fornext_value2386; if (fornext_step_negative2386){ if (fornext_value2386fornext_finalvalue2386) break; } fornext_error2386:; if(qbevent){evnt(15790);if(r)goto S_17473;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("NULL,",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15790);}while(r); } fornext_exit_2385:; do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("NULL",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15790);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_CURARG=*_FUNC_EVALUATEFUNC_LONG_CURARG+*_FUNC_EVALUATEFUNC_LONG_OMITARGS; if(!qbevent)break;evnt(15791);}while(r); S_17478:; if ((-(*_FUNC_EVALUATEFUNC_LONG_I==*_FUNC_EVALUATEFUNC_LONG_N))||new_error){ if(qbevent){evnt(15792);if(r)goto S_17478;} do{ goto fornext_exit_2383; if(!qbevent)break;evnt(15792);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15793);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_L,FUNC_GETELEMENT(_FUNC_EVALUATEFUNC_STRING_A,_FUNC_EVALUATEFUNC_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15796);}while(r); S_17484:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_L,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15797);if(r)goto S_17484;} do{ *_FUNC_EVALUATEFUNC_LONG_B=*_FUNC_EVALUATEFUNC_LONG_B+ 1 ; if(!qbevent)break;evnt(15797);}while(r); } S_17487:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15798);if(r)goto S_17487;} do{ *_FUNC_EVALUATEFUNC_LONG_B=*_FUNC_EVALUATEFUNC_LONG_B- 1 ; if(!qbevent)break;evnt(15798);}while(r); } S_17490:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(_FUNC_EVALUATEFUNC_STRING_L,qbs_new_txt_len(",",1)))&(-(*_FUNC_EVALUATEFUNC_LONG_B== 0 )))|(-(*_FUNC_EVALUATEFUNC_LONG_I==*_FUNC_EVALUATEFUNC_LONG_N))))||new_error){ if(qbevent){evnt(15799);if(r)goto S_17490;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(810)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15801);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_NELE=qbs_asc(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2644)),100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15802);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2744)),100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15803);}while(r); S_17494:; if ((-(*_FUNC_EVALUATEFUNC_LONG_I==*_FUNC_EVALUATEFUNC_LONG_N))||new_error){ if(qbevent){evnt(15805);if(r)goto S_17494;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_GETELEMENTS(_FUNC_EVALUATEFUNC_STRING_A,_FUNC_EVALUATEFUNC_LONG_FIRSTI,_FUNC_EVALUATEFUNC_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15806);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_GETELEMENTS(_FUNC_EVALUATEFUNC_STRING_A,_FUNC_EVALUATEFUNC_LONG_FIRSTI,&(pass2387=*_FUNC_EVALUATEFUNC_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15808);}while(r); } S_17499:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_left(_FUNC_EVALUATEFUNC_STRING_E, 2 )),(qbs_add(qbs_new_txt_len("(",1),__STRING1_SP)))))||new_error){ if(qbevent){evnt(15811);if(r)goto S_17499;} do{ *_FUNC_EVALUATEFUNC_LONG_DEREFERENCE= 1 ; if(!qbevent)break;evnt(15811);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_DEREFERENCE= 0 ; if(!qbevent)break;evnt(15811);}while(r); } S_17504:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_CV",3))))||new_error){ if(qbevent){evnt(15816);if(r)goto S_17504;} S_17505:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(15817);if(r)goto S_17505;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,FUNC_TYPE2SYMBOL(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15818);}while(r); S_17507:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15819);if(r)goto S_17507;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15819);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15820);}while(r); do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(15821);}while(r); } } S_17514:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MK",3))))||new_error){ if(qbevent){evnt(15827);if(r)goto S_17514;} S_17515:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(15828);if(r)goto S_17515;} S_17516:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(15829);if(r)goto S_17516;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,FUNC_TYPE2SYMBOL(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15830);}while(r); S_17518:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15831);if(r)goto S_17518;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15831);}while(r); } S_17521:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(15832);if(r)goto S_17521;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2388; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_MK:[",5),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len("]:[",3)),_FUNC_EVALUATEFUNC_STRING_MKTYPE),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip2388; skip2388: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15832);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15833);}while(r); do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(15834);}while(r); } } } S_17529:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("UBOUND",6)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("LBOUND",6)))))||new_error){ if(qbevent){evnt(15839);if(r)goto S_17529;} S_17530:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(15840);if(r)goto S_17530;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15842);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATE(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15843);}while(r); S_17533:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15844);if(r)goto S_17533;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15844);}while(r); } S_17536:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(15845);if(r)goto S_17536;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected array-name",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15845);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15845);}while(r); } S_17540:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(15846);if(r)goto S_17540;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected array-name",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15846);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15846);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_ULBOUNDARRAY,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15848);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_ULBOUNDARRAYTYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(15849);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15850);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15851);}while(r); do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(15852);}while(r); } } S_17551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("INPUT",5))))||new_error){ if(qbevent){evnt(15858);if(r)goto S_17551;} S_17552:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(15859);if(r)goto S_17552;} S_17553:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(15860);if(r)goto S_17553;} S_17554:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_left(_FUNC_EVALUATEFUNC_STRING_E, 2 )),(qbs_add(qbs_new_txt_len("#",1),__STRING1_SP)))))||new_error){ if(qbevent){evnt(15861);if(r)goto S_17554;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15861);}while(r); } } } } S_17560:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ASC",3))))||new_error){ if(qbevent){evnt(15868);if(r)goto S_17560;} S_17561:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(15869);if(r)goto S_17561;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E,&(pass2390= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15870);}while(r); S_17563:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15871);if(r)goto S_17563;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15871);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15872);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15873);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(15874);}while(r); } } S_17571:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MEMGET",7))))||new_error){ if(qbevent){evnt(15885);if(r)goto S_17571;} S_17572:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(15886);if(r)goto S_17572;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MEMGET_BLK,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15887);}while(r); } S_17575:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(15889);if(r)goto S_17575;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MEMGET_OFFS,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15890);}while(r); } S_17578:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 3 ))||new_error){ if(qbevent){evnt(15892);if(r)goto S_17578;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_ucase(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15893);}while(r); S_17580:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len("*",1)),__STRING1_SP),0)))||new_error){ if(qbevent){evnt(15894);if(r)goto S_17580;} S_17581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_EVALUATEFUNC_STRING_E, 2 ),qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(15895);if(r)goto S_17581;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_left(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15896);}while(r); }else{ S_17584:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_right(_FUNC_EVALUATEFUNC_STRING_E, 1 ),qbs_new_txt_len("&",1)))|(qbs_equal(qbs_right(_FUNC_EVALUATEFUNC_STRING_E, 1 ),qbs_new_txt_len("%",1)))))||new_error){ if(qbevent){evnt(15898);if(r)goto S_17584;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_left(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15898);}while(r); } } } do{ *_FUNC_EVALUATEFUNC_LONG_T=FUNC_TYPNAME2TYP(_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15901);}while(r); S_17590:; if ((-(*_FUNC_EVALUATEFUNC_LONG_T== 0 ))||new_error){ if(qbevent){evnt(15902);if(r)goto S_17590;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid TYPE name",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15902);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15902);}while(r); } S_17594:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(15903);if(r)goto S_17594;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("_BIT TYPE unsupported",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15903);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15903);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_MEMGET_SIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(15904);}while(r); S_17599:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(15905);if(r)goto S_17599;} S_17600:; if ((-((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(15906);if(r)goto S_17600;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * ...",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15906);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15906);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MEMGET_CTYP,qbs_new_txt_len("qbs*",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15907);}while(r); }else{ S_17606:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(15909);if(r)goto S_17606;} do{ *_FUNC_EVALUATEFUNC_LONG_MEMGET_SIZE=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATEFUNC_LONG_T& 511 )-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ; if(!qbevent)break;evnt(15910);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MEMGET_CTYP,qbs_new_txt_len("void*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15911);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_MEMGET_SIZE=(*_FUNC_EVALUATEFUNC_LONG_T& 511 )/ 8 ; if(!qbevent)break;evnt(15913);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MEMGET_CTYP,FUNC_TYP2CTYP(_FUNC_EVALUATEFUNC_LONG_T,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15914);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_OFFS,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_MEMGET_OFFS,&(pass2393=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15923);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_BLKOFFS,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_MEMGET_BLK,&(pass2394= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15924);}while(r); S_17616:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(15925);if(r)goto S_17616;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_OFFS,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func__memget((mem_block*)",25),_FUNC_EVALUATEFUNC_STRING_BLKOFFS),qbs_new_txt_len(",",1)),_FUNC_EVALUATEFUNC_STRING_OFFS),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_MEMGET_SIZE)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15927);}while(r); } S_17619:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(15929);if(r)goto S_17619;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_new_txt_len((char*)",23),_FUNC_EVALUATEFUNC_STRING_OFFS),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_MEMGET_SIZE)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15930);}while(r); }else{ S_17622:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(15932);if(r)goto S_17622;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("((void*)+",9),_FUNC_EVALUATEFUNC_STRING_OFFS),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15933);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T=*__LONG_ISUDT+*__LONG_ISPOINTER+(*_FUNC_EVALUATEFUNC_LONG_T& 511 ); if(!qbevent)break;evnt(15934);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(",2),_FUNC_EVALUATEFUNC_STRING_MEMGET_CTYP),qbs_new_txt_len("*)(",3)),_FUNC_EVALUATEFUNC_STRING_OFFS),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15936);}while(r); S_17627:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(15937);if(r)goto S_17627;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15937);}while(r); } } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_T; if(!qbevent)break;evnt(15947);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(15950);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E2,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15955);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATE(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15956);}while(r); S_17638:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15957);if(r)goto S_17638;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15957);}while(r); } S_17641:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MEM",4))))||new_error){ if(qbevent){evnt(15961);if(r)goto S_17641;} S_17642:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(15962);if(r)goto S_17642;} S_17643:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 1 ))||new_error){ if(qbevent){evnt(15963);if(r)goto S_17643;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP= -7 ; if(!qbevent)break;evnt(15964);}while(r); } S_17646:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 2 ))||new_error){ if(qbevent){evnt(15966);if(r)goto S_17646;} S_17647:; if ((*__LONG_CLOUD)||new_error){ if(qbevent){evnt(15967);if(r)goto S_17647;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Feature not supported on QLOUD",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15967);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(550)),256,1)),qbs_new_txt_len("_at_offset",10)),qbs_right(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_R->len-((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(550)),256,1)))->len)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15968);}while(r); S_17651:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET)== 0 ))||new_error){ if(qbevent){evnt(15969);if(r)goto S_17651;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected _MEM(_OFFSET-value,...)",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15969);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15969);}while(r); } } } } S_17658:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_OFFSET",7))))||new_error){ if(qbevent){evnt(15975);if(r)goto S_17658;} S_17659:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(15976);if(r)goto S_17659;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("_OFFSET expects the name of a variable/array",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15977);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15977);}while(r); } S_17663:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(15979);if(r)goto S_17663;} S_17664:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(15980);if(r)goto S_17664;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("_OFFSET cannot reference _BIT type arrays",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15980);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15980);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("((uptrszint)(",13),FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2396= -6 ))),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15982);}while(r); S_17670:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15983);if(r)goto S_17670;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15983);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(15984);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(15985);}while(r); } S_17676:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(15989);if(r)goto S_17676;} S_17677:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKSMBF",6)))&(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(528)),8,1)),qbs_new_txt_len("$",1)))))||new_error){ if(qbevent){evnt(15990);if(r)goto S_17677;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15990);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15990);}while(r); } S_17681:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKDMBF",6)))&(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(528)),8,1)),qbs_new_txt_len("$",1)))))||new_error){ if(qbevent){evnt(15991);if(r)goto S_17681;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15991);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15991);}while(r); } } S_17686:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ENVIRON",7))))||new_error){ if(qbevent){evnt(15995);if(r)goto S_17686;} S_17687:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(15996);if(r)goto S_17687;} S_17688:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(15997);if(r)goto S_17688;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2397= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15997);}while(r); } S_17691:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15998);if(r)goto S_17691;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15998);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(15999);}while(r); } } S_17697:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("LEN",3))))||new_error){ if(qbevent){evnt(16004);if(r)goto S_17697;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16005);}while(r); S_17699:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16006);if(r)goto S_17699;} S_17700:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(16008);if(r)goto S_17700;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("((int32)(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")->len)",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16009);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16010);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("String expression or variable name required in LEN statement",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16012);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16012);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2398= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16014);}while(r); S_17708:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16015);if(r)goto S_17708;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16015);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16016);}while(r); } S_17713:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("OCT",3))))||new_error){ if(qbevent){evnt(16020);if(r)goto S_17713;} S_17714:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(16021);if(r)goto S_17714;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16022);}while(r); S_17716:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16024);if(r)goto S_17716;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16024);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16024);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 0 ; if(!qbevent)break;evnt(16025);}while(r); S_17721:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16026);if(r)goto S_17721;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2399= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16026);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 1 ; if(!qbevent)break;evnt(16026);}while(r); } S_17725:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16027);if(r)goto S_17725;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16027);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16028);}while(r); S_17729:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16029);if(r)goto S_17729;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func_oct(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_BITS)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16030);}while(r); }else{ S_17732:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16032);if(r)goto S_17732;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_oct_float(",15),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16033);}while(r); }else{ S_17735:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16035);if(r)goto S_17735;} S_17736:; if ((-(*_FUNC_EVALUATEFUNC_LONG_WASREF== 0 ))||new_error){ if(qbevent){evnt(16036);if(r)goto S_17736;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS= 0 ; if(!qbevent)break;evnt(16036);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func_oct(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_BITS)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16038);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16041);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16042);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16043);}while(r); } } S_17748:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("HEX",3))))||new_error){ if(qbevent){evnt(16050);if(r)goto S_17748;} S_17749:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(16051);if(r)goto S_17749;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16052);}while(r); S_17751:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16053);if(r)goto S_17751;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16053);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16053);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 0 ; if(!qbevent)break;evnt(16054);}while(r); S_17756:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16055);if(r)goto S_17756;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2400= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16055);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 1 ; if(!qbevent)break;evnt(16055);}while(r); } S_17760:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16056);if(r)goto S_17760;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16056);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16057);}while(r); S_17764:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16058);if(r)goto S_17764;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS=(*_FUNC_EVALUATEFUNC_LONG_BITS+ 3 )/ 4 ; if(!qbevent)break;evnt(16059);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func_hex(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_CHARS)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16060);}while(r); }else{ S_17768:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16062);if(r)goto S_17768;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_hex_float(",15),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16063);}while(r); }else{ S_17771:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(16065);if(r)goto S_17771;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 2 ; if(!qbevent)break;evnt(16065);}while(r); } S_17774:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(16066);if(r)goto S_17774;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 4 ; if(!qbevent)break;evnt(16066);}while(r); } S_17777:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16067);if(r)goto S_17777;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 8 ; if(!qbevent)break;evnt(16067);}while(r); } S_17780:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16068);if(r)goto S_17780;} S_17781:; if ((-(*_FUNC_EVALUATEFUNC_LONG_WASREF== 1 ))||new_error){ if(qbevent){evnt(16069);if(r)goto S_17781;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 16 ; if(!qbevent)break;evnt(16069);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 0 ; if(!qbevent)break;evnt(16069);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func_hex(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_CHARS)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16071);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16074);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16075);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16076);}while(r); } } S_17795:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("EXP",3))))||new_error){ if(qbevent){evnt(16089);if(r)goto S_17795;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16090);}while(r); S_17797:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16091);if(r)goto S_17797;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16091);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16091);}while(r); } S_17801:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16092);if(r)goto S_17801;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2401= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16092);}while(r); } S_17804:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16093);if(r)goto S_17804;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16093);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16094);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16095);}while(r); S_17809:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16096);if(r)goto S_17809;} S_17810:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16097);if(r)goto S_17810;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_exp_single(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16097);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_exp_float(",15),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16097);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16097);}while(r); } }else{ S_17817:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16099);if(r)goto S_17817;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_exp_float(",15),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16100);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16100);}while(r); }else{ S_17821:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(16102);if(r)goto S_17821;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_exp_single(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16102);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_exp_float(",15),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16102);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16102);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16105);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16106);}while(r); } S_17832:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("INT",3))))||new_error){ if(qbevent){evnt(16110);if(r)goto S_17832;} S_17833:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16111);if(r)goto S_17833;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16111);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16111);}while(r); } S_17837:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16112);if(r)goto S_17837;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2402= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16112);}while(r); } S_17840:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16113);if(r)goto S_17840;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16113);}while(r); } S_17843:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16115);if(r)goto S_17843;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("floor(",6),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16115);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16115);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16116);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16117);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16118);}while(r); } S_17852:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("FIX",3))))||new_error){ if(qbevent){evnt(16122);if(r)goto S_17852;} S_17853:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16123);if(r)goto S_17853;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16123);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16123);}while(r); } S_17857:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16124);if(r)goto S_17857;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2403= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16124);}while(r); } S_17860:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16125);if(r)goto S_17860;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16125);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16127);}while(r); S_17864:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16128);if(r)goto S_17864;} S_17865:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16129);if(r)goto S_17865;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_fix_float(",15),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16129);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_fix_double(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16129);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16131);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16133);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16134);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16135);}while(r); } S_17877:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_ROUND",6))))||new_error){ if(qbevent){evnt(16139);if(r)goto S_17877;} S_17878:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16140);if(r)goto S_17878;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16140);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16140);}while(r); } S_17882:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16141);if(r)goto S_17882;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2404= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16141);}while(r); } S_17885:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16142);if(r)goto S_17885;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16142);}while(r); } S_17888:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16144);if(r)goto S_17888;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16145);}while(r); S_17890:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16146);if(r)goto S_17890;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_round_float(",17),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16146);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_round_double(",18),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16146);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16148);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16150);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16151);}while(r); S_17900:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16152);if(r)goto S_17900;} S_17901:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(16153);if(r)goto S_17901;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16153);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16153);}while(r); } } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16155);}while(r); } S_17909:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CDBL",4))))||new_error){ if(qbevent){evnt(16160);if(r)goto S_17909;} S_17910:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16161);if(r)goto S_17910;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16161);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16161);}while(r); } S_17914:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16162);if(r)goto S_17914;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16162);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16162);}while(r); } S_17918:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16163);if(r)goto S_17918;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2405= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16163);}while(r); } S_17921:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16164);if(r)goto S_17921;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16164);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16166);}while(r); S_17925:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16167);if(r)goto S_17925;} S_17926:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16168);if(r)goto S_17926;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_cdbl_float(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16168);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("((double)(",10),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16170);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16172);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16173);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16174);}while(r); } S_17936:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CSNG",4))))||new_error){ if(qbevent){evnt(16178);if(r)goto S_17936;} S_17937:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16179);if(r)goto S_17937;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16179);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16179);}while(r); } S_17941:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16180);if(r)goto S_17941;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16180);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16180);}while(r); } S_17945:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16181);if(r)goto S_17945;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2406= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16181);}while(r); } S_17948:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16182);if(r)goto S_17948;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16182);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16184);}while(r); S_17952:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16185);if(r)goto S_17952;} S_17953:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16186);if(r)goto S_17953;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_csng_double(",17),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16186);}while(r); } S_17956:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16187);if(r)goto S_17956;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_csng_float(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16187);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("((double)(",10),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16189);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16191);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16192);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16193);}while(r); } S_17966:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CLNG",4))))||new_error){ if(qbevent){evnt(16198);if(r)goto S_17966;} S_17967:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16199);if(r)goto S_17967;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16199);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16199);}while(r); } S_17971:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16200);if(r)goto S_17971;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16200);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16200);}while(r); } S_17975:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16201);if(r)goto S_17975;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2407= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16201);}while(r); } S_17978:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16202);if(r)goto S_17978;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16202);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16204);}while(r); S_17982:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16205);if(r)goto S_17982;} S_17983:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16206);if(r)goto S_17983;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_clng_float(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16206);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_clng_double(",17),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16206);}while(r); } }else{ S_17989:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16208);if(r)goto S_17989;} S_17990:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16209);if(r)goto S_17990;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_clng_ulong(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16209);}while(r); } S_17993:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16210);if(r)goto S_17993;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_clng_uint64(",17),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16210);}while(r); } }else{ S_17997:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16212);if(r)goto S_17997;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_clng_int64(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16212);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16215);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 32 ; if(!qbevent)break;evnt(16216);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16217);}while(r); } S_18006:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CINT",4))))||new_error){ if(qbevent){evnt(16221);if(r)goto S_18006;} S_18007:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16222);if(r)goto S_18007;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16222);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16222);}while(r); } S_18011:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16223);if(r)goto S_18011;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16223);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16223);}while(r); } S_18015:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16224);if(r)goto S_18015;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2408= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16224);}while(r); } S_18018:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16225);if(r)goto S_18018;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16225);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16227);}while(r); S_18022:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16228);if(r)goto S_18022;} S_18023:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16229);if(r)goto S_18023;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_cint_float(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16229);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_cint_double(",17),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16229);}while(r); } }else{ S_18029:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16231);if(r)goto S_18029;} S_18030:; if (((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 15 ))&(-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 32 )))||new_error){ if(qbevent){evnt(16232);if(r)goto S_18030;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_cint_ulong(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16232);}while(r); } S_18033:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16233);if(r)goto S_18033;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_cint_uint64(",17),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16233);}while(r); } }else{ S_18037:; if (((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 16 ))&(-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 32 )))||new_error){ if(qbevent){evnt(16235);if(r)goto S_18037;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_cint_long(",15),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16235);}while(r); } S_18040:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16236);if(r)goto S_18040;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func_cint_int64(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16236);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16239);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 16 ; if(!qbevent)break;evnt(16240);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16241);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 0 ; if(!qbevent)break;evnt(16245);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SIZE= 0 ; if(!qbevent)break;evnt(16246);}while(r); S_18051:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKI",3))))||new_error){ if(qbevent){evnt(16247);if(r)goto S_18051;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 1 ; if(!qbevent)break;evnt(16247);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16247);}while(r); } S_18055:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKL",3))))||new_error){ if(qbevent){evnt(16248);if(r)goto S_18055;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 2 ; if(!qbevent)break;evnt(16248);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16248);}while(r); } S_18059:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKS",3))))||new_error){ if(qbevent){evnt(16249);if(r)goto S_18059;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 3 ; if(!qbevent)break;evnt(16249);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16249);}while(r); } S_18063:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKD",3))))||new_error){ if(qbevent){evnt(16250);if(r)goto S_18063;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 4 ; if(!qbevent)break;evnt(16250);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16250);}while(r); } S_18067:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MK",3))))||new_error){ if(qbevent){evnt(16251);if(r)goto S_18067;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= -1 ; if(!qbevent)break;evnt(16251);}while(r); } S_18070:; if ((*_FUNC_EVALUATEFUNC_LONG_MKTYPE)||new_error){ if(qbevent){evnt(16252);if(r)goto S_18070;} S_18071:; if (((-(*_FUNC_EVALUATEFUNC_LONG_MKTYPE!= -1 ))|(-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 )))||new_error){ if(qbevent){evnt(16253);if(r)goto S_18071;} S_18072:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16254);if(r)goto S_18072;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16254);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16254);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_QTYP= 0 ; if(!qbevent)break;evnt(16256);}while(r); S_18077:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(16257);if(r)goto S_18077;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("b",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16257);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_BYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16257);}while(r); } S_18081:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(16258);if(r)goto S_18081;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ub",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16258);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16258);}while(r); } S_18085:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(16259);if(r)goto S_18085;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16259);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16259);}while(r); } S_18089:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(16260);if(r)goto S_18089;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16260);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16260);}while(r); } S_18093:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(16261);if(r)goto S_18093;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("l",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16261);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16261);}while(r); } S_18097:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(16262);if(r)goto S_18097;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ul",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16262);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16262);}while(r); } S_18101:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(16263);if(r)goto S_18101;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i64",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16263);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16263);}while(r); } S_18105:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(16264);if(r)goto S_18105;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui64",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16264);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16264);}while(r); } S_18109:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(16265);if(r)goto S_18109;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("s",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16265);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16265);}while(r); } S_18113:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(16266);if(r)goto S_18113;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("d",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16266);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16266);}while(r); } S_18117:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(16267);if(r)goto S_18117;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("f",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16267);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16267);}while(r); } S_18121:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATEFUNC_STRING_MKTYPE, 2 ),qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(16268);if(r)goto S_18121;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ubit",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16268);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16268);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SIZE=qbr(func_val(qbs_right(_FUNC_EVALUATEFUNC_STRING_MKTYPE,_FUNC_EVALUATEFUNC_STRING_MKTYPE->len- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16268);}while(r); } S_18126:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATEFUNC_STRING_MKTYPE, 1 ),qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(16269);if(r)goto S_18126;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("bit",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16269);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16269);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SIZE=qbr(func_val(qbs_right(_FUNC_EVALUATEFUNC_STRING_MKTYPE,_FUNC_EVALUATEFUNC_STRING_MKTYPE->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16269);}while(r); } S_18131:; if ((-(*_FUNC_EVALUATEFUNC_LONG_QTYP== 0 ))||new_error){ if(qbevent){evnt(16270);if(r)goto S_18131;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("_MK only accepts numeric types",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16270);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16270);}while(r); } S_18135:; if ((*_FUNC_EVALUATEFUNC_LONG_SIZE)||new_error){ if(qbevent){evnt(16271);if(r)goto S_18135;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("2string(",8)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_SIZE)),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16272);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("2string(",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16274);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_NOCOMMA= 1 ; if(!qbevent)break;evnt(16276);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=*_FUNC_EVALUATEFUNC_LONG_QTYP; if(!qbevent)break;evnt(16277);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 0 ; if(!qbevent)break;evnt(16282);}while(r); S_18145:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVI",3))))||new_error){ if(qbevent){evnt(16283);if(r)goto S_18145;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 1 ; if(!qbevent)break;evnt(16283);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16283);}while(r); } S_18149:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVL",3))))||new_error){ if(qbevent){evnt(16284);if(r)goto S_18149;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 2 ; if(!qbevent)break;evnt(16284);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16284);}while(r); } S_18153:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVS",3))))||new_error){ if(qbevent){evnt(16285);if(r)goto S_18153;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 3 ; if(!qbevent)break;evnt(16285);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16285);}while(r); } S_18157:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVD",3))))||new_error){ if(qbevent){evnt(16286);if(r)goto S_18157;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 4 ; if(!qbevent)break;evnt(16286);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16286);}while(r); } S_18161:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_CV",3))))||new_error){ if(qbevent){evnt(16287);if(r)goto S_18161;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= -1 ; if(!qbevent)break;evnt(16287);}while(r); } S_18164:; if ((*_FUNC_EVALUATEFUNC_LONG_CVTYPE)||new_error){ if(qbevent){evnt(16288);if(r)goto S_18164;} S_18165:; if (((-(*_FUNC_EVALUATEFUNC_LONG_CVTYPE!= -1 ))|(-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 )))||new_error){ if(qbevent){evnt(16289);if(r)goto S_18165;} S_18166:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(16290);if(r)goto S_18166;} do{ SUB_GIVE_ERROR(qbs_add(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len(" requires a STRING argument",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16290);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16290);}while(r); } S_18170:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16291);if(r)goto S_18170;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2411= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16291);}while(r); } S_18173:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16292);if(r)goto S_18173;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16292);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 0 ; if(!qbevent)break;evnt(16293);}while(r); S_18177:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(16294);if(r)goto S_18177;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("b",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16294);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_BYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16294);}while(r); } S_18181:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(16295);if(r)goto S_18181;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ub",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16295);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16295);}while(r); } S_18185:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(16296);if(r)goto S_18185;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16296);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16296);}while(r); } S_18189:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(16297);if(r)goto S_18189;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16297);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16297);}while(r); } S_18193:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(16298);if(r)goto S_18193;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("l",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16298);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16298);}while(r); } S_18197:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(16299);if(r)goto S_18197;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ul",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16299);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16299);}while(r); } S_18201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(16300);if(r)goto S_18201;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i64",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16300);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16300);}while(r); } S_18205:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(16301);if(r)goto S_18205;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui64",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16301);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16301);}while(r); } S_18209:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(16302);if(r)goto S_18209;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("s",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16302);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16302);}while(r); } S_18213:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(16303);if(r)goto S_18213;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("d",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16303);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16303);}while(r); } S_18217:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(16304);if(r)goto S_18217;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("f",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16304);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16304);}while(r); } S_18221:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATEFUNC_STRING_CVTYPE, 2 ),qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(16305);if(r)goto S_18221;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ubit",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16305);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16305);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SIZE=qbr(func_val(qbs_right(_FUNC_EVALUATEFUNC_STRING_CVTYPE,_FUNC_EVALUATEFUNC_STRING_CVTYPE->len- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16305);}while(r); } S_18226:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATEFUNC_STRING_CVTYPE, 1 ),qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(16306);if(r)goto S_18226;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("bit",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16306);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16306);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SIZE=qbr(func_val(qbs_right(_FUNC_EVALUATEFUNC_STRING_CVTYPE,_FUNC_EVALUATEFUNC_STRING_CVTYPE->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16306);}while(r); } S_18231:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(16307);if(r)goto S_18231;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("_CV cannot return STRING type!",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16307);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16307);}while(r); } S_18235:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("bit",3)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ubit",4)))))||new_error){ if(qbevent){evnt(16308);if(r)goto S_18235;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("string2",7),_FUNC_EVALUATEFUNC_STRING_CTYPE),qbs_new_txt_len("(",1)),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_SIZE)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16309);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("string2",7),_FUNC_EVALUATEFUNC_STRING_CTYPE),qbs_new_txt_len("(",1)),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16311);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16313);}while(r); } } S_18243:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)),256,1)),qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(16318);if(r)goto S_18243;} S_18244:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(16319);if(r)goto S_18244;} S_18245:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16320);if(r)goto S_18245;} S_18246:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16321);if(r)goto S_18246;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2414= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16321);}while(r); } S_18249:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16322);if(r)goto S_18249;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16322);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP= 64 ; if(!qbevent)break;evnt(16323);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len("->chr[0])",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16324);}while(r); } } } S_18257:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)),256,1)),qbs_new_txt_len("SADD",4))))||new_error){ if(qbevent){evnt(16330);if(r)goto S_18257;} S_18258:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16331);if(r)goto S_18258;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("SADD only accepts variable-length string variables",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16332);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16332);}while(r); } S_18262:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16334);if(r)goto S_18262;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("SADD only accepts variable-length string variables",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16335);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16335);}while(r); } S_18266:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(16337);if(r)goto S_18266;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16338);}while(r); do{ tmp_long=array_check((qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(16339);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("[CONVENTIONAL_MEMORY_REQUIRED]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16340);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16341);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16342);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2415= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16344);}while(r); S_18274:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16345);if(r)goto S_18274;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16345);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("((unsigned short)(",18),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len("->chr-&cmem[1280]))",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16346);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16347);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16348);}while(r); } S_18281:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)),256,1)),qbs_new_txt_len("VARPTR",6))))||new_error){ if(qbevent){evnt(16352);if(r)goto S_18281;} S_18282:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16353);if(r)goto S_18282;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected reference to a variable/array",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16354);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16354);}while(r); } S_18286:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(16357);if(r)goto S_18286;} S_18287:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(16358);if(r)goto S_18287;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16359);}while(r); do{ tmp_long=array_check((qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(16360);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("[CONVENTIONAL_MEMORY_REQUIRED]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16361);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(16362);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16363);}while(r); } S_18294:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16366);if(r)goto S_18294;} S_18295:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(16367);if(r)goto S_18295;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("VARPTR$ only accepts variable-length string arrays",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16367);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16367);}while(r); } S_18299:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16368);if(r)goto S_18299;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("VARPTR$ only accepts variable-length string arrays",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16368);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16368);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2416= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16373);}while(r); S_18305:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16374);if(r)goto S_18305;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16374);}while(r); } S_18308:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16375);if(r)goto S_18308;} S_18309:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16376);if(r)goto S_18309;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2417= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16376);}while(r); } S_18312:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16377);if(r)goto S_18312;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16377);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("->cmem_descriptor_offset",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16378);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T= 3 ; if(!qbevent)break;evnt(16379);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("((unsigned short)(((uint8*)",27),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")-&cmem[1280]))",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16381);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T= 0 ; if(!qbevent)break;evnt(16393);}while(r); S_18320:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16394);if(r)goto S_18320;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 128 ; if(!qbevent)break;evnt(16394);}while(r); } S_18323:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16395);if(r)goto S_18323;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 64 ; if(!qbevent)break;evnt(16396);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 63 ); if(!qbevent)break;evnt(16397);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16399);}while(r); S_18328:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16400);if(r)goto S_18328;} S_18329:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16401);if(r)goto S_18329;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 4 ; if(!qbevent)break;evnt(16401);}while(r); } S_18332:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16402);if(r)goto S_18332;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 8 ; if(!qbevent)break;evnt(16402);}while(r); } S_18335:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 256 ))||new_error){ if(qbevent){evnt(16403);if(r)goto S_18335;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 6 ; if(!qbevent)break;evnt(16403);}while(r); } }else{ S_18339:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(16405);if(r)goto S_18339;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 1 ; if(!qbevent)break;evnt(16405);}while(r); } S_18342:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(16406);if(r)goto S_18342;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 2 ; if(!qbevent)break;evnt(16406);}while(r); } S_18345:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16407);if(r)goto S_18345;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 20 ; if(!qbevent)break;evnt(16407);}while(r); } S_18348:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16408);if(r)goto S_18348;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 5 ; if(!qbevent)break;evnt(16408);}while(r); } } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func_varptr_helper(",19),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_T)),qbs_new_txt_len(",",1)),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16412);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(16413);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16414);}while(r); } S_18358:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(16428);if(r)goto S_18358;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16429);}while(r); do{ tmp_long=array_check((qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(16430);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("[CONVENTIONAL_MEMORY_REQUIRED]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16431);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16432);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16433);}while(r); } S_18365:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16436);if(r)goto S_18365;} S_18366:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16437);if(r)goto S_18366;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("VARPTR cannot reference _BIT type arrays",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16437);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16437);}while(r); } S_18370:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16440);if(r)goto S_18370;} S_18371:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16441);if(r)goto S_18371;} do{ SUB_GETID(&(pass2418=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16442);}while(r); S_18373:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16443);if(r)goto S_18373;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16443);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_M=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(16444);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_INDEX,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16445);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16446);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_FUNC_EVALUATEFUNC_STRING_INDEX),qbs_new_txt_len(")*",2)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_M)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16447);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16448);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2420= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16451);}while(r); S_18383:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16452);if(r)goto S_18383;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16452);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("->cmem_descriptor_offset",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16453);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16454);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16455);}while(r); } } S_18391:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16459);if(r)goto S_18391;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16460);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16461);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_O,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16462);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16463);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATEFUNC_STRING_O),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16464);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16465);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_M=(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(16469);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_INDEX,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16470);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16471);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_FUNC_EVALUATEFUNC_STRING_INDEX),qbs_new_txt_len(")*",2)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_M)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16472);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16473);}while(r); } S_18405:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16479);if(r)goto S_18405;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2425= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16480);}while(r); S_18407:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16481);if(r)goto S_18407;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16481);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16482);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16483);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_O,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16484);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16485);}while(r); do{ SUB_GETID(&(pass2429=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16488);}while(r); S_18415:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16489);if(r)goto S_18415;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16489);}while(r); } S_18418:; if ((*(int16*)(((char*)__UDT_ID)+(2856)))||new_error){ if(qbevent){evnt(16490);if(r)goto S_18418;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("varptr_dblock_check(((uint8*)",29),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATEFUNC_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16492);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((unsigned short)(((uint8*)",27),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(") - &cmem[1280] + (",19)),_FUNC_EVALUATEFUNC_STRING_O),qbs_new_txt_len(") ))",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16495);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16498);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16501);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2430= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16502);}while(r); S_18427:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16503);if(r)goto S_18427;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16503);}while(r); } S_18430:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16504);if(r)goto S_18430;} S_18431:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16505);if(r)goto S_18431;} do{ SUB_GETID(&(pass2431=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16508);}while(r); S_18433:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16509);if(r)goto S_18433;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16509);}while(r); } S_18436:; if ((*(int16*)(((char*)__UDT_ID)+(2856)))||new_error){ if(qbevent){evnt(16510);if(r)goto S_18436;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("varptr_dblock_check(",20),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len("->chr)",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16511);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("((unsigned short)(",18),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len("->chr-&cmem[1280]))",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16513);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("->cmem_descriptor_offset",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16517);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16519);}while(r); } do{ SUB_GETID(&(pass2432=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16524);}while(r); S_18447:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16525);if(r)goto S_18447;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16525);}while(r); } S_18450:; if ((*(int16*)(((char*)__UDT_ID)+(2856)))||new_error){ if(qbevent){evnt(16526);if(r)goto S_18450;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("varptr_dblock_check((uint8*)",28),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16527);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("((unsigned short)(((uint8*)",27),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")-&cmem[1280]))",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16529);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16532);}while(r); } S_18457:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)),256,1)),qbs_new_txt_len("VARSEG",6))))||new_error){ if(qbevent){evnt(16536);if(r)goto S_18457;} S_18458:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16537);if(r)goto S_18458;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected reference to a variable/array",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16538);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16538);}while(r); } S_18462:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(16540);if(r)goto S_18462;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16541);}while(r); do{ tmp_long=array_check((qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(16542);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("[CONVENTIONAL_MEMORY_REQUIRED]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16543);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16544);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16545);}while(r); } S_18469:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16548);if(r)goto S_18469;} S_18470:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(16549);if(r)goto S_18470;} S_18471:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16550);if(r)goto S_18471;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("80",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16551);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16552);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16553);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16556);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("( ( ((ptrszint)(",16),FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2433= 1 ))),qbs_new_txt_len("[0])) - ((ptrszint)(&cmem[0])) ) /16)",37))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16557);}while(r); S_18479:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16558);if(r)goto S_18479;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16558);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16559);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16563);}while(r); do{ SUB_GETID(&(pass2434=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16565);}while(r); S_18486:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16566);if(r)goto S_18486;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16566);}while(r); } S_18489:; if (((-(*(int16*)(((char*)__UDT_ID)+(2856))!= 0 ))&(-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(16567);if(r)goto S_18489;} S_18490:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16568);if(r)goto S_18490;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2435= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16569);}while(r); S_18492:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16570);if(r)goto S_18492;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16570);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16571);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16572);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_O,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16573);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("varseg_dblock_check(((uint8*)",29),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATEFUNC_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16574);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("varseg_dblock_check((uint8*)",28),FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2439= 1 ))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16576);}while(r); S_18501:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16577);if(r)goto S_18501;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16577);}while(r); } } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("80",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16581);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16583);}while(r); } S_18510:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -2 ))||new_error){ if(qbevent){evnt(16609);if(r)goto S_18510;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2440= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16610);}while(r); S_18512:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16611);if(r)goto S_18512;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16611);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16612);}while(r); } S_18517:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -7 ))||new_error){ if(qbevent){evnt(16615);if(r)goto S_18517;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2441= -7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16616);}while(r); S_18519:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16617);if(r)goto S_18519;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16617);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16618);}while(r); } S_18524:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -8 ))||new_error){ if(qbevent){evnt(16621);if(r)goto S_18524;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2442= -8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16622);}while(r); S_18526:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16623);if(r)goto S_18526;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16623);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16624);}while(r); } S_18531:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(16627);if(r)goto S_18531;} S_18532:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISOFFSET)== 0 ))||new_error){ if(qbevent){evnt(16628);if(r)goto S_18532;} S_18533:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(548))== 0 ))||new_error){ if(qbevent){evnt(16629);if(r)goto S_18533;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16629);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16629);}while(r); } } } do{ *_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE= 0 ; if(!qbevent)break;evnt(16634);}while(r); S_18540:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -1 ))||new_error){ if(qbevent){evnt(16635);if(r)goto S_18540;} do{ *_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE= 1 ; if(!qbevent)break;evnt(16636);}while(r); S_18542:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16637);if(r)goto S_18542;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16637);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16637);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16638);}while(r); S_18547:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(16639);if(r)goto S_18547;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16639);}while(r); } } S_18551:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(16643);if(r)goto S_18551;} S_18552:; if ((-(*_FUNC_EVALUATEFUNC_LONG_DEREFERENCE== 0 ))||new_error){ if(qbevent){evnt(16644);if(r)goto S_18552;} S_18553:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16649);if(r)goto S_18553;} S_18554:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16650);if(r)goto S_18554;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16650);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16650);}while(r); } S_18558:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(16651);if(r)goto S_18558;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16651);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16651);}while(r); } S_18562:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(16652);if(r)goto S_18562;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2443; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("evaluatefunc:array reference:[",30),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip2443; skip2443: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16652);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP2=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP; if(!qbevent)break;evnt(16655);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16655);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP2=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISFLOAT); if(!qbevent)break;evnt(16656);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISFLOAT); if(!qbevent)break;evnt(16657);}while(r); S_18569:; if ((-(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2!=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(16658);if(r)goto S_18569;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Incorrect array type passed to function",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16658);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16658);}while(r); } S_18573:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16661);if(r)goto S_18573;} S_18574:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(16662);if(r)goto S_18574;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2444; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("evaluatefunc:array reference:udt reference:[",44),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len("]",1)), 0 , 0 , 1 ); if (new_error) goto skip2444; skip2444: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16662);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFID=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16664);}while(r); do{ SUB_GETID(_FUNC_EVALUATEFUNC_LONG_UDTREFID); if(!qbevent)break;evnt(16665);}while(r); S_18579:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16666);if(r)goto S_18579;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16666);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFI=func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16667);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFI2=func_instr(*_FUNC_EVALUATEFUNC_LONG_UDTREFI+ 1 ,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16668);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFU=qbr(func_val(func_mid(_FUNC_EVALUATEFUNC_STRING_E,*_FUNC_EVALUATEFUNC_LONG_UDTREFI+ 1 ,*_FUNC_EVALUATEFUNC_LONG_UDTREFI2-*_FUNC_EVALUATEFUNC_LONG_UDTREFI- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16669);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFI3=func_instr(*_FUNC_EVALUATEFUNC_LONG_UDTREFI2+ 1 ,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16670);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFE=qbr(func_val(func_mid(_FUNC_EVALUATEFUNC_STRING_E,*_FUNC_EVALUATEFUNC_LONG_UDTREFI2+ 1 ,*_FUNC_EVALUATEFUNC_LONG_UDTREFI3-*_FUNC_EVALUATEFUNC_LONG_UDTREFI2- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16671);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_O,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-*_FUNC_EVALUATEFUNC_LONG_UDTREFI3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16672);}while(r); S_18588:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_EVALUATEFUNC_STRING_O, 4 ),qbs_new_txt_len("(0)*",4))))||new_error){ if(qbevent){evnt(16674);if(r)goto S_18588;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16674);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16674);}while(r); } }else{ S_18593:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal((qbs_right(_FUNC_EVALUATEFUNC_STRING_E, 2 )),(qbs_add(__STRING1_SP3,qbs_new_txt_len("0",1))))))||new_error){ if(qbevent){evnt(16676);if(r)goto S_18593;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16676);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16676);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_IDNUM=qbr(func_val(qbs_left(_FUNC_EVALUATEFUNC_STRING_E,func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0)- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16680);}while(r); do{ SUB_GETID(_FUNC_EVALUATEFUNC_LONG_IDNUM); if(!qbevent)break;evnt(16681);}while(r); S_18600:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16682);if(r)goto S_18600;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16682);}while(r); } S_18603:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(16684);if(r)goto S_18603;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYPSIZE=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(1210)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16685);}while(r); S_18605:; if ((-(*(int32*)(((char*)__UDT_ID)+(540))!=*_FUNC_EVALUATEFUNC_LONG_TARGETTYPSIZE))||new_error){ if(qbevent){evnt(16686);if(r)goto S_18605;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Incorrect array type passed to function",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16686);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16686);}while(r); } } S_18610:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(16689);if(r)goto S_18610;} S_18611:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*_FUNC_EVALUATEFUNC_LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(16690);if(r)goto S_18611;} do{ tmp_long=array_check((*_FUNC_EVALUATEFUNC_LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(16691);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16693);}while(r); } } S_18616:; if ((-(*(int32*)(((char*)__UDT_ID)+(2844))== 0 ))||new_error){ if(qbevent){evnt(16699);if(r)goto S_18616;} S_18617:; if ((-(*_FUNC_EVALUATEFUNC_LONG_NELEREQ== 0 ))||new_error){ if(qbevent){evnt(16704);if(r)goto S_18617;} S_18618:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!= -1 ))||new_error){ if(qbevent){evnt(16708);if(r)goto S_18618;} do{ *_FUNC_EVALUATEFUNC_LONG_NELEREQ=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(16709);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2744)),100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,func_chr(*_FUNC_EVALUATEFUNC_LONG_NELEREQ),1); if(!qbevent)break;evnt(16710);}while(r); } do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860)),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)),2860); if(!qbevent)break;evnt(16713);}while(r); }else{ S_18624:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!=*_FUNC_EVALUATEFUNC_LONG_NELEREQ))||new_error){ if(qbevent){evnt(16726);if(r)goto S_18624;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Passing arrays with a differing number of elements to a SUB/FUNCTION is not supported (yet)",91)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16726);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16726);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2446= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16734);}while(r); S_18631:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16735);if(r)goto S_18631;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16735);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16736);}while(r); } S_18636:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(16754);if(r)goto S_18636;} S_18637:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16755);if(r)goto S_18637;} do{ *_FUNC_EVALUATEFUNC_LONG_IDNUM=qbr(func_val(qbs_left(_FUNC_EVALUATEFUNC_STRING_E,func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0)- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16756);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP2=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP; if(!qbevent)break;evnt(16758);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16758);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_ARR= 0 ; if(!qbevent)break;evnt(16761);}while(r); S_18642:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16761);if(r)goto S_18642;} do{ *_FUNC_EVALUATEFUNC_LONG_ARR= 1 ; if(!qbevent)break;evnt(16761);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_PASSUDTELEMENT= 0 ; if(!qbevent)break;evnt(16762);}while(r); S_18646:; if (((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2&*__LONG_ISUDT)== 0 ))&(-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&*__LONG_ISUDT)!= 0 )))||new_error){ if(qbevent){evnt(16762);if(r)goto S_18646;} do{ *_FUNC_EVALUATEFUNC_LONG_PASSUDTELEMENT= 1 ; if(!qbevent)break;evnt(16762);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2-*__LONG_ISUDT; if(!qbevent)break;evnt(16762);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP2=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(16765);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(16766);}while(r); S_18652:; if ((-(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2==*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(16769);if(r)goto S_18652;} S_18653:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16771);if(r)goto S_18653;} do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFID=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16775);}while(r); do{ SUB_GETID(_FUNC_EVALUATEFUNC_LONG_UDTREFID); if(!qbevent)break;evnt(16776);}while(r); S_18656:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16777);if(r)goto S_18656;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16777);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFI=func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16778);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFI2=func_instr(*_FUNC_EVALUATEFUNC_LONG_UDTREFI+ 1 ,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16779);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFU=qbr(func_val(func_mid(_FUNC_EVALUATEFUNC_STRING_E,*_FUNC_EVALUATEFUNC_LONG_UDTREFI+ 1 ,*_FUNC_EVALUATEFUNC_LONG_UDTREFI2-*_FUNC_EVALUATEFUNC_LONG_UDTREFI- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16780);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFI3=func_instr(*_FUNC_EVALUATEFUNC_LONG_UDTREFI2+ 1 ,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16781);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFE=qbr(func_val(func_mid(_FUNC_EVALUATEFUNC_STRING_E,*_FUNC_EVALUATEFUNC_LONG_UDTREFI2+ 1 ,*_FUNC_EVALUATEFUNC_LONG_UDTREFI3-*_FUNC_EVALUATEFUNC_LONG_UDTREFI2- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16782);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_O,qbs_right(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_STRING_E->len-*_FUNC_EVALUATEFUNC_LONG_UDTREFI3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16783);}while(r); S_18665:; if ((*_FUNC_EVALUATEFUNC_LONG_ARR)||new_error){ if(qbevent){evnt(16786);if(r)goto S_18665;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_N2,qbs_add(qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("ARRAY_UDT_",10)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16787);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_N2,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("UDT_",4)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16789);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(void*)( ((char*)(",18),_FUNC_EVALUATEFUNC_STRING_N2),qbs_new_txt_len(")) + (",6)),_FUNC_EVALUATEFUNC_STRING_O),qbs_new_txt_len(") )",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16792);}while(r); S_18671:; if ((*_FUNC_EVALUATEFUNC_LONG_PASSUDTELEMENT)||new_error){ if(qbevent){evnt(16795);if(r)goto S_18671;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass2448=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2+(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUNSIGNED)),qbs_new_txt_len("",0))),qbs_new_txt_len("*)",2)),_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16795);}while(r); } S_18674:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16796);if(r)goto S_18674;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16796);}while(r); } }else{ S_18678:; if ((*_FUNC_EVALUATEFUNC_LONG_ARR)||new_error){ if(qbevent){evnt(16800);if(r)goto S_18678;} S_18679:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16801);if(r)goto S_18679;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot pass BIT array offsets yet",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16801);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16801);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2449= 0 ))),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16802);}while(r); S_18684:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16803);if(r)goto S_18684;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16803);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2450= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16805);}while(r); S_18689:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16806);if(r)goto S_18689;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16806);}while(r); } } S_18693:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED)!=(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUNSIGNED)))||new_error){ if(qbevent){evnt(16810);if(r)goto S_18693;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass2451=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2+(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUNSIGNED)),qbs_new_txt_len("",0))),qbs_new_txt_len("*)",2)),_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16811);}while(r); S_18695:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16812);if(r)goto S_18695;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16812);}while(r); } } } S_18700:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(16818);if(r)goto S_18700;} S_18701:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*_FUNC_EVALUATEFUNC_LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(16819);if(r)goto S_18701;} do{ tmp_long=array_check((*_FUNC_EVALUATEFUNC_LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(16820);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16821);}while(r); } } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16825);}while(r); } } }else{ S_18710:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16843);if(r)goto S_18710;} do{ *_FUNC_EVALUATEFUNC_LONG_IDNUM=qbr(func_val(qbs_left(_FUNC_EVALUATEFUNC_STRING_E,func_instr(NULL,_FUNC_EVALUATEFUNC_STRING_E,__STRING1_SP3,0)- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16844);}while(r); S_18712:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(16845);if(r)goto S_18712;} S_18713:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*_FUNC_EVALUATEFUNC_LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(16846);if(r)goto S_18713;} do{ tmp_long=array_check((*_FUNC_EVALUATEFUNC_LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(16847);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16848);}while(r); } } } } } } S_18722:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(16871);if(r)goto S_18722;} S_18723:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(16872);if(r)goto S_18723;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_CURARG; if(!qbevent)break;evnt(16873);}while(r); S_18725:; if (((-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_NTH>*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(16874);if(r)goto S_18725;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_NTH- 1 ; if(!qbevent)break;evnt(16874);}while(r); } S_18728:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+808))== 1 ))||new_error){ if(qbevent){evnt(16875);if(r)goto S_18728;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("String required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16875);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16875);}while(r); } do{ SUB_GIVE_ERROR(qbs_add(FUNC_STR_NTH(_FUNC_EVALUATEFUNC_LONG_NTH),qbs_new_txt_len(" function argument requires a string",36))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16876);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16876);}while(r); } } S_18736:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(16879);if(r)goto S_18736;} S_18737:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(16880);if(r)goto S_18737;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_CURARG; if(!qbevent)break;evnt(16881);}while(r); S_18739:; if (((-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_NTH>*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(16882);if(r)goto S_18739;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_NTH- 1 ; if(!qbevent)break;evnt(16882);}while(r); } S_18742:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+808))== 1 ))||new_error){ if(qbevent){evnt(16883);if(r)goto S_18742;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16883);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16883);}while(r); } do{ SUB_GIVE_ERROR(qbs_add(FUNC_STR_NTH(_FUNC_EVALUATEFUNC_LONG_NTH),qbs_new_txt_len(" function argument requires a number",36))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16884);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16884);}while(r); } } S_18750:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16889);if(r)goto S_18750;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2452= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16890);}while(r); S_18752:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16891);if(r)goto S_18752;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16891);}while(r); } } S_18756:; if ((-(*_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE== 0 ))||new_error){ if(qbevent){evnt(16894);if(r)goto S_18756;} S_18757:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16895);if(r)goto S_18757;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_CURARG; if(!qbevent)break;evnt(16896);}while(r); S_18759:; if (((-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_NTH>*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(16897);if(r)goto S_18759;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_NTH- 1 ; if(!qbevent)break;evnt(16897);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_X,qbs_add(qbs_add(qbs_new_txt_len("'",1),qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16898);}while(r); S_18763:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+808))== 1 ))||new_error){ if(qbevent){evnt(16899);if(r)goto S_18763;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("TYPE ",5),_FUNC_EVALUATEFUNC_STRING_X),qbs_new_txt_len(" required for function",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16899);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16899);}while(r); } do{ SUB_GIVE_ERROR(qbs_add(qbs_add(FUNC_STR_NTH(_FUNC_EVALUATEFUNC_LONG_NTH),qbs_new_txt_len(" function argument requires TYPE ",33)),_FUNC_EVALUATEFUNC_STRING_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16900);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16900);}while(r); } }else{ S_18771:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16903);if(r)goto S_18771;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16903);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16903);}while(r); } } S_18776:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16907);if(r)goto S_18776;} S_18777:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(16908);if(r)goto S_18777;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 ; if(!qbevent)break;evnt(16910);}while(r); S_18779:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(16911);if(r)goto S_18779;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_float_to_long(",18),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16911);}while(r); } S_18782:; if (((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 16 ))&(-(*_FUNC_EVALUATEFUNC_LONG_BITS< 32 )))||new_error){ if(qbevent){evnt(16912);if(r)goto S_18782;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_double_to_long(",19),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16912);}while(r); } S_18785:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS>= 32 ))||new_error){ if(qbevent){evnt(16913);if(r)goto S_18785;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16913);}while(r); } } } S_18790:; if ((*_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE)||new_error){ if(qbevent){evnt(16917);if(r)goto S_18790;} S_18791:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16918);if(r)goto S_18791;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(int64)(",8),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16920);}while(r); }else{ S_18794:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16922);if(r)goto S_18794;} S_18795:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(16923);if(r)goto S_18795;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(float)(",8),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16923);}while(r); } S_18798:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(16924);if(r)goto S_18798;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(double)(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16924);}while(r); } S_18801:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 256 ))||new_error){ if(qbevent){evnt(16925);if(r)goto S_18801;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(long double)(",14),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16925);}while(r); } }else{ S_18805:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16927);if(r)goto S_18805;} S_18806:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(16928);if(r)goto S_18806;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(uint8)(",8),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16928);}while(r); } S_18809:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(16929);if(r)goto S_18809;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(uint16)(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16929);}while(r); } S_18812:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(16930);if(r)goto S_18812;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(uint32)(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16930);}while(r); } S_18815:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(16931);if(r)goto S_18815;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(uint64)(",9),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16931);}while(r); } }else{ S_18819:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(16933);if(r)goto S_18819;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(int8)(",7),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16933);}while(r); } S_18822:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(16934);if(r)goto S_18822;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(int16)(",8),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16934);}while(r); } S_18825:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(16935);if(r)goto S_18825;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(int32)(",8),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16935);}while(r); } S_18828:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(16936);if(r)goto S_18828;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(int64)(",8),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16936);}while(r); } } } } } S_18835:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(16943);if(r)goto S_18835;} S_18836:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16944);if(r)goto S_18836;} do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16944);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_T,FUNC_TYP2CTYP(_FUNC_EVALUATEFUNC_LONG_TARGETTYP,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16946);}while(r); S_18840:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16947);if(r)goto S_18840;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16947);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_V,qbs_add(qbs_new_txt_len("pass",4),FUNC_STR2(&(pass2453=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16948);}while(r); S_18844:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0]))[(array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_STRING100_SFCMEMARGS[4],__ARRAY_STRING100_SFCMEMARGS[5]))*100],100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1),func_chr( 1 ))))||new_error){ if(qbevent){evnt(16950);if(r)goto S_18844;} do{ *_FUNC_EVALUATEFUNC_LONG_BYTESREQ=((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )+ 7 )/ 8 ; if(!qbevent)break;evnt(16951);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2454; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_EVALUATEFUNC_STRING_T,qbs_new_txt_len(" *",2)),_FUNC_EVALUATEFUNC_STRING_V),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip2454; skip2454: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16952);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2455; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_EVALUATEFUNC_STRING_V),qbs_new_txt_len("==NULL){",8)), 0 , 0 , 1 ); if (new_error) goto skip2455; skip2455: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16953);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2456; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_BYTESREQ)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2456; skip2456: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16954);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2457; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_FUNC_EVALUATEFUNC_STRING_V,qbs_new_txt_len("=(",2)),_FUNC_EVALUATEFUNC_STRING_T),qbs_new_txt_len("*)(dblock+cmem_sp);",19)), 0 , 0 , 1 ); if (new_error) goto skip2457; skip2457: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16955);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip2458; sub_file_print(tmp_fileno,qbs_new_txt_len("if (cmem_spchr",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16976);}while(r); } S_18866:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ltrim(qbs_rtrim(_FUNC_EVALUATEFUNC_STRING_E)),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(16979);if(r)goto S_18866;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("NULL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16979);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16983);}while(r); S_18871:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MEM",4))))||new_error){ if(qbevent){evnt(16986);if(r)goto S_18871;} S_18872:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 1 ))||new_error){ if(qbevent){evnt(16987);if(r)goto S_18872;} S_18873:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(16988);if(r)goto S_18873;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16988);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16988);}while(r); } } S_18878:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 2 ))||new_error){ if(qbevent){evnt(16990);if(r)goto S_18878;} S_18879:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(16991);if(r)goto S_18879;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16991);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16991);}while(r); } } } S_18885:; if (((-(*_FUNC_EVALUATEFUNC_LONG_I!=*_FUNC_EVALUATEFUNC_LONG_N))&(-(*_FUNC_EVALUATEFUNC_LONG_NOCOMMA== 0 )))||new_error){ if(qbevent){evnt(16995);if(r)goto S_18885;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16995);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_NOCOMMA= 0 ; if(!qbevent)break;evnt(16996);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_FIRSTI=*_FUNC_EVALUATEFUNC_LONG_I+ 1 ; if(!qbevent)break;evnt(16997);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_CURARG=*_FUNC_EVALUATEFUNC_LONG_CURARG+ 1 ; if(!qbevent)break;evnt(16998);}while(r); } S_18892:; if (((((-(*_FUNC_EVALUATEFUNC_LONG_CURARG>=*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST))&(-(*_FUNC_EVALUATEFUNC_LONG_CURARG<=*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST))))&(-(*_FUNC_EVALUATEFUNC_LONG_I==*_FUNC_EVALUATEFUNC_LONG_N)))||new_error){ if(qbevent){evnt(17001);if(r)goto S_18892;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(810)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17002);}while(r); S_18894:; fornext_value2462= 1 ; fornext_finalvalue2462=*_FUNC_EVALUATEFUNC_LONG_OMITARGS; fornext_step2462= 1 ; if (fornext_step2462<0) fornext_step_negative2462=1; else fornext_step_negative2462=0; if (new_error) goto fornext_error2462; goto fornext_entrylabel2462; while(1){ fornext_value2462=fornext_step2462+(*_FUNC_EVALUATEFUNC_LONG_FI); fornext_entrylabel2462: *_FUNC_EVALUATEFUNC_LONG_FI=fornext_value2462; if (fornext_step_negative2462){ if (fornext_value2462fornext_finalvalue2462) break; } fornext_error2462:; if(qbevent){evnt(17004);if(r)goto S_18894;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",NULL",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17004);}while(r); } fornext_exit_2461:; do{ *_FUNC_EVALUATEFUNC_LONG_CURARG=*_FUNC_EVALUATEFUNC_LONG_CURARG+*_FUNC_EVALUATEFUNC_LONG_OMITARGS; if(!qbevent)break;evnt(17005);}while(r); } } fornext_exit_2383:; } S_18901:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("UBOUND",6)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("LBOUND",6)))))||new_error){ if(qbevent){evnt(17011);if(r)goto S_18901;} S_18902:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",NULL",5))))||new_error){ if(qbevent){evnt(17012);if(r)goto S_18902;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17012);}while(r); } S_18905:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("UBOUND",6))))||new_error){ if(qbevent){evnt(17013);if(r)goto S_18905;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R2,qbs_new_txt_len("func_ubound(",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17013);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R2,qbs_new_txt_len("func_lbound(",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17013);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_ULBOUNDARRAY,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2463= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17014);}while(r); S_18911:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17015);if(r)goto S_18911;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17015);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_ARRAYELEMENTS=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(17018);}while(r); S_18915:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARRAYELEMENTS== -1 ))||new_error){ if(qbevent){evnt(17019);if(r)goto S_18915;} do{ *_FUNC_EVALUATEFUNC_LONG_ARRAYELEMENTS= 1 ; if(!qbevent)break;evnt(17019);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATEFUNC_STRING_R2,_FUNC_EVALUATEFUNC_STRING_E),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_ARRAYELEMENTS)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17021);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17022);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17023);}while(r); } S_18922:; if ((*_FUNC_EVALUATEFUNC_LONG_PASSOMIT)||new_error){ if(qbevent){evnt(17026);if(r)goto S_18922;} S_18923:; if ((*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST)||new_error){ if(qbevent){evnt(17027);if(r)goto S_18923;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",0",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17027);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",1",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17027);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17029);}while(r); LABEL_EVALFUNCSPECIAL:; if(qbevent){evnt(17031);r=0;} S_18930:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ABS",3))))||new_error){ if(qbevent){evnt(17033);if(r)goto S_18930;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(17033);}while(r); } S_18933:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("SIN",3)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("COS",3)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("TAN",3)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ATN",3)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("SQR",3)))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("LOG",3)))))||new_error){ if(qbevent){evnt(17036);if(r)goto S_18933;} do{ *_FUNC_EVALUATEFUNC_LONG_B=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(17037);}while(r); S_18935:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(17038);if(r)goto S_18935;} S_18936:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B== 64 ))||new_error){ if(qbevent){evnt(17040);if(r)goto S_18936;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17040);}while(r); } S_18939:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B== 32 ))||new_error){ if(qbevent){evnt(17041);if(r)goto S_18939;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17041);}while(r); } }else{ S_18943:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B<= 32 ))||new_error){ if(qbevent){evnt(17044);if(r)goto S_18943;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17044);}while(r); } S_18946:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B<= 16 ))||new_error){ if(qbevent){evnt(17045);if(r)goto S_18946;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17045);}while(r); } } } S_18951:; if ((-(*(int32*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2378))==(*__LONG_ISUDT+( 1 ))))||new_error){ if(qbevent){evnt(17049);if(r)goto S_18951;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_V,qbs_add(qbs_new_txt_len("func",4),FUNC_STR2(&(pass2464=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17051);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__INTEGER_DEFDATAHANDLE; if (new_error) goto skip2465; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("mem_block ",10),_FUNC_EVALUATEFUNC_STRING_V),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2465; skip2465: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17052);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATEFUNC_STRING_V),qbs_new_txt_len("=",1)),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17053);}while(r); } S_18956:; if ((*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(806)))||new_error){ if(qbevent){evnt(17056);if(r)goto S_18956;} S_18957:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATEFUNC_STRING_R, 11 ),qbs_new_txt_len("( char* )",11))))||new_error){ if(qbevent){evnt(17057);if(r)goto S_18957;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("qbs_new_txt(",12),_FUNC_EVALUATEFUNC_STRING_R),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17058);}while(r); } } S_18961:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(17062);if(r)goto S_18961;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2466; sub_file_print(tmp_fileno,qbs_new_txt_len("evaluatefunc:out:",17), 0 , 0 , 0 ); if (new_error) goto skip2466; sub_file_print(tmp_fileno,_FUNC_EVALUATEFUNC_STRING_R, 0 , 0 , 1 ); if (new_error) goto skip2466; skip2466: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17062);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_EVALUATEFUNC,_FUNC_EVALUATEFUNC_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17063);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free29.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_EVALUATEFUNC_STRING_EVALUATEFUNC);return _FUNC_EVALUATEFUNC_STRING_EVALUATEFUNC; } qbs* FUNC_VARIABLESIZE(int32*_FUNC_VARIABLESIZE_LONG_I){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data30.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_18965:; if ((-(*_FUNC_VARIABLESIZE_LONG_I!= -1 ))||new_error){ if(qbevent){evnt(17068);if(r)goto S_18965;} do{ SUB_GETID(_FUNC_VARIABLESIZE_LONG_I); if(!qbevent)break;evnt(17068);}while(r); } S_18968:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17069);if(r)goto S_18968;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17069);}while(r); } do{ *_FUNC_VARIABLESIZE_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(17071);}while(r); S_18972:; if ((-(*_FUNC_VARIABLESIZE_LONG_T== 0 ))||new_error){ if(qbevent){evnt(17071);if(r)goto S_18972;} do{ *_FUNC_VARIABLESIZE_LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(17071);}while(r); } do{ *_FUNC_VARIABLESIZE_LONG_BYTES=(*_FUNC_VARIABLESIZE_LONG_T& 511 )/ 8 ; if(!qbevent)break;evnt(17072);}while(r); S_18976:; if ((*_FUNC_VARIABLESIZE_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(17074);if(r)goto S_18976;} do{ *_FUNC_VARIABLESIZE_LONG_U=*_FUNC_VARIABLESIZE_LONG_T& 511 ; if(!qbevent)break;evnt(17075);}while(r); do{ *_FUNC_VARIABLESIZE_LONG_BYTES=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_VARIABLESIZE_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ; if(!qbevent)break;evnt(17076);}while(r); } S_18980:; if ((*_FUNC_VARIABLESIZE_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17079);if(r)goto S_18980;} S_18981:; if ((*_FUNC_VARIABLESIZE_LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17080);if(r)goto S_18981;} do{ *_FUNC_VARIABLESIZE_LONG_BYTES=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(17081);}while(r); }else{ S_18984:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17083);if(r)goto S_18984;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot determine size of variable-length string array",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17083);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17083);}while(r); } do{ qbs_set(_FUNC_VARIABLESIZE_STRING_VARIABLESIZE,qbs_add(qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING_",7)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))),qbs_new_txt_len("->len",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17084);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17085);}while(r); } } S_18992:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17089);if(r)goto S_18992;} do{ qbs_set(_FUNC_VARIABLESIZE_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17090);}while(r); do{ qbs_set(_FUNC_VARIABLESIZE_STRING_S,qbs_add(qbs_add(qbs_add(FUNC_STR2(_FUNC_VARIABLESIZE_LONG_BYTES),qbs_new_txt_len("*(",2)),_FUNC_VARIABLESIZE_STRING_N),qbs_new_txt_len("[2]&1)",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17091);}while(r); do{ *_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(17092);}while(r); S_18996:; if ((-(*_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS== -1 ))||new_error){ if(qbevent){evnt(17092);if(r)goto S_18996;} do{ *_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS= 1 ; if(!qbevent)break;evnt(17092);}while(r); } S_18999:; fornext_value2468= 1 ; fornext_finalvalue2468=*_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS; fornext_step2468= 1 ; if (fornext_step2468<0) fornext_step_negative2468=1; else fornext_step_negative2468=0; if (new_error) goto fornext_error2468; goto fornext_entrylabel2468; while(1){ fornext_value2468=fornext_step2468+(*_FUNC_VARIABLESIZE_LONG_I2); fornext_entrylabel2468: *_FUNC_VARIABLESIZE_LONG_I2=fornext_value2468; if (fornext_step_negative2468){ if (fornext_value2468fornext_finalvalue2468) break; } fornext_error2468:; if(qbevent){evnt(17093);if(r)goto S_18999;} do{ qbs_set(_FUNC_VARIABLESIZE_STRING_S,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_VARIABLESIZE_STRING_S,qbs_new_txt_len("*",1)),_FUNC_VARIABLESIZE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2469=(*_FUNC_VARIABLESIZE_LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17094);}while(r); } fornext_exit_2467:; do{ qbs_set(_FUNC_VARIABLESIZE_STRING_VARIABLESIZE,qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_VARIABLESIZE_STRING_S),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17096);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17097);}while(r); } do{ qbs_set(_FUNC_VARIABLESIZE_STRING_VARIABLESIZE,FUNC_STR2(_FUNC_VARIABLESIZE_LONG_BYTES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17100);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free30.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_VARIABLESIZE_STRING_VARIABLESIZE);return _FUNC_VARIABLESIZE_STRING_VARIABLESIZE; } qbs* FUNC_EVALUATETOTYP(qbs*_FUNC_EVALUATETOTYP_STRING_A2,int32*_FUNC_EVALUATETOTYP_LONG_TARGETTYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data31.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_A,_FUNC_EVALUATETOTYP_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17107);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_EVALUATE(_FUNC_EVALUATETOTYP_STRING_A,_FUNC_EVALUATETOTYP_LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17108);}while(r); S_19008:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17109);if(r)goto S_19008;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17109);}while(r); } S_19011:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(17112);if(r)goto S_19011;} S_19012:; if (((-((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISOFFSET)== 0 ))&(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP>= 0 )))||new_error){ if(qbevent){evnt(17113);if(r)goto S_19012;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert _OFFSET type to other types",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17114);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17114);}while(r); } } S_19017:; if (((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -4 ))|(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))|(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 )))||new_error){ if(qbevent){evnt(17120);if(r)goto S_19017;} S_19018:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17121);if(r)goto S_19018;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17121);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17121);}while(r); } S_19022:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17122);if(r)goto S_19022;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be BIT aligned",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17122);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17122);}while(r); } S_19026:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17126);if(r)goto S_19026;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17127);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17128);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17128);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17129);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17130);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17130);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17131);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17132);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17132);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17133);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17134);}while(r); S_19038:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17135);if(r)goto S_19038;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17135);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17136);}while(r); S_19042:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17137);if(r)goto S_19042;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17138);}while(r); S_19044:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATETOTYP_STRING_O, 3 ),qbs_new_txt_len("(0)",3))))||new_error){ if(qbevent){evnt(17140);if(r)goto S_19044;} do{ goto LABEL_METHOD2USEALLUDT; if(!qbevent)break;evnt(17142);}while(r); } } S_19048:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(17146);if(r)goto S_19048;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2474=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17147);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2475=((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17149);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17151);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17152);}while(r); S_19055:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17153);if(r)goto S_19055;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17153);}while(r); } S_19058:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17154);if(r)goto S_19058;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_DST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17154);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17155);}while(r); } S_19063:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17158);if(r)goto S_19063;} S_19064:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(_FUNC_EVALUATETOTYP_STRING_E, 2 )),(qbs_add(__STRING1_SP3,qbs_new_txt_len("0",1))))))||new_error){ if(qbevent){evnt(17160);if(r)goto S_19064;} S_19065:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17162);if(r)goto S_19065;} S_19066:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17163);if(r)goto S_19066;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot pass array of variable-length strings",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17164);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17164);}while(r); } } do{ goto LABEL_METHOD2USEALL; if(!qbevent)break;evnt(17167);}while(r); } S_19073:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17170);if(r)goto S_19073;} S_19074:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17171);if(r)goto S_19074;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17172);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17173);}while(r); S_19077:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17174);if(r)goto S_19077;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17174);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17175);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2476= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17176);}while(r); S_19082:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17177);if(r)goto S_19082;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17177);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17178);}while(r); S_19086:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17179);if(r)goto S_19086;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17179);}while(r); } S_19089:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17180);if(r)goto S_19089;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17180);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2477= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17182);}while(r); S_19094:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17183);if(r)goto S_19094;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17183);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->len,",6)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17185);}while(r); S_19098:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17186);if(r)goto S_19098;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17186);}while(r); } S_19101:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17187);if(r)goto S_19101;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17187);}while(r); } } do{ goto exit_subfunc; if(!qbevent)break;evnt(17189);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2478= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17191);}while(r); S_19108:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17192);if(r)goto S_19108;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17192);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17193);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2479=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17194);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17195);}while(r); S_19114:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17196);if(r)goto S_19114;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17196);}while(r); } S_19117:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17197);if(r)goto S_19117;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17197);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17198);}while(r); } S_19122:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17201);if(r)goto S_19122;} S_19123:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17202);if(r)goto S_19123;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17203);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17204);}while(r); S_19126:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17205);if(r)goto S_19126;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17205);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17206);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2480= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17207);}while(r); S_19131:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17208);if(r)goto S_19131;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17208);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2481= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17210);}while(r); S_19136:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17211);if(r)goto S_19136;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17211);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17212);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17214);}while(r); S_19142:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17215);if(r)goto S_19142;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17215);}while(r); } S_19145:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17216);if(r)goto S_19145;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17216);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17217);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2482= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17221);}while(r); S_19151:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17222);if(r)goto S_19151;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17222);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17223);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17224);}while(r); S_19156:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17225);if(r)goto S_19156;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17225);}while(r); } S_19159:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17226);if(r)goto S_19159;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17226);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17227);}while(r); } S_19164:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -8 ))||new_error){ if(qbevent){evnt(17234);if(r)goto S_19164;} S_19165:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17235);if(r)goto S_19165;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17235);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17235);}while(r); } S_19169:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17236);if(r)goto S_19169;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be BIT aligned",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17236);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17236);}while(r); } S_19173:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17239);if(r)goto S_19173;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17240);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17241);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17241);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17242);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17243);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17243);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17244);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17245);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17245);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17246);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17247);}while(r); S_19185:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17248);if(r)goto S_19185;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17248);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17249);}while(r); S_19189:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17250);if(r)goto S_19189;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17251);}while(r); S_19191:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATETOTYP_STRING_O, 3 ),qbs_new_txt_len("(0)",3))))||new_error){ if(qbevent){evnt(17253);if(r)goto S_19191;} do{ goto LABEL_METHOD2USEALLUDT__7; if(!qbevent)break;evnt(17255);}while(r); } } S_19195:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(17259);if(r)goto S_19195;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2486=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17260);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T1=*__LONG_ISUDT+((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]; if(!qbevent)break;evnt(17261);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2487=((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17263);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T1=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]; if(!qbevent)break;evnt(17264);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17266);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_T1); if(!qbevent)break;evnt(17271);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",sf_mem_lock",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17272);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17274);}while(r); } S_19207:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17277);if(r)goto S_19207;} S_19208:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(_FUNC_EVALUATETOTYP_STRING_E, 2 )),(qbs_add(__STRING1_SP3,qbs_new_txt_len("0",1))))))||new_error){ if(qbevent){evnt(17279);if(r)goto S_19208;} S_19209:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17281);if(r)goto S_19209;} S_19210:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17282);if(r)goto S_19210;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot pass array of variable-length strings",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17283);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17283);}while(r); } } do{ goto LABEL_METHOD2USEALL__7; if(!qbevent)break;evnt(17286);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17289);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17290);}while(r); S_19219:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17291);if(r)goto S_19219;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17291);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17292);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_LK,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(mem_lock*)((ptrszint*)",23),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")[",2)),FUNC_STR2(&(pass2488=( 4 **(int16*)(((char*)__UDT_ID)+(516)))+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17293);}while(r); S_19224:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17297);if(r)goto S_19224;} S_19225:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17298);if(r)goto S_19225;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17299);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2489= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17300);}while(r); S_19228:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17301);if(r)goto S_19228;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17301);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17306);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_LK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17307);}while(r); }else{ do{ SUB_GIVE_ERROR(qbs_new_txt_len("_MEMELEMENT cannot reference variable-length strings",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17311);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17311);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17314);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2490= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17317);}while(r); S_19240:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17318);if(r)goto S_19240;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17318);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17319);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2491=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17320);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17325);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_LK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17326);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17328);}while(r); } S_19249:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17331);if(r)goto S_19249;} S_19250:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17332);if(r)goto S_19250;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17333);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17334);}while(r); S_19253:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17335);if(r)goto S_19253;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17335);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17336);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2492= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17337);}while(r); S_19258:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17338);if(r)goto S_19258;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17338);}while(r); } }else{ do{ SUB_GIVE_ERROR(qbs_new_txt_len("_MEMELEMENT cannot reference variable-length strings",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17340);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17340);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17347);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",sf_mem_lock",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17348);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17350);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2493= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17354);}while(r); S_19270:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17355);if(r)goto S_19270;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17355);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17356);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17361);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)),qbs_new_txt_len(",sf_mem_lock",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17362);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17364);}while(r); } S_19278:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -7 ))||new_error){ if(qbevent){evnt(17377);if(r)goto S_19278;} LABEL_METHOD2USEALL__7:; if(qbevent){evnt(17378);r=0;} S_19279:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17379);if(r)goto S_19279;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17379);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17379);}while(r); } S_19283:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17380);if(r)goto S_19283;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be BIT aligned",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17380);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17380);}while(r); } S_19287:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17383);if(r)goto S_19287;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17385);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17386);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17386);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17387);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17388);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17388);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17389);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17390);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17390);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17392);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17393);}while(r); S_19299:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17394);if(r)goto S_19299;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17394);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17395);}while(r); S_19303:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17395);if(r)goto S_19303;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17395);}while(r); } LABEL_METHOD2USEALLUDT__7:; if(qbevent){evnt(17396);r=0;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(FUNC_VARIABLESIZE(&(pass2497= -1 )),qbs_new_txt_len("-(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17397);}while(r); S_19307:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17398);if(r)goto S_19307;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17398);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17399);}while(r); S_19311:; if ((-(*__LONG_E!= 0 ))||new_error){ if(qbevent){evnt(17405);if(r)goto S_19311;} do{ *_FUNC_EVALUATETOTYP_LONG_SIZE= 1 ; if(!qbevent)break;evnt(17405);}while(r); }else{ do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ; if(!qbevent)break;evnt(17405);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17407);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)),qbs_new_txt_len(",sf_mem_lock",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17408);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17410);}while(r); } S_19320:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17414);if(r)goto S_19320;} S_19321:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17415);if(r)goto S_19321;} S_19322:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17416);if(r)goto S_19322;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("_MEM cannot reference variable-length strings",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17417);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17417);}while(r); } } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17421);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17422);}while(r); S_19329:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17423);if(r)goto S_19329;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17423);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17425);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_LK,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(mem_lock*)((ptrszint*)",23),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")[",2)),FUNC_STR2(&(pass2498=( 4 **(int16*)(((char*)__UDT_ID)+(516)))+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17426);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(17428);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_INDEX,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17430);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_VARIABLESIZE(&(pass2500= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17431);}while(r); S_19337:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17432);if(r)goto S_19337;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17432);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2501= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17433);}while(r); S_19341:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17434);if(r)goto S_19341;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17434);}while(r); } S_19344:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17436);if(r)goto S_19344;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("((",2),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")->chr)",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17437);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17439);}while(r); } S_19349:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17444);if(r)goto S_19349;} do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=*_FUNC_EVALUATETOTYP_LONG_TSIZE; if(!qbevent)break;evnt(17445);}while(r); }else{ do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17447);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_new_txt_len("-(",2)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_BYTES)),qbs_new_txt_len("*(",2)),_FUNC_EVALUATETOTYP_STRING_INDEX),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17449);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17451);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_BYTES)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_LK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17452);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17454);}while(r); } S_19359:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17458);if(r)goto S_19359;} S_19360:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17459);if(r)goto S_19360;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("_MEM cannot reference variable-length strings",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17459);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17459);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17461);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17462);}while(r); S_19366:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17462);if(r)goto S_19366;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17462);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17463);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2502= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17464);}while(r); S_19371:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17464);if(r)goto S_19371;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17464);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17466);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",sf_mem_lock",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17467);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17469);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2503= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17473);}while(r); S_19379:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17474);if(r)goto S_19379;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17474);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17475);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17477);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_T)),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)),qbs_new_txt_len(",sf_mem_lock",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17478);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17480);}while(r); } S_19387:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -2 ))||new_error){ if(qbevent){evnt(17485);if(r)goto S_19387;} LABEL_METHOD2USEALL:; if(qbevent){evnt(17486);r=0;} S_19388:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17489);if(r)goto S_19388;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17489);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17489);}while(r); } S_19392:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17490);if(r)goto S_19392;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be BIT aligned",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17490);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17490);}while(r); } S_19396:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17493);if(r)goto S_19396;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17495);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17496);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17496);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17497);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17498);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17498);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17499);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17500);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17500);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17501);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17502);}while(r); S_19408:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17503);if(r)goto S_19408;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17503);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17504);}while(r); S_19412:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17504);if(r)goto S_19412;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17504);}while(r); } LABEL_METHOD2USEALLUDT:; if(qbevent){evnt(17505);r=0;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(FUNC_VARIABLESIZE(&(pass2507= -1 )),qbs_new_txt_len("-(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17506);}while(r); S_19416:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17507);if(r)goto S_19416;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17507);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17508);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17509);}while(r); S_19421:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17510);if(r)goto S_19421;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17510);}while(r); } S_19424:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17511);if(r)goto S_19424;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_DST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17511);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17512);}while(r); } S_19429:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17516);if(r)goto S_19429;} S_19430:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17518);if(r)goto S_19430;} S_19431:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17519);if(r)goto S_19431;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2508= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17520);}while(r); S_19433:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17521);if(r)goto S_19433;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17521);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->len,",6)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17522);}while(r); S_19437:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17523);if(r)goto S_19437;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17523);}while(r); } S_19440:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17524);if(r)goto S_19440;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17524);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17525);}while(r); } } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17528);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17529);}while(r); S_19448:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17530);if(r)goto S_19448;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17530);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(17531);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_INDEX,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17533);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_VARIABLESIZE(&(pass2510= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17534);}while(r); S_19454:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17535);if(r)goto S_19454;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17535);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2511= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17536);}while(r); S_19458:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17537);if(r)goto S_19458;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17537);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17538);}while(r); S_19462:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17541);if(r)goto S_19462;} do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=*_FUNC_EVALUATETOTYP_LONG_TSIZE; if(!qbevent)break;evnt(17542);}while(r); }else{ do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17544);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_new_txt_len("-(",2)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_BYTES)),qbs_new_txt_len("*(",2)),_FUNC_EVALUATETOTYP_STRING_INDEX),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17546);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17547);}while(r); S_19469:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17548);if(r)goto S_19469;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17548);}while(r); } S_19472:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17549);if(r)goto S_19472;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17549);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17551);}while(r); } S_19477:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17555);if(r)goto S_19477;} S_19478:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17556);if(r)goto S_19478;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17557);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17558);}while(r); S_19481:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17559);if(r)goto S_19481;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17559);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17560);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2512= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17561);}while(r); S_19486:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17562);if(r)goto S_19486;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17562);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2513= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17564);}while(r); S_19491:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17565);if(r)goto S_19491;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17565);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17566);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17568);}while(r); S_19497:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17569);if(r)goto S_19497;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17569);}while(r); } S_19500:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17570);if(r)goto S_19500;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17570);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17571);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2514= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17575);}while(r); S_19506:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17576);if(r)goto S_19506;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17576);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17577);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17578);}while(r); S_19511:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17579);if(r)goto S_19511;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17579);}while(r); } S_19514:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17580);if(r)goto S_19514;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17580);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17581);}while(r); } S_19519:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)!=(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(17588);if(r)goto S_19519;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Illegal string-number conversion",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17589);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17589);}while(r); } S_19523:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(17592);if(r)goto S_19523;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17593);}while(r); S_19525:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(17594);if(r)goto S_19525;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2515= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17595);}while(r); S_19527:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17596);if(r)goto S_19527;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17596);}while(r); } } do{ goto exit_subfunc; if(!qbevent)break;evnt(17598);}while(r); } S_19533:; if (((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(17602);if(r)goto S_19533;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("evaluatetotyp received a request for a pointer! (as yet unsupported)",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17603);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17603);}while(r); do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid pointer",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17605);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17605);}while(r); } S_19539:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(17609);if(r)goto S_19539;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2516= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17610);}while(r); S_19541:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17611);if(r)goto S_19541;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17611);}while(r); } } S_19545:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(17614);if(r)goto S_19545;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("evaluatetotyp couldn't convert pointer type!",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17615);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17615);}while(r); } S_19549:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(17619);if(r)goto S_19549;} S_19550:; if ((-((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(17620);if(r)goto S_19550;} do{ *_FUNC_EVALUATETOTYP_LONG_BITS=*_FUNC_EVALUATETOTYP_LONG_TARGETTYP& 511 ; if(!qbevent)break;evnt(17621);}while(r); S_19552:; if ((-(*_FUNC_EVALUATETOTYP_LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(17623);if(r)goto S_19552;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_float_to_long(",18),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17623);}while(r); } S_19555:; if (((-(*_FUNC_EVALUATETOTYP_LONG_BITS> 16 ))&(-(*_FUNC_EVALUATETOTYP_LONG_BITS< 32 )))||new_error){ if(qbevent){evnt(17624);if(r)goto S_19555;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_double_to_long(",19),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17624);}while(r); } S_19558:; if ((-(*_FUNC_EVALUATETOTYP_LONG_BITS>= 32 ))||new_error){ if(qbevent){evnt(17625);if(r)goto S_19558;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17625);}while(r); } } } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17629);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free31.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP);return _FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP; } int32 FUNC_FINDID(qbs*_FUNC_FINDID_STRING_N2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data32.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_FINDID_STRING_N,qbs_ucase(_FUNC_FINDID_STRING_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17633);}while(r); S_19565:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_FINDID_STRING_N)== 34 )))||new_error){ if(qbevent){evnt(17636);if(r)goto S_19565;} do{ goto LABEL_NOID; if(!qbevent)break;evnt(17636);}while(r); } do{ qbs_set(_FUNC_FINDID_STRING_SECONDARG,__STRING_FINDIDSECONDARG); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17639);}while(r); do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17639);}while(r); do{ *_FUNC_FINDID_LONG_FINDANOTHER=*__INTEGER_FINDANOTHERID; if(!qbevent)break;evnt(17642);}while(r); do{ *__INTEGER_FINDANOTHERID= 0 ; if(!qbevent)break;evnt(17642);}while(r); S_19572:; if (((-(*_FUNC_FINDID_LONG_FINDANOTHER!= 0 ))&(-(*__LONG_FINDIDINTERNAL!= 2 )))||new_error){ if(qbevent){evnt(17643);if(r)goto S_19572;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("FINDID() ERROR: Invalid repeat search requested!",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17643);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17643);}while(r); } S_19576:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17644);if(r)goto S_19576;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17644);}while(r); } do{ *_FUNC_FINDID_LONG_FINDID= 2 ; if(!qbevent)break;evnt(17646);}while(r); do{ *_FUNC_FINDID_LONG_I= 0 ; if(!qbevent)break;evnt(17649);}while(r); do{ *_FUNC_FINDID_LONG_I=func_instr(NULL,_FUNC_FINDID_STRING_N,qbs_new_txt_len("~",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17650);}while(r); S_19582:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17650);if(r)goto S_19582;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(17650);}while(r); } do{ *_FUNC_FINDID_LONG_I=func_instr(NULL,_FUNC_FINDID_STRING_N,qbs_new_txt_len("`",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17651);}while(r); S_19586:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17651);if(r)goto S_19586;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(17651);}while(r); } do{ *_FUNC_FINDID_LONG_I=func_instr(NULL,_FUNC_FINDID_STRING_N,qbs_new_txt_len("%",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17652);}while(r); S_19590:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17652);if(r)goto S_19590;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(17652);}while(r); } do{ *_FUNC_FINDID_LONG_I=func_instr(NULL,_FUNC_FINDID_STRING_N,qbs_new_txt_len("&",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17653);}while(r); S_19594:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17653);if(r)goto S_19594;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(17653);}while(r); } do{ *_FUNC_FINDID_LONG_I=func_instr(NULL,_FUNC_FINDID_STRING_N,qbs_new_txt_len("!",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17654);}while(r); S_19598:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17654);if(r)goto S_19598;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(17654);}while(r); } do{ *_FUNC_FINDID_LONG_I=func_instr(NULL,_FUNC_FINDID_STRING_N,qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17655);}while(r); S_19602:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17655);if(r)goto S_19602;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(17655);}while(r); } do{ *_FUNC_FINDID_LONG_I=func_instr(NULL,_FUNC_FINDID_STRING_N,qbs_new_txt_len("$",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17656);}while(r); S_19606:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17656);if(r)goto S_19606;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(17656);}while(r); } LABEL_GOTSC:; if(qbevent){evnt(17657);r=0;} S_19609:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(17658);if(r)goto S_19609;} do{ qbs_set(_FUNC_FINDID_STRING_SC,qbs_right(_FUNC_FINDID_STRING_N,_FUNC_FINDID_STRING_N->len-*_FUNC_FINDID_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17659);}while(r); do{ qbs_set(_FUNC_FINDID_STRING_N,qbs_left(_FUNC_FINDID_STRING_N,*_FUNC_FINDID_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17659);}while(r); S_19612:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FINDID_STRING_SC,qbs_new_txt_len("`",1)))|(qbs_equal(_FUNC_FINDID_STRING_SC,qbs_new_txt_len("~`",2)))))||new_error){ if(qbevent){evnt(17660);if(r)goto S_19612;} do{ qbs_set(_FUNC_FINDID_STRING_SC,qbs_add(_FUNC_FINDID_STRING_SC,qbs_new_txt_len("1",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17660);}while(r); } }else{ } do{ qbs_set(_FUNC_FINDID_STRING_INSF,qbs_add(__STRING_SUBFUNC,func_space( 256 -__STRING_SUBFUNC->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17671);}while(r); do{ qbs_set(_FUNC_FINDID_STRING_SECONDARG,qbs_add(_FUNC_FINDID_STRING_SECONDARG,func_space( 256 -_FUNC_FINDID_STRING_SECONDARG->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17672);}while(r); S_19619:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FINDID_STRING_SC->len))||new_error){ if(qbevent){evnt(17673);if(r)goto S_19619;} do{ *_FUNC_FINDID_LONG_SCPASSED= 1 ; if(!qbevent)break;evnt(17673);}while(r); do{ qbs_set(_FUNC_FINDID_STRING_SC,qbs_add(_FUNC_FINDID_STRING_SC,func_space( 8 -_FUNC_FINDID_STRING_SC->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17673);}while(r); }else{ do{ *_FUNC_FINDID_LONG_SCPASSED= 0 ; if(!qbevent)break;evnt(17673);}while(r); } S_19625:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FINDID_STRING_N->len< 256 )))||new_error){ if(qbevent){evnt(17675);if(r)goto S_19625;} do{ qbs_set(_FUNC_FINDID_STRING_N,qbs_add(_FUNC_FINDID_STRING_N,func_space( 256 -_FUNC_FINDID_STRING_N->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17675);}while(r); } do{ qbs_set(_FUNC_FINDID_STRING_N,qbs_rtrim(_FUNC_FINDID_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17684);}while(r); S_19629:; if ((*_FUNC_FINDID_LONG_FINDANOTHER)||new_error){ if(qbevent){evnt(17685);if(r)goto S_19629;} LABEL_HASHRETRY:; if(qbevent){evnt(17686);r=0;} do{ *_FUNC_FINDID_LONG_Z=FUNC_HASHFINDCONT(_FUNC_FINDID_LONG_UNREQUIRED,_FUNC_FINDID_LONG_I); if(!qbevent)break;evnt(17687);}while(r); }else{ do{ *_FUNC_FINDID_LONG_Z=FUNC_HASHFINDREV(_FUNC_FINDID_STRING_N,&(pass2525= 1 ),_FUNC_FINDID_LONG_UNREQUIRED,_FUNC_FINDID_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17689);}while(r); } do{ *__LONG_FINDIDINTERNAL=*_FUNC_FINDID_LONG_Z; if(!qbevent)break;evnt(17691);}while(r); S_19635:; if ((-(*_FUNC_FINDID_LONG_Z== 0 ))||new_error){ if(qbevent){evnt(17692);if(r)goto S_19635;} do{ goto LABEL_NOID; if(!qbevent)break;evnt(17692);}while(r); } do{ *_FUNC_FINDID_LONG_FINDID=*_FUNC_FINDID_LONG_Z; if(!qbevent)break;evnt(17693);}while(r); S_19639:; if (((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+544))== 0 ))&(-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2642))== 0 )))||new_error){ if(qbevent){evnt(17707);if(r)goto S_19639;} S_19640:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2382)),256,1),_FUNC_FINDID_STRING_INSF)))||new_error){ if(qbevent){evnt(17708);if(r)goto S_19640;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(17708);}while(r); } } S_19644:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+544))== 2 ))||new_error){ if(qbevent){evnt(17712);if(r)goto S_19644;} S_19645:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+1866)),256,1))!= 32 )))||new_error){ if(qbevent){evnt(17713);if(r)goto S_19645;} S_19646:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_FINDID_STRING_SECONDARG,qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+1866)),256,1))))||new_error){ if(qbevent){evnt(17714);if(r)goto S_19646;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(17714);}while(r); } } S_19650:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2122)),256,1))!= 32 )))||new_error){ if(qbevent){evnt(17716);if(r)goto S_19650;} S_19651:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FINDID_STRING_SECONDARG,qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2122)),256,1))))||new_error){ if(qbevent){evnt(17717);if(r)goto S_19651;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(17717);}while(r); } } } do{ *_FUNC_FINDID_LONG_IMUSTHAVE=string2i(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17723);}while(r); do{ *_FUNC_FINDID_LONG_AMUSTHAVE=*_FUNC_FINDID_LONG_IMUSTHAVE& 255 ; if(!qbevent)break;evnt(17724);}while(r); S_19658:; if ((-(*_FUNC_FINDID_LONG_AMUSTHAVE!= 32 ))||new_error){ if(qbevent){evnt(17725);if(r)goto S_19658;} S_19659:; if ((*_FUNC_FINDID_LONG_SCPASSED)||new_error){ if(qbevent){evnt(17726);if(r)goto S_19659;} S_19660:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FINDID_STRING_SC,qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1))))||new_error){ if(qbevent){evnt(17727);if(r)goto S_19660;} do{ goto LABEL_FINDIDOK; if(!qbevent)break;evnt(17727);}while(r); } } do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(17738);}while(r); } S_19666:; if ((*_FUNC_FINDID_LONG_SCPASSED)||new_error){ if(qbevent){evnt(17744);if(r)goto S_19666;} do{ *_FUNC_FINDID_LONG_IMAYHAVE=string2i(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+520)),8,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17745);}while(r); do{ *_FUNC_FINDID_LONG_AMAYHAVE=*_FUNC_FINDID_LONG_IMAYHAVE& 255 ; if(!qbevent)break;evnt(17746);}while(r); S_19669:; if ((-(*_FUNC_FINDID_LONG_AMAYHAVE== 32 ))||new_error){ if(qbevent){evnt(17747);if(r)goto S_19669;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(17747);}while(r); } S_19672:; if ((-(*_FUNC_FINDID_LONG_AMAYHAVE== 36 ))||new_error){ if(qbevent){evnt(17750);if(r)goto S_19672;} S_19673:; if ((-(*_FUNC_FINDID_LONG_IMAYHAVE!= 8228 ))||new_error){ if(qbevent){evnt(17751);if(r)goto S_19673;} S_19674:; if ((qbs_cleanup(qbs_tmp_base,-(string2i(_FUNC_FINDID_STRING_SC)== 8228 )))||new_error){ if(qbevent){evnt(17753);if(r)goto S_19674;} do{ goto LABEL_FINDIDOK; if(!qbevent)break;evnt(17753);}while(r); } } } S_19679:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_FINDID_STRING_SC,qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+520)),8,1))))||new_error){ if(qbevent){evnt(17757);if(r)goto S_19679;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(17757);}while(r); } } LABEL_FINDIDOK:; if(qbevent){evnt(17761);r=0;} do{ memcpy((((char*)__UDT_ID)+(0)),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860)),2860); if(!qbevent)break;evnt(17763);}while(r); do{ *__LONG_CURRENTID=*_FUNC_FINDID_LONG_I; if(!qbevent)break;evnt(17765);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17766);}while(r); LABEL_FINDIDNOMATCH:; if(qbevent){evnt(17769);r=0;} S_19686:; if ((-(*_FUNC_FINDID_LONG_Z== 2 ))||new_error){ if(qbevent){evnt(17771);if(r)goto S_19686;} do{ goto LABEL_HASHRETRY; if(!qbevent)break;evnt(17771);}while(r); } LABEL_NOID:; if(qbevent){evnt(17774);r=0;} do{ *_FUNC_FINDID_LONG_FINDID= 0 ; if(!qbevent)break;evnt(17775);}while(r); do{ *__LONG_CURRENTID= -1 ; if(!qbevent)break;evnt(17776);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free32.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_FINDID_LONG_FINDID; } int32 FUNC_FINDARRAY(qbs*_FUNC_FINDARRAY_STRING_SECURE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data33.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_FINDARRAY_LONG_FINDARRAY= -1 ; if(!qbevent)break;evnt(17780);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_SECURE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17781);}while(r); S_19693:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(17782);if(r)goto S_19693;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2527; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("func findarray:in:",18),_FUNC_FINDARRAY_STRING_N), 0 , 0 , 1 ); if (new_error) goto skip2527; skip2527: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17782);}while(r); } S_19696:; if ((qbs_cleanup(qbs_tmp_base,-(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_FINDARRAY_STRING_N))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]== 0 )))||new_error){ if(qbevent){evnt(17783);if(r)goto S_19696;} do{ *_FUNC_FINDARRAY_LONG_FINDARRAY= 0 ; if(!qbevent)break;evnt(17783);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17783);}while(r); } do{ *_FUNC_FINDARRAY_LONG_I=func_instr(NULL,_FUNC_FINDARRAY_STRING_N,qbs_new_txt_len("~",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17786);}while(r); S_19701:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(17786);if(r)goto S_19701;} do{ qbs_set(_FUNC_FINDARRAY_STRING_SC,qbs_right(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_N->len-*_FUNC_FINDARRAY_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17786);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,qbs_left(_FUNC_FINDARRAY_STRING_N,*_FUNC_FINDARRAY_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17786);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(17786);}while(r); } do{ *_FUNC_FINDARRAY_LONG_I=func_instr(NULL,_FUNC_FINDARRAY_STRING_N,qbs_new_txt_len("`",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17787);}while(r); S_19707:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(17787);if(r)goto S_19707;} do{ qbs_set(_FUNC_FINDARRAY_STRING_SC,qbs_right(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_N->len-*_FUNC_FINDARRAY_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17787);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,qbs_left(_FUNC_FINDARRAY_STRING_N,*_FUNC_FINDARRAY_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17787);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(17787);}while(r); } do{ *_FUNC_FINDARRAY_LONG_I=func_instr(NULL,_FUNC_FINDARRAY_STRING_N,qbs_new_txt_len("%",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17788);}while(r); S_19713:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(17788);if(r)goto S_19713;} do{ qbs_set(_FUNC_FINDARRAY_STRING_SC,qbs_right(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_N->len-*_FUNC_FINDARRAY_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17788);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,qbs_left(_FUNC_FINDARRAY_STRING_N,*_FUNC_FINDARRAY_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17788);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(17788);}while(r); } do{ *_FUNC_FINDARRAY_LONG_I=func_instr(NULL,_FUNC_FINDARRAY_STRING_N,qbs_new_txt_len("&",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17789);}while(r); S_19719:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(17789);if(r)goto S_19719;} do{ qbs_set(_FUNC_FINDARRAY_STRING_SC,qbs_right(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_N->len-*_FUNC_FINDARRAY_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17789);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,qbs_left(_FUNC_FINDARRAY_STRING_N,*_FUNC_FINDARRAY_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17789);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(17789);}while(r); } do{ *_FUNC_FINDARRAY_LONG_I=func_instr(NULL,_FUNC_FINDARRAY_STRING_N,qbs_new_txt_len("!",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17790);}while(r); S_19725:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(17790);if(r)goto S_19725;} do{ qbs_set(_FUNC_FINDARRAY_STRING_SC,qbs_right(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_N->len-*_FUNC_FINDARRAY_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17790);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,qbs_left(_FUNC_FINDARRAY_STRING_N,*_FUNC_FINDARRAY_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17790);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(17790);}while(r); } do{ *_FUNC_FINDARRAY_LONG_I=func_instr(NULL,_FUNC_FINDARRAY_STRING_N,qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17791);}while(r); S_19731:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(17791);if(r)goto S_19731;} do{ qbs_set(_FUNC_FINDARRAY_STRING_SC,qbs_right(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_N->len-*_FUNC_FINDARRAY_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17791);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,qbs_left(_FUNC_FINDARRAY_STRING_N,*_FUNC_FINDARRAY_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17791);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(17791);}while(r); } do{ *_FUNC_FINDARRAY_LONG_I=func_instr(NULL,_FUNC_FINDARRAY_STRING_N,qbs_new_txt_len("$",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17792);}while(r); S_19737:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(17792);if(r)goto S_19737;} do{ qbs_set(_FUNC_FINDARRAY_STRING_SC,qbs_right(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_N->len-*_FUNC_FINDARRAY_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17792);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,qbs_left(_FUNC_FINDARRAY_STRING_N,*_FUNC_FINDARRAY_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17792);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(17792);}while(r); } LABEL_GOTSC2:; if(qbevent){evnt(17793);r=0;} do{ qbs_set(_FUNC_FINDARRAY_STRING_N2,qbs_add(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_SC)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17794);}while(r); S_19743:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_FINDARRAY_STRING_SC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(17796);if(r)goto S_19743;} do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17799);}while(r); S_19745:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17799);if(r)goto S_19745;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17799);}while(r); } S_19748:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(17800);if(r)goto S_19748;} S_19749:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17801);if(r)goto S_19749;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17802);}while(r); } S_19752:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(17804);if(r)goto S_19752;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(17804);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17804);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(17804);}while(r); } S_19758:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17805);if(r)goto S_19758;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17805);}while(r); } } dl_exit_2535:; }else{ do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17812);}while(r); S_19764:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17812);if(r)goto S_19764;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17812);}while(r); } S_19767:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(17813);if(r)goto S_19767;} S_19768:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17814);if(r)goto S_19768;} S_19769:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(17815);if(r)goto S_19769;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17815);}while(r); } S_19772:; if ((-(*(int32*)(((char*)__UDT_ID)+(2638))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(17816);if(r)goto S_19772;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17816);}while(r); } } S_19776:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(17818);if(r)goto S_19776;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(17818);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17818);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(17818);}while(r); } S_19782:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17819);if(r)goto S_19782;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17819);}while(r); } } dl_exit_2536:; do{ *_FUNC_FINDARRAY_LONG_A=qbs_asc(qbs_ucase(_FUNC_FINDARRAY_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17823);}while(r); S_19787:; if ((-(*_FUNC_FINDARRAY_LONG_A== 95 ))||new_error){ if(qbevent){evnt(17823);if(r)goto S_19787;} do{ *_FUNC_FINDARRAY_LONG_A= 91 ; if(!qbevent)break;evnt(17823);}while(r); } do{ *_FUNC_FINDARRAY_LONG_A=*_FUNC_FINDARRAY_LONG_A- 64 ; if(!qbevent)break;evnt(17824);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N2,qbs_add(_FUNC_FINDARRAY_STRING_N,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*_FUNC_FINDARRAY_LONG_A)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17825);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17826);}while(r); S_19793:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17826);if(r)goto S_19793;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17826);}while(r); } S_19796:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(17827);if(r)goto S_19796;} S_19797:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17828);if(r)goto S_19797;} S_19798:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(17829);if(r)goto S_19798;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17829);}while(r); } S_19801:; if ((-(*(int32*)(((char*)__UDT_ID)+(2638))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(17830);if(r)goto S_19801;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17830);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17831);}while(r); } S_19806:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(17833);if(r)goto S_19806;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(17833);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17833);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(17833);}while(r); } S_19812:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17834);if(r)goto S_19812;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17834);}while(r); } } dl_exit_2537:; do{ qbs_set(_FUNC_FINDARRAY_STRING_N2,_FUNC_FINDARRAY_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17838);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17839);}while(r); S_19818:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17839);if(r)goto S_19818;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17839);}while(r); } S_19821:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(17840);if(r)goto S_19821;} S_19822:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17841);if(r)goto S_19822;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17842);}while(r); } S_19825:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(17844);if(r)goto S_19825;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(17844);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17844);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(17844);}while(r); } S_19831:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17845);if(r)goto S_19831;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17845);}while(r); } } dl_exit_2538:; do{ *_FUNC_FINDARRAY_LONG_A=qbs_asc(qbs_ucase(_FUNC_FINDARRAY_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17849);}while(r); S_19836:; if ((-(*_FUNC_FINDARRAY_LONG_A== 95 ))||new_error){ if(qbevent){evnt(17849);if(r)goto S_19836;} do{ *_FUNC_FINDARRAY_LONG_A= 91 ; if(!qbevent)break;evnt(17849);}while(r); } do{ *_FUNC_FINDARRAY_LONG_A=*_FUNC_FINDARRAY_LONG_A- 64 ; if(!qbevent)break;evnt(17850);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N2,qbs_add(_FUNC_FINDARRAY_STRING_N,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*_FUNC_FINDARRAY_LONG_A)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17851);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17852);}while(r); S_19842:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17852);if(r)goto S_19842;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17852);}while(r); } S_19845:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(17853);if(r)goto S_19845;} S_19846:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17854);if(r)goto S_19846;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17855);}while(r); } S_19849:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(17857);if(r)goto S_19849;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(17857);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17857);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(17857);}while(r); } S_19855:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17858);if(r)goto S_19855;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17858);}while(r); } } dl_exit_2539:; } do{ *_FUNC_FINDARRAY_LONG_FINDARRAY= 0 ; if(!qbevent)break;evnt(17862);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free33.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_FINDARRAY_LONG_FINDARRAY; } qbs* FUNC_FIXOPERATIONORDER(qbs*_FUNC_FIXOPERATIONORDER_STRING_SAVEA){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data34.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_STRING_SAVEA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17869);}while(r); S_19862:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(17870);if(r)goto S_19862;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2541; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:in:",21),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2541; skip2541: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17870);}while(r); } do{ *__LONG_FOOINDWEL=*__LONG_FOOINDWEL+ 1 ; if(!qbevent)break;evnt(17872);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=FUNC_NUMELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17874);}while(r); S_19867:; if ((-(*__LONG_FOOINDWEL== 1 ))||new_error){ if(qbevent){evnt(17876);if(r)goto S_19867;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(17879);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_add(__STRING1_SP,_FUNC_FIXOPERATIONORDER_STRING_A),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17880);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_B1,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len("(",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17881);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_B2,qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len(")",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17882);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I= 1 ; if(!qbevent)break;evnt(17883);}while(r); LABEL_FINDMMB:; if(qbevent){evnt(17884);r=0;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I1=func_instr(*_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_STRING_A2,_FUNC_FIXOPERATIONORDER_STRING_B1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17885);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I2=func_instr(*_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_STRING_A2,_FUNC_FIXOPERATIONORDER_STRING_B2,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17886);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I3=*_FUNC_FIXOPERATIONORDER_LONG_I1; if(!qbevent)break;evnt(17887);}while(r); S_19876:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I2)||new_error){ if(qbevent){evnt(17888);if(r)goto S_19876;} S_19877:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I1== 0 ))||new_error){ if(qbevent){evnt(17889);if(r)goto S_19877;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I3=*_FUNC_FIXOPERATIONORDER_LONG_I2; if(!qbevent)break;evnt(17890);}while(r); }else{ S_19880:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I2<*_FUNC_FIXOPERATIONORDER_LONG_I1))||new_error){ if(qbevent){evnt(17892);if(r)goto S_19880;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I3=*_FUNC_FIXOPERATIONORDER_LONG_I2; if(!qbevent)break;evnt(17892);}while(r); } } } S_19885:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I3)||new_error){ if(qbevent){evnt(17895);if(r)goto S_19885;} S_19886:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I3==*_FUNC_FIXOPERATIONORDER_LONG_I1))||new_error){ if(qbevent){evnt(17896);if(r)goto S_19886;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(17896);}while(r); } S_19889:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I3==*_FUNC_FIXOPERATIONORDER_LONG_I2))||new_error){ if(qbevent){evnt(17897);if(r)goto S_19889;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(17897);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I3+ 2 ; if(!qbevent)break;evnt(17898);}while(r); S_19893:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B< 0 ))||new_error){ if(qbevent){evnt(17899);if(r)goto S_19893;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Missing (",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17899);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17899);}while(r); } do{ goto LABEL_FINDMMB; if(!qbevent)break;evnt(17900);}while(r); } S_19899:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B> 0 ))||new_error){ if(qbevent){evnt(17902);if(r)goto S_19899;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Missing )",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17902);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17902);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_add(__STRING1_SP,_FUNC_FIXOPERATIONORDER_STRING_A),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17906);}while(r); LABEL_RULE1:; if(qbevent){evnt(17909);r=0;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I=func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len("+",1)),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17910);}while(r); S_19905:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I)||new_error){ if(qbevent){evnt(17911);if(r)goto S_19905;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_A2,*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_A2,_FUNC_FIXOPERATIONORDER_STRING_A2->len-*_FUNC_FIXOPERATIONORDER_LONG_I- 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17912);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,func_mid(_FUNC_FIXOPERATIONORDER_STRING_A2, 2 ,_FUNC_FIXOPERATIONORDER_STRING_A2->len- 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17913);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(17914);}while(r); S_19909:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(17915);if(r)goto S_19909;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2544; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:+/-:",22),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2544; skip2544: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17915);}while(r); } do{ goto LABEL_RULE1; if(!qbevent)break;evnt(17916);}while(r); } LABEL_RULE2:; if(qbevent){evnt(17920);r=0;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I=func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len("-",1)),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17921);}while(r); S_19915:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I)||new_error){ if(qbevent){evnt(17922);if(r)goto S_19915;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_A2,*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_A2,_FUNC_FIXOPERATIONORDER_STRING_A2->len-*_FUNC_FIXOPERATIONORDER_LONG_I- 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17923);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,func_mid(_FUNC_FIXOPERATIONORDER_STRING_A2, 2 ,_FUNC_FIXOPERATIONORDER_STRING_A2->len- 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17924);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(17925);}while(r); S_19919:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(17926);if(r)goto S_19919;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2547; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:+/-:",22),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2547; skip2547: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17926);}while(r); } do{ goto LABEL_RULE2; if(!qbevent)break;evnt(17927);}while(r); } LABEL_RULE3:; if(qbevent){evnt(17931);r=0;} S_19924:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_add(__STRING1_SP,qbs_new_txt_len("-",1)),__STRING1_SP),qbs_new_txt_len("-",1)),__STRING1_SP),0)))||new_error){ if(qbevent){evnt(17932);if(r)goto S_19924;} S_19925:; fornext_value2549= 1 ; fornext_finalvalue2549=*_FUNC_FIXOPERATIONORDER_LONG_N- 2 ; fornext_step2549= 1 ; if (fornext_step2549<0) fornext_step_negative2549=1; else fornext_step_negative2549=0; if (new_error) goto fornext_error2549; goto fornext_entrylabel2549; while(1){ fornext_value2549=fornext_step2549+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2549: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2549; if (fornext_step_negative2549){ if (fornext_value2549fornext_finalvalue2549) break; } fornext_error2549:; if(qbevent){evnt(17933);if(r)goto S_19925;} S_19926:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I))))||new_error){ if(qbevent){evnt(17934);if(r)goto S_19926;} S_19927:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2550=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 )),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(17935);if(r)goto S_19927;} S_19928:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2551=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 )),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(17936);if(r)goto S_19928;} do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2552=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ),&(pass2553=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ),&(pass2554= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17937);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_add(__STRING1_SP,_FUNC_FIXOPERATIONORDER_STRING_A),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17938);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 2 ; if(!qbevent)break;evnt(17939);}while(r); S_19932:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(17940);if(r)goto S_19932;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2555; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:+/-:",22),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2555; skip2555: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17940);}while(r); } do{ goto LABEL_RULE3; if(!qbevent)break;evnt(17941);}while(r); } } } } fornext_exit_2548:; } S_19941:; fornext_value2557= 1 ; fornext_finalvalue2557=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; fornext_step2557= 1 ; if (fornext_step2557<0) fornext_step_negative2557=1; else fornext_step_negative2557=0; if (new_error) goto fornext_error2557; goto fornext_entrylabel2557; while(1){ fornext_value2557=fornext_step2557+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2557: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2557; if (fornext_step_negative2557){ if (fornext_value2557fornext_finalvalue2557) break; } fornext_error2557:; if(qbevent){evnt(17965);if(r)goto S_19941;} S_19942:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I>(*_FUNC_FIXOPERATIONORDER_LONG_N- 1 )))||new_error){ if(qbevent){evnt(17966);if(r)goto S_19942;} do{ goto fornext_exit_2556; if(!qbevent)break;evnt(17966);}while(r); } S_19945:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I))== 45 )))||new_error){ if(qbevent){evnt(17968);if(r)goto S_19945;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 0 ; if(!qbevent)break;evnt(17970);}while(r); S_19947:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I== 1 ))||new_error){ if(qbevent){evnt(17971);if(r)goto S_19947;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 1 ; if(!qbevent)break;evnt(17972);}while(r); }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2558=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17974);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17975);}while(r); S_19952:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 44 )))||new_error){ if(qbevent){evnt(17976);if(r)goto S_19952;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 1 ; if(!qbevent)break;evnt(17977);}while(r); }else{ S_19955:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2)))||new_error){ if(qbevent){evnt(17979);if(r)goto S_19955;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 1 ; if(!qbevent)break;evnt(17979);}while(r); } } } S_19960:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEG== 1 ))||new_error){ if(qbevent){evnt(17982);if(r)goto S_19960;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2559=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17984);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17985);}while(r); S_19963:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C>= 48 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(17986);if(r)goto S_19963;} do{ *_FUNC_FIXOPERATIONORDER_LONG_C2= 0 ; if(!qbevent)break;evnt(17987);}while(r); S_19965:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I<(*_FUNC_FIXOPERATIONORDER_LONG_N- 1 )))||new_error){ if(qbevent){evnt(17987);if(r)goto S_19965;} do{ *_FUNC_FIXOPERATIONORDER_LONG_C2=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2560=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17987);}while(r); } S_19968:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2!= 94 ))||new_error){ if(qbevent){evnt(17988);if(r)goto S_19968;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I2=func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17990);}while(r); S_19970:; if ((qbs_cleanup(qbs_tmp_base,*_FUNC_FIXOPERATIONORDER_LONG_I2&(-(qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2,*_FUNC_FIXOPERATIONORDER_LONG_I2+ 1 )!= 38 ))))||new_error){ if(qbevent){evnt(17991);if(r)goto S_19970;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("-",1),qbs_left(_FUNC_FIXOPERATIONORDER_STRING_A2,*_FUNC_FIXOPERATIONORDER_LONG_I2)),qbs_new_txt_len("-",1)),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_A2,_FUNC_FIXOPERATIONORDER_STRING_A2->len-*_FUNC_FIXOPERATIONORDER_LONG_I2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17992);}while(r); }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_add(qbs_new_txt_len("-",1),_FUNC_FIXOPERATIONORDER_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17994);}while(r); } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2562=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ),&(pass2563= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17996);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2564=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17997);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(17998);}while(r); S_19978:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(17999);if(r)goto S_19978;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2565; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:negation:",27),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2565; skip2565: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17999);}while(r); } do{ goto LABEL_NEGDONE; if(!qbevent)break;evnt(18001);}while(r); } } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2566= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18008);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2567=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_new_txt_len("\361",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18009);}while(r); S_19986:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18010);if(r)goto S_19986;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2568; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:negation:",27),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2568; skip2568: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18010);}while(r); } } } LABEL_NEGDONE:; if(qbevent){evnt(18014);r=0;} } fornext_exit_2556:; } do{ *_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED= 0 ; if(!qbevent)break;evnt(18024);}while(r); LABEL_POWNEG:; if(qbevent){evnt(18025);r=0;} S_19994:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("^",1),__STRING1_SP),qbs_new_txt_len("\361",1)),0)))||new_error){ if(qbevent){evnt(18026);if(r)goto S_19994;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18027);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B1= 0 ; if(!qbevent)break;evnt(18028);}while(r); S_19997:; fornext_value2570= 1 ; fornext_finalvalue2570=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2570= 1 ; if (fornext_step2570<0) fornext_step_negative2570=1; else fornext_step_negative2570=0; if (new_error) goto fornext_error2570; goto fornext_entrylabel2570; while(1){ fornext_value2570=fornext_step2570+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2570: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2570; if (fornext_step_negative2570){ if (fornext_value2570fornext_finalvalue2570) break; } fornext_error2570:; if(qbevent){evnt(18029);if(r)goto S_19997;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18030);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18031);}while(r); S_20000:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))||new_error){ if(qbevent){evnt(18032);if(r)goto S_20000;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18032);}while(r); } S_20003:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))||new_error){ if(qbevent){evnt(18033);if(r)goto S_20003;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18033);}while(r); } S_20006:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18034);if(r)goto S_20006;} S_20007:; if ((*_FUNC_FIXOPERATIONORDER_LONG_B1)||new_error){ if(qbevent){evnt(18035);if(r)goto S_20007;} S_20008:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2)))||new_error){ if(qbevent){evnt(18036);if(r)goto S_20008;} S_20009:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_new_txt_len("^",1)))&(qbs_notequal(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_new_txt_len("\361",1)))))||new_error){ if(qbevent){evnt(18037);if(r)goto S_20009;} do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2571=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18038);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_B1,qbs_new_txt_len("{",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18039);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18040);}while(r); S_20013:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18041);if(r)goto S_20013;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2572; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:^-:",21),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2572; skip2572: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18041);}while(r); } do{ goto LABEL_POWNEG; if(!qbevent)break;evnt(18042);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED= 1 ; if(!qbevent)break;evnt(18043);}while(r); } } } S_20021:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 94 ))||new_error){ if(qbevent){evnt(18047);if(r)goto S_20021;} S_20022:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2573=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 )),qbs_new_txt_len("\361",1))))||new_error){ if(qbevent){evnt(18048);if(r)goto S_20022;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B1=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18048);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(18048);}while(r); } } } } fornext_exit_2569:; S_20029:; if ((*_FUNC_FIXOPERATIONORDER_LONG_B1)||new_error){ if(qbevent){evnt(18052);if(r)goto S_20029;} do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_B1,qbs_new_txt_len("{",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18053);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_A,__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18054);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18055);}while(r); S_20033:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18056);if(r)goto S_20033;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2574; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:^-:",21),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2574; skip2574: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18056);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED= 1 ; if(!qbevent)break;evnt(18057);}while(r); do{ goto LABEL_POWNEG; if(!qbevent)break;evnt(18058);}while(r); } } LABEL_NOT_RECHECK:; if(qbevent){evnt(18065);r=0;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LCO= 255 ; if(!qbevent)break;evnt(18066);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_HCO= 0 ; if(!qbevent)break;evnt(18067);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18068);}while(r); S_20043:; fornext_value2576= 1 ; fornext_finalvalue2576=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2576= 1 ; if (fornext_step2576<0) fornext_step_negative2576=1; else fornext_step_negative2576=0; if (new_error) goto fornext_error2576; goto fornext_entrylabel2576; while(1){ fornext_value2576=fornext_step2576+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2576: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2576; if (fornext_step_negative2576){ if (fornext_value2576fornext_finalvalue2576) break; } fornext_error2576:; if(qbevent){evnt(18069);if(r)goto S_20043;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18070);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18071);}while(r); S_20046:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18072);if(r)goto S_20046;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18072);}while(r); } S_20049:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18073);if(r)goto S_20049;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18073);}while(r); } S_20052:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18074);if(r)goto S_20052;} do{ *_FUNC_FIXOPERATIONORDER_LONG_OP=FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18075);}while(r); S_20054:; if ((*_FUNC_FIXOPERATIONORDER_LONG_OP)||new_error){ if(qbevent){evnt(18076);if(r)goto S_20054;} S_20055:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_OP<*_FUNC_FIXOPERATIONORDER_LONG_LCO))||new_error){ if(qbevent){evnt(18077);if(r)goto S_20055;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LCO=*_FUNC_FIXOPERATIONORDER_LONG_OP; if(!qbevent)break;evnt(18077);}while(r); } S_20058:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_OP>*_FUNC_FIXOPERATIONORDER_LONG_HCO))||new_error){ if(qbevent){evnt(18078);if(r)goto S_20058;} do{ *_FUNC_FIXOPERATIONORDER_LONG_HCO=*_FUNC_FIXOPERATIONORDER_LONG_OP; if(!qbevent)break;evnt(18078);}while(r); } } } } fornext_exit_2575:; S_20064:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_HCO!= 0 ))||new_error){ if(qbevent){evnt(18085);if(r)goto S_20064;} S_20065:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LCO!=*_FUNC_FIXOPERATIONORDER_LONG_HCO))||new_error){ if(qbevent){evnt(18086);if(r)goto S_20065;} S_20066:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LCO== 6 ))||new_error){ if(qbevent){evnt(18089);if(r)goto S_20066;} S_20067:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_N== 1 ))||new_error){ if(qbevent){evnt(18092);if(r)goto S_20067;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected NOT ...",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18092);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18092);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18093);}while(r); S_20072:; fornext_value2578= 1 ; fornext_finalvalue2578=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2578= 1 ; if (fornext_step2578<0) fornext_step_negative2578=1; else fornext_step_negative2578=0; if (new_error) goto fornext_error2578; goto fornext_entrylabel2578; while(1){ fornext_value2578=fornext_step2578+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2578: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2578; if (fornext_step_negative2578){ if (fornext_value2578fornext_finalvalue2578) break; } fornext_error2578:; if(qbevent){evnt(18094);if(r)goto S_20072;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18095);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18096);}while(r); S_20075:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18097);if(r)goto S_20075;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18097);}while(r); } S_20078:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18098);if(r)goto S_20078;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18098);}while(r); } S_20081:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18099);if(r)goto S_20081;} S_20082:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_A2),qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(18100);if(r)goto S_20082;} S_20083:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I==*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18101);if(r)goto S_20083;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected NOT ...",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18101);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18101);}while(r); } S_20087:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I== 1 ))||new_error){ if(qbevent){evnt(18102);if(r)goto S_20087;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("NOT",3),__STRING1_SP),qbs_new_txt_len("{",1)),__STRING1_SP),FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2579= 2 ),_FUNC_FIXOPERATIONORDER_LONG_N)),__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18102);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18102);}while(r); do{ goto LABEL_LCO_BRACKETTING_DONE; if(!qbevent)break;evnt(18102);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2580= 1 ),&(pass2581=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 )),__STRING1_SP),qbs_new_txt_len("{",1)),__STRING1_SP),qbs_new_txt_len("NOT",3)),__STRING1_SP),qbs_new_txt_len("{",1)),__STRING1_SP),FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2582=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ),_FUNC_FIXOPERATIONORDER_LONG_N)),__STRING1_SP),qbs_new_txt_len("}",1)),__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18103);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 4 ; if(!qbevent)break;evnt(18104);}while(r); do{ goto LABEL_NOT_RECHECK; if(!qbevent)break;evnt(18105);}while(r); } } } fornext_exit_2577:; } do{ *_FUNC_FIXOPERATIONORDER_LONG_N2=*_FUNC_FIXOPERATIONORDER_LONG_N; if(!qbevent)break;evnt(18111);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18112);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A3,qbs_new_txt_len("{",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18113);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N= 1 ; if(!qbevent)break;evnt(18114);}while(r); S_20103:; fornext_value2584= 1 ; fornext_finalvalue2584=*_FUNC_FIXOPERATIONORDER_LONG_N2; fornext_step2584= 1 ; if (fornext_step2584<0) fornext_step_negative2584=1; else fornext_step_negative2584=0; if (new_error) goto fornext_error2584; goto fornext_entrylabel2584; while(1){ fornext_value2584=fornext_step2584+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2584: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2584; if (fornext_step_negative2584){ if (fornext_value2584fornext_finalvalue2584) break; } fornext_error2584:; if(qbevent){evnt(18115);if(r)goto S_20103;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18116);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18117);}while(r); S_20106:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18118);if(r)goto S_20106;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18118);}while(r); } S_20109:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18119);if(r)goto S_20109;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18119);}while(r); } S_20112:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18120);if(r)goto S_20112;} do{ *_FUNC_FIXOPERATIONORDER_LONG_OP=FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18121);}while(r); S_20114:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_OP==*_FUNC_FIXOPERATIONORDER_LONG_LCO))||new_error){ if(qbevent){evnt(18122);if(r)goto S_20114;} S_20115:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I== 1 ))||new_error){ if(qbevent){evnt(18123);if(r)goto S_20115;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A3,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_A2,__STRING1_SP),qbs_new_txt_len("{",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18124);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N= 2 ; if(!qbevent)break;evnt(18125);}while(r); }else{ S_20119:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I==*_FUNC_FIXOPERATIONORDER_LONG_N2))||new_error){ if(qbevent){evnt(18127);if(r)goto S_20119;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Expected variable/value after '",31),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_A2)),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18127);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18127);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A3,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_A3,__STRING1_SP),qbs_new_txt_len("}",1)),__STRING1_SP),_FUNC_FIXOPERATIONORDER_STRING_A2),__STRING1_SP),qbs_new_txt_len("{",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18128);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 3 ; if(!qbevent)break;evnt(18129);}while(r); } do{ goto LABEL_FIXOP0; if(!qbevent)break;evnt(18131);}while(r); } } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A3,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_A3,__STRING1_SP),_FUNC_FIXOPERATIONORDER_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18135);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 1 ; if(!qbevent)break;evnt(18136);}while(r); LABEL_FIXOP0:; if(qbevent){evnt(18137);r=0;} } fornext_exit_2583:; do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A3,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_A3,__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18139);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 1 ; if(!qbevent)break;evnt(18140);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18141);}while(r); LABEL_LCO_BRACKETTING_DONE:; if(qbevent){evnt(18143);r=0;} S_20135:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18144);if(r)goto S_20135;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2585; sub_file_print(tmp_fileno,qbs_new_txt_len("fixoperationorder:lco bracketing[",33), 0 , 0 , 0 ); if (new_error) goto skip2585; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_LCO)), 1 , 0 , 0 ); if (new_error) goto skip2585; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0 , 0 , 0 ); if (new_error) goto skip2585; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_HCO)), 1 , 0 , 0 ); if (new_error) goto skip2585; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("]:",2),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2585; skip2585: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18144);}while(r); } S_20138:; if ((*_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED)||new_error){ if(qbevent){evnt(18147);if(r)goto S_20138;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18148);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I= 0 ; if(!qbevent)break;evnt(18149);}while(r); S_20141:; while((-(*_FUNC_FIXOPERATIONORDER_LONG_I<=*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18150);if(r)goto S_20141;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(18151);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18152);}while(r); S_20144:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18153);if(r)goto S_20144;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18153);}while(r); } S_20147:; if (((((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 ))))&(-(*_FUNC_FIXOPERATIONORDER_LONG_B!= 0 )))||new_error){ if(qbevent){evnt(18154);if(r)goto S_20147;} do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2587= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18155);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(18156);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ; if(!qbevent)break;evnt(18157);}while(r); S_20151:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18158);if(r)goto S_20151;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2588; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:^- {} removed:",32),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip2588; skip2588: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18158);}while(r); } } S_20155:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18160);if(r)goto S_20155;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18160);}while(r); } } dl_exit_2586:; } } } S_20162:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_left(_FUNC_FIXOPERATIONORDER_STRING_A, 4 )),(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\361",1),__STRING1_SP),qbs_new_txt_len("\361",1)),__STRING1_SP)))))||new_error){ if(qbevent){evnt(18168);if(r)goto S_20162;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\361",1),__STRING1_SP),qbs_new_txt_len("{",1)),__STRING1_SP),FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2589= 2 ),_FUNC_FIXOPERATIONORDER_LONG_N)),__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18169);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18169);}while(r); } S_20166:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_ucase(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_A, 8 ))),(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("NOT",3),__STRING1_SP),qbs_new_txt_len("NOT",3)),__STRING1_SP)))))||new_error){ if(qbevent){evnt(18171);if(r)goto S_20166;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("NOT",3),__STRING1_SP),qbs_new_txt_len("{",1)),__STRING1_SP),FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2590= 2 ),_FUNC_FIXOPERATIONORDER_LONG_N)),__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18172);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18172);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18181);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18182);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C= 0 ; if(!qbevent)break;evnt(18183);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 0 ; if(!qbevent)break;evnt(18184);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI= 0 ; if(!qbevent)break;evnt(18184);}while(r); S_20175:; fornext_value2592= 1 ; fornext_finalvalue2592=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2592= 1 ; if (fornext_step2592<0) fornext_step_negative2592=1; else fornext_step_negative2592=0; if (new_error) goto fornext_error2592; goto fornext_entrylabel2592; while(1){ fornext_value2592=fornext_step2592+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2592: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2592; if (fornext_step_negative2592){ if (fornext_value2592fornext_finalvalue2592) break; } fornext_error2592:; if(qbevent){evnt(18185);if(r)goto S_20175;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18186);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTC=*_FUNC_FIXOPERATIONORDER_LONG_C; if(!qbevent)break;evnt(18187);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18188);}while(r); S_20179:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18190);if(r)goto S_20179;} S_20180:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C!= 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_B!= 0 )))||new_error){ if(qbevent){evnt(18191);if(r)goto S_20180;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18191);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18192);}while(r); do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18193);}while(r); } S_20186:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18195);if(r)goto S_20186;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18197);}while(r); S_20188:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18200);if(r)goto S_20188;} S_20189:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))||new_error){ if(qbevent){evnt(18201);if(r)goto S_20189;} S_20190:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTC== 40 ))||new_error){ if(qbevent){evnt(18202);if(r)goto S_20190;} S_20191:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTTI==(*_FUNC_FIXOPERATIONORDER_LONG_I- 2 )))|(-(*_FUNC_FIXOPERATIONORDER_LONG_LASTTI== 0 )))||new_error){ if(qbevent){evnt(18203);if(r)goto S_20191;} S_20192:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTT>= 0 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_LASTT<= 3 )))||new_error){ if(qbevent){evnt(18204);if(r)goto S_20192;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unexpected (",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18205);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18205);}while(r); } } } } } S_20200:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C!= 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_B!= 0 )))||new_error){ if(qbevent){evnt(18212);if(r)goto S_20200;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18212);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18213);}while(r); } S_20205:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18216);if(r)goto S_20205;} S_20206:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 34 ))||new_error){ if(qbevent){evnt(18227);if(r)goto S_20206;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 1 ; if(!qbevent)break;evnt(18228);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18228);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X2= 1 ; if(!qbevent)break;evnt(18232);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X=func_instr(*_FUNC_FIXOPERATIONORDER_LONG_X2,_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("\\",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18233);}while(r); S_20211:; while((*_FUNC_FIXOPERATIONORDER_LONG_X)||new_error){ if(qbevent){evnt(18234);if(r)goto S_20211;} do{ *_FUNC_FIXOPERATIONORDER_LONG_C2=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18235);}while(r); S_20213:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2== 92 ))||new_error){ if(qbevent){evnt(18236);if(r)goto S_20213;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_F2,_FUNC_FIXOPERATIONORDER_STRING_F2->len-*_FUNC_FIXOPERATIONORDER_LONG_X- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18237);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X2=*_FUNC_FIXOPERATIONORDER_LONG_X+ 1 ; if(!qbevent)break;evnt(18238);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_C3=((qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X+ 3 )- 48 ))+((qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X+ 2 )- 48 )* 8 )+((qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X+ 1 )- 48 )* 64 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18241);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(qbs_add(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X- 1 ),func_chr(*_FUNC_FIXOPERATIONORDER_LONG_C3)),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_F2,_FUNC_FIXOPERATIONORDER_STRING_F2->len-*_FUNC_FIXOPERATIONORDER_LONG_X- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18242);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X2=*_FUNC_FIXOPERATIONORDER_LONG_X+ 1 ; if(!qbevent)break;evnt(18243);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_X=func_instr(*_FUNC_FIXOPERATIONORDER_LONG_X2,_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("\\",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18245);}while(r); } dl_exit_2593:; do{ *_FUNC_FIXOPERATIONORDER_LONG_X=func_instr( 2 ,_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(func_chr( 34 ),qbs_new_txt_len(",",1)),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18248);}while(r); S_20224:; if ((*_FUNC_FIXOPERATIONORDER_LONG_X)||new_error){ if(qbevent){evnt(18248);if(r)goto S_20224;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_left(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18248);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18249);}while(r); } S_20229:; if (((((-(*_FUNC_FIXOPERATIONORDER_LONG_C>= 48 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_C<= 57 ))))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 45 )))||new_error){ if(qbevent){evnt(18253);if(r)goto S_20229;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 2 ; if(!qbevent)break;evnt(18254);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18254);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X=func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18256);}while(r); S_20233:; if ((*_FUNC_FIXOPERATIONORDER_LONG_X)||new_error){ if(qbevent){evnt(18257);if(r)goto S_20233;} do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2596= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18258);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2597=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_left(_FUNC_FIXOPERATIONORDER_STRING_F2,*_FUNC_FIXOPERATIONORDER_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18258);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_right(_FUNC_FIXOPERATIONORDER_STRING_F2,_FUNC_FIXOPERATIONORDER_STRING_F2->len-*_FUNC_FIXOPERATIONORDER_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18259);}while(r); } S_20238:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_X== 0 ))||new_error){ if(qbevent){evnt(18262);if(r)goto S_20238;} do{ *_FUNC_FIXOPERATIONORDER_LONG_C2=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_F2,_FUNC_FIXOPERATIONORDER_STRING_F2->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18263);}while(r); S_20240:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C2< 48 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C2> 57 )))||new_error){ if(qbevent){evnt(18264);if(r)goto S_20240;} do{ *_FUNC_FIXOPERATIONORDER_LONG_X= 1 ; if(!qbevent)break;evnt(18265);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_X=func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("`",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18267);}while(r); } } S_20246:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_X== 0 ))||new_error){ if(qbevent){evnt(18272);if(r)goto S_20246;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18273);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18274);}while(r); S_20249:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 45 ))||new_error){ if(qbevent){evnt(18275);if(r)goto S_20249;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18276);}while(r); S_20251:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_lessorequal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("-2147483648",11)))&(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len== 11 ))))|(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len< 11 ))))||new_error){ if(qbevent){evnt(18277);if(r)goto S_20251;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18277);}while(r); } S_20254:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_lessorequal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("-32768",6)))&(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len== 6 ))))|(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len< 6 ))))||new_error){ if(qbevent){evnt(18278);if(r)goto S_20254;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18278);}while(r); } }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18280);}while(r); S_20259:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_lessorequal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("9223372036854775807",19)))&(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len== 19 ))))|(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len< 19 ))))||new_error){ if(qbevent){evnt(18281);if(r)goto S_20259;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18281);}while(r); } S_20262:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_lessorequal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("2147483647",10)))&(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len== 10 ))))|(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len< 10 ))))||new_error){ if(qbevent){evnt(18282);if(r)goto S_20262;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18282);}while(r); } S_20265:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_lessorequal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("32767",5)))&(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len== 5 ))))|(-(_FUNC_FIXOPERATIONORDER_STRING_F3->len< 5 ))))||new_error){ if(qbevent){evnt(18283);if(r)goto S_20265;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18283);}while(r); } } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F3,_FUNC_FIXOPERATIONORDER_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18285);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2610= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18286);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2611=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_F3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18286);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18289);}while(r); } S_20275:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_F2)))||new_error){ if(qbevent){evnt(18293);if(r)goto S_20275;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 3 ; if(!qbevent)break;evnt(18294);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18294);}while(r); S_20278:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FIXOPERATIONORDER_STRING_F2->len> 1 )))||new_error){ if(qbevent){evnt(18295);if(r)goto S_20278;} S_20279:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2))))||new_error){ if(qbevent){evnt(18296);if(r)goto S_20279;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18297);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2613= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18298);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2614=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18299);}while(r); } } S_20285:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("\361",1))))||new_error){ if(qbevent){evnt(18303);if(r)goto S_20285;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP),qbs_new_txt_len("-",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18303);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(18303);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18304);}while(r); } S_20291:; if ((((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_C)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])||new_error){ if(qbevent){evnt(18308);if(r)goto S_20291;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 4 ; if(!qbevent)break;evnt(18309);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18309);}while(r); S_20294:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I<*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18311);if(r)goto S_20294;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2615=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18311);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC= 0 ; if(!qbevent)break;evnt(18311);}while(r); } S_20299:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 40 ))||new_error){ if(qbevent){evnt(18314);if(r)goto S_20299;} S_20300:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTC!= 46 ))||new_error){ if(qbevent){evnt(18315);if(r)goto S_20300;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18317);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_ES,FUNC_REMOVESYMBOL(_FUNC_FIXOPERATIONORDER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18318);}while(r); S_20303:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18319);if(r)goto S_20303;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18319);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHFOUND= 0 ; if(!qbevent)break;evnt(18321);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_HASHNAME,_FUNC_FIXOPERATIONORDER_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18322);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(18323);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHRES=FUNC_HASHFINDREV(_FUNC_FIXOPERATIONORDER_STRING_HASHNAME,_FUNC_FIXOPERATIONORDER_LONG_HASHCHKFLAGS,_FUNC_FIXOPERATIONORDER_LONG_HASHRESFLAGS,_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18324);}while(r); S_20310:; while((*_FUNC_FIXOPERATIONORDER_LONG_HASHRES)||new_error){ if(qbevent){evnt(18325);if(r)goto S_20310;} S_20311:; if (((-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]==*__LONG_SUBFUNCN))|(-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]== 0 )))||new_error){ if(qbevent){evnt(18326);if(r)goto S_20311;} S_20312:; if ((((int32*)(__ARRAY_LONG_CONSTDEFINED[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF)-__ARRAY_LONG_CONSTDEFINED[4],__ARRAY_LONG_CONSTDEFINED[5])])||new_error){ if(qbevent){evnt(18327);if(r)goto S_20312;} do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHFOUND= 1 ; if(!qbevent)break;evnt(18328);}while(r); do{ goto dl_exit_2616; if(!qbevent)break;evnt(18329);}while(r); } } S_20317:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(18332);if(r)goto S_20317;} do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_FIXOPERATIONORDER_LONG_HASHRESFLAGS,_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF); if(!qbevent)break;evnt(18332);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(18332);}while(r); } } dl_exit_2616:; S_20323:; if ((*_FUNC_FIXOPERATIONORDER_LONG_HASHFOUND)||new_error){ if(qbevent){evnt(18335);if(r)goto S_20323;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I2=*_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF; if(!qbevent)break;evnt(18336);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE= 0 ; if(!qbevent)break;evnt(18345);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_ES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18346);}while(r); S_20327:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18347);if(r)goto S_20327;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18347);}while(r); } S_20330:; while((*_FUNC_FIXOPERATIONORDER_LONG_TRY)||new_error){ if(qbevent){evnt(18348);if(r)goto S_20330;} S_20331:; if ((-(*(int32*)(((char*)__UDT_ID)+(512))== 0 ))||new_error){ if(qbevent){evnt(18349);if(r)goto S_20331;} do{ *_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE= 1 ; if(!qbevent)break;evnt(18349);}while(r); do{ goto dl_exit_2617; if(!qbevent)break;evnt(18349);}while(r); } S_20335:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18350);if(r)goto S_20335;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18350);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_ES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18350);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY= 0 ; if(!qbevent)break;evnt(18350);}while(r); } S_20341:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18351);if(r)goto S_20341;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18351);}while(r); } } dl_exit_2617:; S_20345:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE== 0 ))||new_error){ if(qbevent){evnt(18354);if(r)goto S_20345;} S_20346:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FIXOPERATIONORDER_STRING_ES->len== 0 )))||new_error){ if(qbevent){evnt(18355);if(r)goto S_20346;} do{ *_FUNC_FIXOPERATIONORDER_LONG_A=qbs_asc(qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18356);}while(r); S_20348:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_A== 95 ))||new_error){ if(qbevent){evnt(18356);if(r)goto S_20348;} do{ *_FUNC_FIXOPERATIONORDER_LONG_A= 91 ; if(!qbevent)break;evnt(18356);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_A=*_FUNC_FIXOPERATIONORDER_LONG_A- 64 ; if(!qbevent)break;evnt(18357);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_ES2,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_A)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18358);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_ES2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18359);}while(r); S_20354:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18360);if(r)goto S_20354;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18360);}while(r); } S_20357:; while((*_FUNC_FIXOPERATIONORDER_LONG_TRY)||new_error){ if(qbevent){evnt(18361);if(r)goto S_20357;} S_20358:; if ((-(*(int32*)(((char*)__UDT_ID)+(512))== 0 ))||new_error){ if(qbevent){evnt(18362);if(r)goto S_20358;} do{ *_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE= 1 ; if(!qbevent)break;evnt(18362);}while(r); do{ goto dl_exit_2619; if(!qbevent)break;evnt(18362);}while(r); } S_20362:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18363);if(r)goto S_20362;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18363);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_ES2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18363);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY= 0 ; if(!qbevent)break;evnt(18363);}while(r); } S_20368:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18364);if(r)goto S_20368;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18364);}while(r); } } dl_exit_2619:; } } S_20374:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE== 0 ))||new_error){ if(qbevent){evnt(18369);if(r)goto S_20374;} do{ *_FUNC_FIXOPERATIONORDER_LONG_T=((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_I2)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]; if(!qbevent)break;evnt(18371);}while(r); S_20376:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(18372);if(r)goto S_20376;} S_20377:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_FIXOPERATIONORDER_STRING_ES->len> 0 ))&(qbs_notequal(_FUNC_FIXOPERATIONORDER_STRING_ES,qbs_new_txt_len("$",1)))))||new_error){ if(qbevent){evnt(18373);if(r)goto S_20377;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18373);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18373);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,((qbs*)(((uint64*)(__ARRAY_STRING_CONSTSTRING[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_I2)-__ARRAY_STRING_CONSTSTRING[4],__ARRAY_STRING_CONSTSTRING[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18374);}while(r); }else{ S_20383:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_ES->len))||new_error){ if(qbevent){evnt(18376);if(r)goto S_20383;} do{ *_FUNC_FIXOPERATIONORDER_LONG_ET=FUNC_TYPNAME2TYP(_FUNC_FIXOPERATIONORDER_STRING_ES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18376);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_ET= 0 ; if(!qbevent)break;evnt(18376);}while(r); } S_20388:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18377);if(r)goto S_20388;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18377);}while(r); } S_20391:; if ((*_FUNC_FIXOPERATIONORDER_LONG_ET&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(18378);if(r)goto S_20391;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18378);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18378);}while(r); } S_20395:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(18380);if(r)goto S_20395;} do{ *_FUNC_FIXOPERATIONORDER_FLOAT_V=((long double*)(__ARRAY_FLOAT_CONSTFLOAT[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_I2)-__ARRAY_FLOAT_CONSTFLOAT[4],__ARRAY_FLOAT_CONSTFLOAT[5])]; if(!qbevent)break;evnt(18381);}while(r); do{ *_FUNC_FIXOPERATIONORDER_INTEGER64_V=qbr(*_FUNC_FIXOPERATIONORDER_FLOAT_V); if(!qbevent)break;evnt(18382);}while(r); do{ *_FUNC_FIXOPERATIONORDER_UINTEGER64_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18383);}while(r); }else{ S_20400:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(18385);if(r)goto S_20400;} do{ *_FUNC_FIXOPERATIONORDER_UINTEGER64_V=((uint64*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_I2)-__ARRAY_UINTEGER64_CONSTUINTEGER[4],__ARRAY_UINTEGER64_CONSTUINTEGER[5])]; if(!qbevent)break;evnt(18386);}while(r); do{ *_FUNC_FIXOPERATIONORDER_INTEGER64_V=*_FUNC_FIXOPERATIONORDER_UINTEGER64_V; if(!qbevent)break;evnt(18387);}while(r); do{ *_FUNC_FIXOPERATIONORDER_FLOAT_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18388);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_INTEGER64_V=((int64*)(__ARRAY_INTEGER64_CONSTINTEGER[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_I2)-__ARRAY_INTEGER64_CONSTINTEGER[4],__ARRAY_INTEGER64_CONSTINTEGER[5])]; if(!qbevent)break;evnt(18390);}while(r); do{ *_FUNC_FIXOPERATIONORDER_FLOAT_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18391);}while(r); do{ *_FUNC_FIXOPERATIONORDER_UINTEGER64_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18392);}while(r); } } S_20410:; if ((*_FUNC_FIXOPERATIONORDER_LONG_ET)||new_error){ if(qbevent){evnt(18396);if(r)goto S_20410;} do{ *_FUNC_FIXOPERATIONORDER_LONG_T=*_FUNC_FIXOPERATIONORDER_LONG_ET; if(!qbevent)break;evnt(18396);}while(r); } S_20413:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(18399);if(r)goto S_20413;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_ltrim(qbs_rtrim(qbs_str((long double)(*_FUNC_FIXOPERATIONORDER_FLOAT_V))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18400);}while(r); }else{ S_20416:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(18402);if(r)goto S_20416;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_ltrim(qbs_rtrim(qbs_str((uint64)(*_FUNC_FIXOPERATIONORDER_UINTEGER64_V))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18403);}while(r); }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_ltrim(qbs_rtrim(qbs_str((int64)(*_FUNC_FIXOPERATIONORDER_INTEGER64_V))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18405);}while(r); } } S_20422:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(18410);if(r)goto S_20422;} do{ *_FUNC_FIXOPERATIONORDER_LONG_T2=*_FUNC_FIXOPERATIONORDER_LONG_T& 511 ; if(!qbevent)break;evnt(18411);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18413);}while(r); S_20425:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("E",1),0)))||new_error){ if(qbevent){evnt(18414);if(r)goto S_20425;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("E",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18414);}while(r); } S_20428:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("D",1),0)))||new_error){ if(qbevent){evnt(18415);if(r)goto S_20428;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("D",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18415);}while(r); } S_20431:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("F",1),0)))||new_error){ if(qbevent){evnt(18416);if(r)goto S_20431;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("F",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18416);}while(r); } S_20434:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_S->len))||new_error){ if(qbevent){evnt(18417);if(r)goto S_20434;} do{ *_FUNC_FIXOPERATIONORDER_LONG_X=func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18419);}while(r); S_20436:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 32 ))||new_error){ if(qbevent){evnt(18421);if(r)goto S_20436;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("E",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18421);}while(r); } S_20439:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 64 ))||new_error){ if(qbevent){evnt(18422);if(r)goto S_20439;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("D",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18422);}while(r); } S_20442:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 256 ))||new_error){ if(qbevent){evnt(18423);if(r)goto S_20442;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("F",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18423);}while(r); } do{ sub_mid(_FUNC_FIXOPERATIONORDER_STRING_E,*_FUNC_FIXOPERATIONORDER_LONG_X, 1 ,_FUNC_FIXOPERATIONORDER_STRING_S,1); if(!qbevent)break;evnt(18424);}while(r); S_20446:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len(".",1),0)== 0 )))||new_error){ if(qbevent){evnt(18425);if(r)goto S_20446;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(qbs_add(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_E,*_FUNC_FIXOPERATIONORDER_LONG_X- 1 ),qbs_new_txt_len(".0",2)),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_E->len-*_FUNC_FIXOPERATIONORDER_LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18425);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X=*_FUNC_FIXOPERATIONORDER_LONG_X+ 2 ; if(!qbevent)break;evnt(18425);}while(r); } S_20450:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_E, 1 ),qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(18426);if(r)goto S_20450;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(qbs_new_txt_len("0",1),_FUNC_FIXOPERATIONORDER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18426);}while(r); } S_20453:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_E, 2 ),qbs_new_txt_len("-.",2))))||new_error){ if(qbevent){evnt(18427);if(r)goto S_20453;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(qbs_new_txt_len("-0",2),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_E->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18427);}while(r); } S_20456:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("+",1),0)== 0 ))&(-(func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("-",1),0)== 0 ))))||new_error){ if(qbevent){evnt(18428);if(r)goto S_20456;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(qbs_add(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_E,*_FUNC_FIXOPERATIONORDER_LONG_X),qbs_new_txt_len("+",1)),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_E->len-*_FUNC_FIXOPERATIONORDER_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18429);}while(r); } }else{ S_20460:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len(".",1),0)== 0 )))||new_error){ if(qbevent){evnt(18433);if(r)goto S_20460;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len(".0",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18433);}while(r); } S_20463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_E, 1 ),qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(18434);if(r)goto S_20463;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(qbs_new_txt_len("0",1),_FUNC_FIXOPERATIONORDER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18434);}while(r); } S_20466:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_E, 2 ),qbs_new_txt_len("-.",2))))||new_error){ if(qbevent){evnt(18435);if(r)goto S_20466;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(qbs_new_txt_len("-0",2),qbs_right(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_E->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18435);}while(r); } S_20469:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 32 ))||new_error){ if(qbevent){evnt(18436);if(r)goto S_20469;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("E+0",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18436);}while(r); } S_20472:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 64 ))||new_error){ if(qbevent){evnt(18437);if(r)goto S_20472;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("D+0",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18437);}while(r); } S_20475:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 256 ))||new_error){ if(qbevent){evnt(18438);if(r)goto S_20475;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_new_txt_len("F+0",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18438);}while(r); } } }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,FUNC_TYPEVALUE2SYMBOL(_FUNC_FIXOPERATIONORDER_LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18441);}while(r); S_20481:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18442);if(r)goto S_20481;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18442);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_E,_FUNC_FIXOPERATIONORDER_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18443);}while(r); } } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2627= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18448);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2628=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18449);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_CONSTCNAME[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_I2)-__ARRAY_STRING_CONSTCNAME[4],__ARRAY_STRING_CONSTCNAME[5])])),_FUNC_FIXOPERATIONORDER_STRING_ES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18451);}while(r); do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18452);}while(r); } } } } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_U,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18462);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18464);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING2,_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18465);}while(r); S_20498:; fornext_value2630= 1 ; fornext_finalvalue2630= 4 ; fornext_step2630= 1 ; if (fornext_step2630<0) fornext_step_negative2630=1; else fornext_step_negative2630=0; if (new_error) goto fornext_error2630; goto fornext_entrylabel2630; while(1){ fornext_value2630=fornext_step2630+(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD); fornext_entrylabel2630: *_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD=fornext_value2630; if (fornext_step_negative2630){ if (fornext_value2630fornext_finalvalue2630) break; } fornext_error2630:; if(qbevent){evnt(18467);if(r)goto S_20498;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING,_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18468);}while(r); S_20500:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD== 2 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD== 4 )))||new_error){ if(qbevent){evnt(18469);if(r)goto S_20500;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_DTYP,FUNC_REMOVESYMBOL(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18470);}while(r); S_20502:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FIXOPERATIONORDER_STRING_DTYP->len== 0 )))||new_error){ if(qbevent){evnt(18471);if(r)goto S_20502;} S_20503:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING)== 0 )))||new_error){ if(qbevent){evnt(18472);if(r)goto S_20503;} S_20504:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISVALIDVARIABLE(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING)))||new_error){ if(qbevent){evnt(18473);if(r)goto S_20504;} S_20505:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(18474);if(r)goto S_20505;} do{ *_FUNC_FIXOPERATIONORDER_LONG_V= 27 ; if(!qbevent)break;evnt(18474);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_V=qbs_asc(qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18474);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING,((qbs*)(((uint64*)(__ARRAY_STRING_DEFINEEXTAZ[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_V)-__ARRAY_STRING_DEFINEEXTAZ[4],__ARRAY_STRING_DEFINEEXTAZ[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18475);}while(r); } } }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING,_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18479);}while(r); } } do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18482);}while(r); S_20518:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18483);if(r)goto S_20518;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18483);}while(r); } S_20521:; while((*_FUNC_FIXOPERATIONORDER_LONG_TRY)||new_error){ if(qbevent){evnt(18484);if(r)goto S_20521;} S_20522:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2638))))&(-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(18485);if(r)goto S_20522;} S_20523:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18487);if(r)goto S_20523;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2633; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("found id matching ",18),_FUNC_FIXOPERATIONORDER_STRING_F2), 0 , 0 , 1 ); if (new_error) goto skip2633; skip2633: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18487);}while(r); } S_20526:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC== 40 ))||new_error){ if(qbevent){evnt(18489);if(r)goto S_20526;} S_20527:; if (((-(*(int32*)(((char*)__UDT_ID)+(512))!= 0 ))|(-(*(int16*)(((char*)__UDT_ID)+(544))== 1 )))||new_error){ if(qbevent){evnt(18492);if(r)goto S_20527;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18496);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,FUNC_REMOVESYMBOL(_FUNC_FIXOPERATIONORDER_STRING_F3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18497);}while(r); S_20530:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18498);if(r)goto S_20530;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18498);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)),_FUNC_FIXOPERATIONORDER_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18499);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2634= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18500);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2635=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18501);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,_FUNC_FIXOPERATIONORDER_STRING_F2),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18502);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B2= 1 ; if(!qbevent)break;evnt(18505);}while(r); S_20538:; fornext_value2637=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ; fornext_finalvalue2637=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2637= 1 ; if (fornext_step2637<0) fornext_step_negative2637=1; else fornext_step_negative2637=0; if (new_error) goto fornext_error2637; goto fornext_entrylabel2637; while(1){ fornext_value2637=fornext_step2637+(*_FUNC_FIXOPERATIONORDER_LONG_I2); fornext_entrylabel2637: *_FUNC_FIXOPERATIONORDER_LONG_I2=fornext_value2637; if (fornext_step_negative2637){ if (fornext_value2637fornext_finalvalue2637) break; } fornext_error2637:; if(qbevent){evnt(18506);if(r)goto S_20538;} do{ *_FUNC_FIXOPERATIONORDER_LONG_C2=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18507);}while(r); S_20540:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2== 40 ))||new_error){ if(qbevent){evnt(18508);if(r)goto S_20540;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B2=*_FUNC_FIXOPERATIONORDER_LONG_B2+ 1 ; if(!qbevent)break;evnt(18508);}while(r); } S_20543:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2== 41 ))||new_error){ if(qbevent){evnt(18509);if(r)goto S_20543;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B2=*_FUNC_FIXOPERATIONORDER_LONG_B2- 1 ; if(!qbevent)break;evnt(18509);}while(r); } S_20546:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B2== 0 ))||new_error){ if(qbevent){evnt(18510);if(r)goto S_20546;} do{ goto fornext_exit_2636; if(!qbevent)break;evnt(18510);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18511);}while(r); } fornext_exit_2636:; do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I2; if(!qbevent)break;evnt(18515);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18517);}while(r); S_20553:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(18520);if(r)goto S_20553;} S_20554:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I<*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18521);if(r)goto S_20554;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2638=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18521);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC= 0 ; if(!qbevent)break;evnt(18521);}while(r); } S_20559:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC== 46 ))||new_error){ if(qbevent){evnt(18522);if(r)goto S_20559;} do{ *_FUNC_FIXOPERATIONORDER_LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(18522);}while(r); do{ goto LABEL_FOOUDT; if(!qbevent)break;evnt(18522);}while(r); } } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18525);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(18526);}while(r); } } S_20568:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 40 ))||new_error){ if(qbevent){evnt(18530);if(r)goto S_20568;} S_20569:; if (((-(*(int32*)(((char*)__UDT_ID)+(536))!= 0 ))|(-(*(int16*)(((char*)__UDT_ID)+(544))== 1 )))||new_error){ if(qbevent){evnt(18531);if(r)goto S_20569;} S_20570:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(18533);if(r)goto S_20570;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)),FUNC_REMOVESYMBOL(_FUNC_FIXOPERATIONORDER_STRING_F2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18538);}while(r); S_20572:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18539);if(r)goto S_20572;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18539);}while(r); } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2639= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18540);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2640=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18541);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18542);}while(r); S_20578:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 46 ))||new_error){ if(qbevent){evnt(18546);if(r)goto S_20578;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18546);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(18546);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(18547);}while(r); LABEL_FOOUDT:; if(qbevent){evnt(18549);r=0;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP),qbs_new_txt_len(".",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18551);}while(r); do{ *__LONG_E=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_FUNC_FIXOPERATIONORDER_LONG_T& 511 )-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(18552);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ; if(!qbevent)break;evnt(18553);}while(r); S_20586:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I>*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18558);if(r)goto S_20586;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected .element",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18558);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18558);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18559);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,FUNC_REMOVESYMBOL(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18560);}while(r); S_20592:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18561);if(r)goto S_20592;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18561);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_U,qbs_add(qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2),func_space( 256 -_FUNC_FIXOPERATIONORDER_STRING_F2->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18562);}while(r); LABEL_FOOUDTNEXTE:; if(qbevent){evnt(18565);r=0;} S_20596:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[(array_check((*__LONG_E)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]))*256],256,1),_FUNC_FIXOPERATIONORDER_STRING_U)))||new_error){ if(qbevent){evnt(18566);if(r)goto S_20596;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[(array_check((*__LONG_E)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]))*256],256,1)),_FUNC_FIXOPERATIONORDER_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18571);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2642= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18572);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2643=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18573);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18574);}while(r); S_20601:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I==*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18576);if(r)goto S_20601;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18576);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(18576);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2644=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18577);}while(r); S_20606:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 46 ))||new_error){ if(qbevent){evnt(18578);if(r)goto S_20606;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18578);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(18578);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_T=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]; if(!qbevent)break;evnt(18580);}while(r); S_20611:; if ((-((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(18581);if(r)goto S_20611;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid . after element",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18581);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18581);}while(r); } do{ goto LABEL_FOOUDT; if(!qbevent)break;evnt(18582);}while(r); } do{ *__LONG_E=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(18587);}while(r); S_20618:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(18588);if(r)goto S_20618;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Element not defined",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18588);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18588);}while(r); } do{ goto LABEL_FOOUDTNEXTE; if(!qbevent)break;evnt(18589);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18594);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,FUNC_REMOVESYMBOL(_FUNC_FIXOPERATIONORDER_STRING_F3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18595);}while(r); S_20626:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18596);if(r)goto S_20626;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18596);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)),_FUNC_FIXOPERATIONORDER_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18597);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2645= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18599);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2646=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18600);}while(r); do{ goto LABEL_COULDNOTCLASSIFY; if(!qbevent)break;evnt(18601);}while(r); } } } S_20636:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18607);if(r)goto S_20636;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18607);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18607);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY= 0 ; if(!qbevent)break;evnt(18607);}while(r); } S_20642:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18608);if(r)goto S_20642;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18608);}while(r); } } dl_exit_2632:; } fornext_exit_2629:; LABEL_COULDNOTCLASSIFY:; if(qbevent){evnt(18611);r=0;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18614);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 0 ; if(!qbevent)break;evnt(18615);}while(r); S_20649:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(18616);if(r)goto S_20649;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18616);}while(r); } S_20652:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_UNSIGNED",9))))||new_error){ if(qbevent){evnt(18617);if(r)goto S_20652;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18617);}while(r); } S_20655:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_BIT",4))))||new_error){ if(qbevent){evnt(18618);if(r)goto S_20655;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18618);}while(r); } S_20658:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_BYTE",5))))||new_error){ if(qbevent){evnt(18619);if(r)goto S_20658;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18619);}while(r); } S_20661:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("INTEGER",7))))||new_error){ if(qbevent){evnt(18620);if(r)goto S_20661;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18620);}while(r); } S_20664:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("LONG",4))))||new_error){ if(qbevent){evnt(18621);if(r)goto S_20664;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18621);}while(r); } S_20667:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_INTEGER64",10))))||new_error){ if(qbevent){evnt(18622);if(r)goto S_20667;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18622);}while(r); } S_20670:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("SINGLE",6))))||new_error){ if(qbevent){evnt(18623);if(r)goto S_20670;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18623);}while(r); } S_20673:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("DOUBLE",6))))||new_error){ if(qbevent){evnt(18624);if(r)goto S_20673;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18624);}while(r); } S_20676:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_FLOAT",6))))||new_error){ if(qbevent){evnt(18625);if(r)goto S_20676;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18625);}while(r); } S_20679:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_OFFSET",7))))||new_error){ if(qbevent){evnt(18626);if(r)goto S_20679;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(18626);}while(r); } S_20682:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE== 1 ))||new_error){ if(qbevent){evnt(18627);if(r)goto S_20682;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,_FUNC_FIXOPERATIONORDER_STRING_F3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18628);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2647= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18629);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2648=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_F3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18630);}while(r); do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18631);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18634);}while(r); } LABEL_CLASSDONE:; if(qbevent){evnt(18637);r=0;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18638);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_add(_FUNC_FIXOPERATIONORDER_STRING_F,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18640);}while(r); LABEL_CLASSDONE_SPECIAL:; if(qbevent){evnt(18641);r=0;} } fornext_exit_2591:; S_20694:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_F->len))||new_error){ if(qbevent){evnt(18643);if(r)goto S_20694;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_left(_FUNC_FIXOPERATIONORDER_STRING_F,_FUNC_FIXOPERATIONORDER_STRING_F->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18643);}while(r); } S_20697:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18645);if(r)goto S_20697;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2651; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:identification:",33),_FUNC_FIXOPERATIONORDER_STRING_A), 0 , 1 , 0 ); if (new_error) goto skip2651; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_N)), 1 , 0 , 1 ); if (new_error) goto skip2651; skip2651: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18645);}while(r); } S_20700:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18646);if(r)goto S_20700;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2652; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:identification(layout):",41),_FUNC_FIXOPERATIONORDER_STRING_F), 0 , 1 , 0 ); if (new_error) goto skip2652; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_N)), 1 , 0 , 1 ); if (new_error) goto skip2652; skip2652: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18646);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18653);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18654);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B2= 0 ; if(!qbevent)break;evnt(18655);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_P1= 0 ; if(!qbevent)break;evnt(18656);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18657);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=FUNC_NUMELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18658);}while(r); S_20709:; fornext_value2654= 1 ; fornext_finalvalue2654=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2654= 1 ; if (fornext_step2654<0) fornext_step_negative2654=1; else fornext_step_negative2654=0; if (new_error) goto fornext_error2654; goto fornext_entrylabel2654; while(1){ fornext_value2654=fornext_step2654+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2654: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2654; if (fornext_step_negative2654){ if (fornext_value2654fornext_finalvalue2654) break; } fornext_error2654:; if(qbevent){evnt(18659);if(r)goto S_20709;} do{ *_FUNC_FIXOPERATIONORDER_LONG_OPENBRACKET= 0 ; if(!qbevent)break;evnt(18661);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18663);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18665);}while(r); S_20713:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18669);if(r)goto S_20713;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18670);}while(r); S_20715:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 1 ))||new_error){ if(qbevent){evnt(18672);if(r)goto S_20715;} do{ *_FUNC_FIXOPERATIONORDER_LONG_P1=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(18677);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_new_txt_len("(",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18678);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_OPENBRACKET= 1 ; if(!qbevent)break;evnt(18682);}while(r); do{ goto LABEL_FOOPASS; if(!qbevent)break;evnt(18684);}while(r); } S_20722:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 44 ))||new_error){ if(qbevent){evnt(18688);if(r)goto S_20722;} S_20723:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 1 ))||new_error){ if(qbevent){evnt(18689);if(r)goto S_20723;} do{ goto LABEL_FOOPASSIT; if(!qbevent)break;evnt(18690);}while(r); } } S_20727:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18694);if(r)goto S_20727;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18695);}while(r); S_20729:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18697);if(r)goto S_20729;} LABEL_FOOPASSIT:; if(qbevent){evnt(18698);r=0;} S_20730:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_P1!=*_FUNC_FIXOPERATIONORDER_LONG_I))||new_error){ if(qbevent){evnt(18699);if(r)goto S_20730;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FOO,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_P1,&(pass2655=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18700);}while(r); S_20732:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18701);if(r)goto S_20732;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18701);}while(r); } S_20735:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_FOO->len))||new_error){ if(qbevent){evnt(18702);if(r)goto S_20735;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_AA,_FUNC_FIXOPERATIONORDER_STRING_FOO),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18703);}while(r); S_20737:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 ))||new_error){ if(qbevent){evnt(18704);if(r)goto S_20737;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_FF,__STRING_TLAYOUT),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18704);}while(r); }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_FF,__STRING_TLAYOUT),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18704);}while(r); } } } S_20744:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 44 ))||new_error){ if(qbevent){evnt(18707);if(r)goto S_20744;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18707);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_new_txt_len(",",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18707);}while(r); }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_new_txt_len(")",1)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18707);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_P1=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(18708);}while(r); } do{ goto LABEL_FOOPASS; if(!qbevent)break;evnt(18711);}while(r); } S_20754:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18717);if(r)goto S_20754;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_AA,_FUNC_FIXOPERATIONORDER_STRING_A2),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18717);}while(r); } LABEL_FOOPASS:; if(qbevent){evnt(18720);r=0;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,FUNC_GETELEMENTSPECIAL(_FUNC_FIXOPERATIONORDER_STRING_F,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18722);}while(r); S_20758:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18723);if(r)goto S_20758;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18723);}while(r); } S_20761:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_F2->len))||new_error){ if(qbevent){evnt(18724);if(r)goto S_20761;} S_20762:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 46 ))||new_error){ if(qbevent){evnt(18727);if(r)goto S_20762;} S_20763:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_I> 1 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_I<*_FUNC_FIXOPERATIONORDER_LONG_N)))||new_error){ if(qbevent){evnt(18728);if(r)goto S_20763;} S_20764:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_FF->len))||new_error){ if(qbevent){evnt(18729);if(r)goto S_20764;} do{ sub_mid(_FUNC_FIXOPERATIONORDER_STRING_FF,_FUNC_FIXOPERATIONORDER_STRING_FF->len, 1 ,__STRING1_SP2,1); if(!qbevent)break;evnt(18729);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_new_txt_len(".",1)),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18730);}while(r); do{ goto LABEL_FOOLOOPNXT; if(!qbevent)break;evnt(18731);}while(r); } } S_20771:; if ((*_FUNC_FIXOPERATIONORDER_LONG_OPENBRACKET)||new_error){ if(qbevent){evnt(18736);if(r)goto S_20771;} S_20772:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I!= 1 ))||new_error){ if(qbevent){evnt(18739);if(r)goto S_20772;} S_20773:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2660=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 )))== 0 )))||new_error){ if(qbevent){evnt(18740);if(r)goto S_20773;} do{ sub_mid(_FUNC_FIXOPERATIONORDER_STRING_FF,_FUNC_FIXOPERATIONORDER_STRING_FF->len, 1 ,__STRING1_SP2,1); if(!qbevent)break;evnt(18741);}while(r); } } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_FF,_FUNC_FIXOPERATIONORDER_STRING_F2),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18744);}while(r); }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_add(qbs_add(_FUNC_FIXOPERATIONORDER_STRING_FF,_FUNC_FIXOPERATIONORDER_STRING_F2),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18746);}while(r); } } LABEL_FOOLOOPNXT:; if(qbevent){evnt(18751);r=0;} } fornext_exit_2653:; S_20783:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_AA->len))||new_error){ if(qbevent){evnt(18755);if(r)goto S_20783;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_left(_FUNC_FIXOPERATIONORDER_STRING_AA,_FUNC_FIXOPERATIONORDER_STRING_AA->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18755);}while(r); } S_20786:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_FF->len))||new_error){ if(qbevent){evnt(18756);if(r)goto S_20786;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_left(_FUNC_FIXOPERATIONORDER_STRING_FF,_FUNC_FIXOPERATIONORDER_STRING_FF->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18756);}while(r); } S_20789:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18758);if(r)goto S_20789;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2666; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:return:",25),_FUNC_FIXOPERATIONORDER_STRING_AA), 0 , 0 , 1 ); if (new_error) goto skip2666; skip2666: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18758);}while(r); } S_20792:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(18759);if(r)goto S_20792;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2667; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:layout:",25),_FUNC_FIXOPERATIONORDER_STRING_FF), 0 , 0 , 1 ); if (new_error) goto skip2667; skip2667: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18759);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_FUNC_FIXOPERATIONORDER_STRING_FF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18760);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FIXOPERATIONORDER,_FUNC_FIXOPERATIONORDER_STRING_AA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18761);}while(r); do{ *__LONG_FOOINDWEL=*__LONG_FOOINDWEL- 1 ; if(!qbevent)break;evnt(18763);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free34.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_FIXOPERATIONORDER_STRING_FIXOPERATIONORDER);return _FUNC_FIXOPERATIONORDER_STRING_FIXOPERATIONORDER; } qbs* FUNC_GETELEMENTSPECIAL(qbs*_FUNC_GETELEMENTSPECIAL_STRING_SAVEA,int32*_FUNC_GETELEMENTSPECIAL_LONG_ELENUM){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data35.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_GETELEMENTSPECIAL_STRING_A,_FUNC_GETELEMENTSPECIAL_STRING_SAVEA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18770);}while(r); S_20799:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETELEMENTSPECIAL_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(18771);if(r)goto S_20799;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18771);}while(r); } do{ *_FUNC_GETELEMENTSPECIAL_LONG_N= 1 ; if(!qbevent)break;evnt(18773);}while(r); do{ *_FUNC_GETELEMENTSPECIAL_LONG_P= 1 ; if(!qbevent)break;evnt(18774);}while(r); LABEL_GETELEMENTSPECIALNEXT:; if(qbevent){evnt(18775);r=0;} do{ *_FUNC_GETELEMENTSPECIAL_LONG_I=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_P,_FUNC_GETELEMENTSPECIAL_STRING_A,__STRING1_SP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18776);}while(r); do{ *_FUNC_GETELEMENTSPECIAL_LONG_I2=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_P,_FUNC_GETELEMENTSPECIAL_STRING_A,func_chr( 34 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18779);}while(r); S_20806:; if (((-(*_FUNC_GETELEMENTSPECIAL_LONG_I2<*_FUNC_GETELEMENTSPECIAL_LONG_I))&(-(*_FUNC_GETELEMENTSPECIAL_LONG_I2!= 0 )))||new_error){ if(qbevent){evnt(18780);if(r)goto S_20806;} do{ *_FUNC_GETELEMENTSPECIAL_LONG_I3=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_I2+ 1 ,_FUNC_GETELEMENTSPECIAL_STRING_A,func_chr( 34 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18781);}while(r); S_20808:; if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_I3== 0 ))||new_error){ if(qbevent){evnt(18781);if(r)goto S_20808;} do{ SUB_GIVE_ERROR(qbs_add(qbs_new_txt_len("Expected ",9),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18781);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18781);}while(r); } do{ *_FUNC_GETELEMENTSPECIAL_LONG_I=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_I3,_FUNC_GETELEMENTSPECIAL_STRING_A,__STRING1_SP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18782);}while(r); } S_20814:; if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_ELENUM==*_FUNC_GETELEMENTSPECIAL_LONG_N))||new_error){ if(qbevent){evnt(18785);if(r)goto S_20814;} S_20815:; if ((*_FUNC_GETELEMENTSPECIAL_LONG_I)||new_error){ if(qbevent){evnt(18786);if(r)goto S_20815;} do{ qbs_set(_FUNC_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL,func_mid(_FUNC_GETELEMENTSPECIAL_STRING_A,*_FUNC_GETELEMENTSPECIAL_LONG_P,*_FUNC_GETELEMENTSPECIAL_LONG_I-*_FUNC_GETELEMENTSPECIAL_LONG_P,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18787);}while(r); }else{ do{ qbs_set(_FUNC_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL,qbs_right(_FUNC_GETELEMENTSPECIAL_STRING_A,_FUNC_GETELEMENTSPECIAL_STRING_A->len-*_FUNC_GETELEMENTSPECIAL_LONG_P+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18789);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18791);}while(r); } S_20822:; if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_I== 0 ))||new_error){ if(qbevent){evnt(18794);if(r)goto S_20822;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18794);}while(r); } do{ *_FUNC_GETELEMENTSPECIAL_LONG_N=*_FUNC_GETELEMENTSPECIAL_LONG_N+ 1 ; if(!qbevent)break;evnt(18795);}while(r); do{ *_FUNC_GETELEMENTSPECIAL_LONG_P=*_FUNC_GETELEMENTSPECIAL_LONG_I+ 1 ; if(!qbevent)break;evnt(18796);}while(r); do{ goto LABEL_GETELEMENTSPECIALNEXT; if(!qbevent)break;evnt(18797);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free35.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL);return _FUNC_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL; } qbs* FUNC_GETELEMENT(qbs*_FUNC_GETELEMENT_STRING_A,int32*_FUNC_GETELEMENT_LONG_ELENUM){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data36.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_20828:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETELEMENT_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(18803);if(r)goto S_20828;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18803);}while(r); } do{ *_FUNC_GETELEMENT_LONG_N= 1 ; if(!qbevent)break;evnt(18805);}while(r); do{ *_FUNC_GETELEMENT_LONG_P= 1 ; if(!qbevent)break;evnt(18806);}while(r); LABEL_GETELEMENTNEXT:; if(qbevent){evnt(18807);r=0;} do{ *_FUNC_GETELEMENT_LONG_I=func_instr(*_FUNC_GETELEMENT_LONG_P,_FUNC_GETELEMENT_STRING_A,__STRING1_SP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18808);}while(r); S_20834:; if ((-(*_FUNC_GETELEMENT_LONG_ELENUM==*_FUNC_GETELEMENT_LONG_N))||new_error){ if(qbevent){evnt(18810);if(r)goto S_20834;} S_20835:; if ((*_FUNC_GETELEMENT_LONG_I)||new_error){ if(qbevent){evnt(18811);if(r)goto S_20835;} do{ qbs_set(_FUNC_GETELEMENT_STRING_GETELEMENT,func_mid(_FUNC_GETELEMENT_STRING_A,*_FUNC_GETELEMENT_LONG_P,*_FUNC_GETELEMENT_LONG_I-*_FUNC_GETELEMENT_LONG_P,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18812);}while(r); }else{ do{ qbs_set(_FUNC_GETELEMENT_STRING_GETELEMENT,qbs_right(_FUNC_GETELEMENT_STRING_A,_FUNC_GETELEMENT_STRING_A->len-*_FUNC_GETELEMENT_LONG_P+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18814);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18816);}while(r); } S_20842:; if ((-(*_FUNC_GETELEMENT_LONG_I== 0 ))||new_error){ if(qbevent){evnt(18819);if(r)goto S_20842;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18819);}while(r); } do{ *_FUNC_GETELEMENT_LONG_N=*_FUNC_GETELEMENT_LONG_N+ 1 ; if(!qbevent)break;evnt(18820);}while(r); do{ *_FUNC_GETELEMENT_LONG_P=*_FUNC_GETELEMENT_LONG_I+ 1 ; if(!qbevent)break;evnt(18821);}while(r); do{ goto LABEL_GETELEMENTNEXT; if(!qbevent)break;evnt(18822);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free36.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_GETELEMENT_STRING_GETELEMENT);return _FUNC_GETELEMENT_STRING_GETELEMENT; } qbs* FUNC_GETELEMENTS(qbs*_FUNC_GETELEMENTS_STRING_A,int32*_FUNC_GETELEMENTS_LONG_I1,int32*_FUNC_GETELEMENTS_LONG_I2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data37.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_20848:; if ((-(*_FUNC_GETELEMENTS_LONG_I2<*_FUNC_GETELEMENTS_LONG_I1))||new_error){ if(qbevent){evnt(18826);if(r)goto S_20848;} do{ qbs_set(_FUNC_GETELEMENTS_STRING_GETELEMENTS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18826);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18826);}while(r); } do{ *_FUNC_GETELEMENTS_LONG_N= 1 ; if(!qbevent)break;evnt(18827);}while(r); do{ *_FUNC_GETELEMENTS_LONG_P= 1 ; if(!qbevent)break;evnt(18828);}while(r); LABEL_GETELEMENTSNEXT:; if(qbevent){evnt(18829);r=0;} do{ *_FUNC_GETELEMENTS_LONG_I=func_instr(*_FUNC_GETELEMENTS_LONG_P,_FUNC_GETELEMENTS_STRING_A,__STRING1_SP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18830);}while(r); S_20855:; if ((-(*_FUNC_GETELEMENTS_LONG_N==*_FUNC_GETELEMENTS_LONG_I1))||new_error){ if(qbevent){evnt(18831);if(r)goto S_20855;} do{ *_FUNC_GETELEMENTS_LONG_I1POS=*_FUNC_GETELEMENTS_LONG_P; if(!qbevent)break;evnt(18832);}while(r); } S_20858:; if ((-(*_FUNC_GETELEMENTS_LONG_N==*_FUNC_GETELEMENTS_LONG_I2))||new_error){ if(qbevent){evnt(18834);if(r)goto S_20858;} S_20859:; if ((*_FUNC_GETELEMENTS_LONG_I)||new_error){ if(qbevent){evnt(18835);if(r)goto S_20859;} do{ qbs_set(_FUNC_GETELEMENTS_STRING_GETELEMENTS,func_mid(_FUNC_GETELEMENTS_STRING_A,*_FUNC_GETELEMENTS_LONG_I1POS,*_FUNC_GETELEMENTS_LONG_I-*_FUNC_GETELEMENTS_LONG_I1POS,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18836);}while(r); }else{ do{ qbs_set(_FUNC_GETELEMENTS_STRING_GETELEMENTS,qbs_right(_FUNC_GETELEMENTS_STRING_A,_FUNC_GETELEMENTS_STRING_A->len-*_FUNC_GETELEMENTS_LONG_I1POS+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18838);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18840);}while(r); } do{ *_FUNC_GETELEMENTS_LONG_N=*_FUNC_GETELEMENTS_LONG_N+ 1 ; if(!qbevent)break;evnt(18842);}while(r); do{ *_FUNC_GETELEMENTS_LONG_P=*_FUNC_GETELEMENTS_LONG_I+ 1 ; if(!qbevent)break;evnt(18843);}while(r); do{ goto LABEL_GETELEMENTSNEXT; if(!qbevent)break;evnt(18844);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free37.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_GETELEMENTS_STRING_GETELEMENTS);return _FUNC_GETELEMENTS_STRING_GETELEMENTS; } void SUB_GETID(int32*_SUB_GETID_LONG_I){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data38.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_20869:; if ((-(*_SUB_GETID_LONG_I== -1 ))||new_error){ if(qbevent){evnt(18848);if(r)goto S_20869;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("-1 passed to getid!",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18848);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18848);}while(r); } do{ memcpy((((char*)__UDT_ID)+(0)),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860)),2860); if(!qbevent)break;evnt(18850);}while(r); do{ *__LONG_CURRENTID=*_SUB_GETID_LONG_I; if(!qbevent)break;evnt(18852);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free38.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_INSERTELEMENTS(qbs*_SUB_INSERTELEMENTS_STRING_A,int32*_SUB_INSERTELEMENTS_LONG_I,qbs*_SUB_INSERTELEMENTS_STRING_ELEMENTS){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data39.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_20875:; if ((-(*_SUB_INSERTELEMENTS_LONG_I== 0 ))||new_error){ if(qbevent){evnt(18856);if(r)goto S_20875;} S_20876:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_INSERTELEMENTS_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(18857);if(r)goto S_20876;} do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A,_SUB_INSERTELEMENTS_STRING_ELEMENTS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18858);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18859);}while(r); } do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A,qbs_add(qbs_add(_SUB_INSERTELEMENTS_STRING_ELEMENTS,__STRING1_SP),_SUB_INSERTELEMENTS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18861);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18862);}while(r); } do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18865);}while(r); do{ *_SUB_INSERTELEMENTS_LONG_N=FUNC_NUMELEMENTS(_SUB_INSERTELEMENTS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18866);}while(r); S_20885:; fornext_value2677= 1 ; fornext_finalvalue2677=*_SUB_INSERTELEMENTS_LONG_N; fornext_step2677= 1 ; if (fornext_step2677<0) fornext_step_negative2677=1; else fornext_step_negative2677=0; if (new_error) goto fornext_error2677; goto fornext_entrylabel2677; while(1){ fornext_value2677=fornext_step2677+(*_SUB_INSERTELEMENTS_LONG_I2); fornext_entrylabel2677: *_SUB_INSERTELEMENTS_LONG_I2=fornext_value2677; if (fornext_step_negative2677){ if (fornext_value2677fornext_finalvalue2677) break; } fornext_error2677:; if(qbevent){evnt(18871);if(r)goto S_20885;} S_20886:; if ((-(*_SUB_INSERTELEMENTS_LONG_I2> 1 ))||new_error){ if(qbevent){evnt(18872);if(r)goto S_20886;} do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A2,qbs_add(_SUB_INSERTELEMENTS_STRING_A2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18872);}while(r); } do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A2,qbs_add(_SUB_INSERTELEMENTS_STRING_A2,FUNC_GETELEMENT(_SUB_INSERTELEMENTS_STRING_A,_SUB_INSERTELEMENTS_LONG_I2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18873);}while(r); S_20890:; if ((-(*_SUB_INSERTELEMENTS_LONG_I==*_SUB_INSERTELEMENTS_LONG_I2))||new_error){ if(qbevent){evnt(18874);if(r)goto S_20890;} do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A2,qbs_add(qbs_add(_SUB_INSERTELEMENTS_STRING_A2,__STRING1_SP),_SUB_INSERTELEMENTS_STRING_ELEMENTS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18874);}while(r); } } fornext_exit_2676:; do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A,_SUB_INSERTELEMENTS_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18877);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free39.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_ISNUMBER(qbs*_FUNC_ISNUMBER_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data40.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_20895:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ISNUMBER_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(18882);if(r)goto S_20895;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18882);}while(r); } S_20898:; fornext_value2681= 1 ; fornext_finalvalue2681=_FUNC_ISNUMBER_STRING_A->len; fornext_step2681= 1 ; if (fornext_step2681<0) fornext_step_negative2681=1; else fornext_step_negative2681=0; if (new_error) goto fornext_error2681; goto fornext_entrylabel2681; while(1){ fornext_value2681=fornext_step2681+(*_FUNC_ISNUMBER_LONG_I); fornext_entrylabel2681: *_FUNC_ISNUMBER_LONG_I=fornext_value2681; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2681){ if (fornext_value2681fornext_finalvalue2681) break; } fornext_error2681:; if(qbevent){evnt(18883);if(r)goto S_20898;} do{ *_FUNC_ISNUMBER_LONG_A=qbs_asc(func_mid(_FUNC_ISNUMBER_STRING_A,*_FUNC_ISNUMBER_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18884);}while(r); S_20900:; if ((-(*_FUNC_ISNUMBER_LONG_A== 45 ))||new_error){ if(qbevent){evnt(18885);if(r)goto S_20900;} S_20901:; if ((-(*_FUNC_ISNUMBER_LONG_I!= 1 ))||new_error){ if(qbevent){evnt(18886);if(r)goto S_20901;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18886);}while(r); } do{ goto LABEL_ISNUMOK; if(!qbevent)break;evnt(18887);}while(r); } S_20906:; if ((-(*_FUNC_ISNUMBER_LONG_A== 46 ))||new_error){ if(qbevent){evnt(18889);if(r)goto S_20906;} S_20907:; if ((-(*_FUNC_ISNUMBER_LONG_DP== 1 ))||new_error){ if(qbevent){evnt(18890);if(r)goto S_20907;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18890);}while(r); } do{ *_FUNC_ISNUMBER_LONG_DP= 1 ; if(!qbevent)break;evnt(18891);}while(r); do{ goto LABEL_ISNUMOK; if(!qbevent)break;evnt(18892);}while(r); } S_20913:; if (((-(*_FUNC_ISNUMBER_LONG_A>= 48 ))&(-(*_FUNC_ISNUMBER_LONG_A<= 57 )))||new_error){ if(qbevent){evnt(18894);if(r)goto S_20913;} do{ *_FUNC_ISNUMBER_LONG_V= 1 ; if(!qbevent)break;evnt(18894);}while(r); do{ goto LABEL_ISNUMOK; if(!qbevent)break;evnt(18894);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18895);}while(r); LABEL_ISNUMOK:; if(qbevent){evnt(18896);r=0;} } fornext_exit_2680:; do{ *_FUNC_ISNUMBER_LONG_ISNUMBER= 1 ; if(!qbevent)break;evnt(18898);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free40.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_ISNUMBER_LONG_ISNUMBER; } int32 FUNC_ISOPERATOR(qbs*_FUNC_ISOPERATOR_STRING_A2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data41.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_ISOPERATOR_STRING_A,qbs_ucase(_FUNC_ISOPERATOR_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18902);}while(r); do{ *_FUNC_ISOPERATOR_LONG_L= 0 ; if(!qbevent)break;evnt(18903);}while(r); do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18904);}while(r); S_20923:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(18904);if(r)goto S_20923;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18904);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18905);}while(r); S_20927:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(18905);if(r)goto S_20927;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18905);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18906);}while(r); S_20931:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(18906);if(r)goto S_20931;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18906);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18907);}while(r); S_20935:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(18907);if(r)goto S_20935;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18907);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18908);}while(r); S_20939:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(18908);if(r)goto S_20939;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18908);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18909);}while(r); S_20943:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(18909);if(r)goto S_20943;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18909);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18910);}while(r); S_20947:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(18911);if(r)goto S_20947;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18911);}while(r); } S_20950:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(18912);if(r)goto S_20950;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18912);}while(r); } S_20953:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(18913);if(r)goto S_20953;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18913);}while(r); } S_20956:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(18914);if(r)goto S_20956;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18914);}while(r); } S_20959:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(18915);if(r)goto S_20959;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18915);}while(r); } S_20962:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(18916);if(r)goto S_20962;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18916);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18917);}while(r); S_20966:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(18918);if(r)goto S_20966;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18918);}while(r); } S_20969:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(18919);if(r)goto S_20969;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18919);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18920);}while(r); S_20973:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(18920);if(r)goto S_20973;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18920);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18921);}while(r); S_20977:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(18921);if(r)goto S_20977;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18921);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18922);}while(r); S_20981:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(18923);if(r)goto S_20981;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18923);}while(r); } S_20984:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(18924);if(r)goto S_20984;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18924);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18926);}while(r); S_20988:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("\361",1))))||new_error){ if(qbevent){evnt(18926);if(r)goto S_20988;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18926);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(18927);}while(r); S_20992:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(18927);if(r)goto S_20992;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(18927);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18928);}while(r); LABEL_OPFOUND:; if(qbevent){evnt(18929);r=0;} do{ *_FUNC_ISOPERATOR_LONG_ISOPERATOR=*_FUNC_ISOPERATOR_LONG_L; if(!qbevent)break;evnt(18930);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free41.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_ISOPERATOR_LONG_ISOPERATOR; } int32 FUNC_ISUINTEGER(qbs*_FUNC_ISUINTEGER_STRING_I){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data42.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_20997:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ISUINTEGER_STRING_I->len== 0 )))||new_error){ if(qbevent){evnt(18934);if(r)goto S_20997;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18934);}while(r); } S_21000:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_ISUINTEGER_STRING_I, 1 )== 48 ))&(-(_FUNC_ISUINTEGER_STRING_I->len> 1 ))))||new_error){ if(qbevent){evnt(18935);if(r)goto S_21000;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18935);}while(r); } S_21003:; fornext_value2688= 1 ; fornext_finalvalue2688=_FUNC_ISUINTEGER_STRING_I->len; fornext_step2688= 1 ; if (fornext_step2688<0) fornext_step_negative2688=1; else fornext_step_negative2688=0; if (new_error) goto fornext_error2688; goto fornext_entrylabel2688; while(1){ fornext_value2688=fornext_step2688+(*_FUNC_ISUINTEGER_LONG_C); fornext_entrylabel2688: *_FUNC_ISUINTEGER_LONG_C=fornext_value2688; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2688){ if (fornext_value2688fornext_finalvalue2688) break; } fornext_error2688:; if(qbevent){evnt(18936);if(r)goto S_21003;} do{ *_FUNC_ISUINTEGER_LONG_V=qbs_asc(_FUNC_ISUINTEGER_STRING_I,*_FUNC_ISUINTEGER_LONG_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18937);}while(r); S_21005:; if (((-(*_FUNC_ISUINTEGER_LONG_V< 48 ))|(-(*_FUNC_ISUINTEGER_LONG_V> 57 )))||new_error){ if(qbevent){evnt(18938);if(r)goto S_21005;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18938);}while(r); } } fornext_exit_2687:; do{ *_FUNC_ISUINTEGER_LONG_ISUINTEGER= -1 ; if(!qbevent)break;evnt(18940);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free42.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_ISUINTEGER_LONG_ISUINTEGER; } int32 FUNC_ISVALIDVARIABLE(qbs*_FUNC_ISVALIDVARIABLE_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data43.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_21010:; fornext_value2692= 1 ; fornext_finalvalue2692=_FUNC_ISVALIDVARIABLE_STRING_A->len; fornext_step2692= 1 ; if (fornext_step2692<0) fornext_step_negative2692=1; else fornext_step_negative2692=0; if (new_error) goto fornext_error2692; goto fornext_entrylabel2692; while(1){ fornext_value2692=fornext_step2692+(*_FUNC_ISVALIDVARIABLE_LONG_I); fornext_entrylabel2692: *_FUNC_ISVALIDVARIABLE_LONG_I=fornext_value2692; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2692){ if (fornext_value2692fornext_finalvalue2692) break; } fornext_error2692:; if(qbevent){evnt(18944);if(r)goto S_21010;} do{ *_FUNC_ISVALIDVARIABLE_LONG_C=qbs_asc(_FUNC_ISVALIDVARIABLE_STRING_A,*_FUNC_ISVALIDVARIABLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18945);}while(r); do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 0 ; if(!qbevent)break;evnt(18946);}while(r); S_21013:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_C>= 48 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(18947);if(r)goto S_21013;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 1 ; if(!qbevent)break;evnt(18947);}while(r); } S_21016:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_C>= 65 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(18948);if(r)goto S_21016;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 2 ; if(!qbevent)break;evnt(18948);}while(r); } S_21019:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_C>= 97 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_C<= 122 )))||new_error){ if(qbevent){evnt(18949);if(r)goto S_21019;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 2 ; if(!qbevent)break;evnt(18949);}while(r); } S_21022:; if ((-(*_FUNC_ISVALIDVARIABLE_LONG_C== 95 ))||new_error){ if(qbevent){evnt(18950);if(r)goto S_21022;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 2 ; if(!qbevent)break;evnt(18950);}while(r); } S_21025:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_T== 2 ))|(((-(*_FUNC_ISVALIDVARIABLE_LONG_T== 1 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_I> 1 )))))||new_error){ if(qbevent){evnt(18951);if(r)goto S_21025;} }else{ S_21027:; if ((-(*_FUNC_ISVALIDVARIABLE_LONG_I== 1 ))||new_error){ if(qbevent){evnt(18954);if(r)goto S_21027;} do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 0 ; if(!qbevent)break;evnt(18954);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18954);}while(r); } do{ goto fornext_exit_2691; if(!qbevent)break;evnt(18955);}while(r); } } fornext_exit_2691:; do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 1 ; if(!qbevent)break;evnt(18959);}while(r); S_21035:; if ((-(*_FUNC_ISVALIDVARIABLE_LONG_I>*_FUNC_ISVALIDVARIABLE_LONG_N))||new_error){ if(qbevent){evnt(18960);if(r)goto S_21035;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18960);}while(r); } do{ qbs_set(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_right(_FUNC_ISVALIDVARIABLE_STRING_A,_FUNC_ISVALIDVARIABLE_STRING_A->len-*_FUNC_ISVALIDVARIABLE_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18961);}while(r); S_21039:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("%%",2)))|(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("~%%",3)))))||new_error){ if(qbevent){evnt(18962);if(r)goto S_21039;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18962);}while(r); } S_21042:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("%",1)))|(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("~%",2)))))||new_error){ if(qbevent){evnt(18963);if(r)goto S_21042;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18963);}while(r); } S_21045:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("&",1)))|(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("~&",2)))))||new_error){ if(qbevent){evnt(18964);if(r)goto S_21045;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18964);}while(r); } S_21048:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("&&",2)))|(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("~&&",3)))))||new_error){ if(qbevent){evnt(18965);if(r)goto S_21048;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18965);}while(r); } S_21051:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("!",1)))|(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("#",1)))|(qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("##",2)))))||new_error){ if(qbevent){evnt(18966);if(r)goto S_21051;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18966);}while(r); } S_21054:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(18967);if(r)goto S_21054;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18967);}while(r); } S_21057:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(18968);if(r)goto S_21057;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18968);}while(r); } S_21060:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_left(_FUNC_ISVALIDVARIABLE_STRING_E, 1 ),qbs_new_txt_len("$",1)))&(qbs_notequal(qbs_left(_FUNC_ISVALIDVARIABLE_STRING_E, 1 ),qbs_new_txt_len("`",1)))))||new_error){ if(qbevent){evnt(18969);if(r)goto S_21060;} do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 0 ; if(!qbevent)break;evnt(18969);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18969);}while(r); } do{ qbs_set(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_right(_FUNC_ISVALIDVARIABLE_STRING_E,_FUNC_ISVALIDVARIABLE_STRING_E->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18970);}while(r); S_21065:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(_FUNC_ISVALIDVARIABLE_STRING_E)))||new_error){ if(qbevent){evnt(18971);if(r)goto S_21065;} do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 1 ; if(!qbevent)break;evnt(18971);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18971);}while(r); } do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 0 ; if(!qbevent)break;evnt(18972);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free43.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE; } qbs* FUNC_LINEFORMAT(qbs*_FUNC_LINEFORMAT_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data44.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18979);}while(r); do{ *__LONG_LINECONTINUATION= 0 ; if(!qbevent)break;evnt(18980);}while(r); LABEL_CONTINUELINE:; if(qbevent){evnt(18982);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A,qbs_add(_FUNC_LINEFORMAT_STRING_A,qbs_new_txt_len(" ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18984);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_CA,_FUNC_LINEFORMAT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18986);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_A,qbs_ucase(_FUNC_LINEFORMAT_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18987);}while(r); do{ *_FUNC_LINEFORMAT_LONG_N=_FUNC_LINEFORMAT_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18989);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I= 1 ; if(!qbevent)break;evnt(18990);}while(r); LABEL_LINEFORMATNEXT:; if(qbevent){evnt(18991);r=0;} S_21077:; if ((-(*_FUNC_LINEFORMAT_LONG_I>=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(18992);if(r)goto S_21077;} do{ goto LABEL_LINEFORMATDONE; if(!qbevent)break;evnt(18992);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18994);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_C,func_chr(*_FUNC_LINEFORMAT_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18995);}while(r); S_21082:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 34 ))||new_error){ if(qbevent){evnt(18998);if(r)goto S_21082;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18999);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19000);}while(r); S_21085:; fornext_value2699=*_FUNC_LINEFORMAT_LONG_I+ 1 ; fornext_finalvalue2699=*_FUNC_LINEFORMAT_LONG_N- 2 ; fornext_step2699= 1 ; if (fornext_step2699<0) fornext_step_negative2699=1; else fornext_step_negative2699=0; if (new_error) goto fornext_error2699; goto fornext_entrylabel2699; while(1){ fornext_value2699=fornext_step2699+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2699: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2699; if (fornext_step_negative2699){ if (fornext_value2699fornext_finalvalue2699) break; } fornext_error2699:; if(qbevent){evnt(19001);if(r)goto S_21085;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19002);}while(r); S_21087:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 34 ))||new_error){ if(qbevent){evnt(19004);if(r)goto S_21087;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,func_mid(_FUNC_LINEFORMAT_STRING_CA,*_FUNC_LINEFORMAT_LONG_P1,*_FUNC_LINEFORMAT_LONG_I2-*_FUNC_LINEFORMAT_LONG_P1+ 1 ,1)),qbs_new_txt_len(",",1)),FUNC_STR2(&(pass2700=*_FUNC_LINEFORMAT_LONG_I2-(*_FUNC_LINEFORMAT_LONG_I+ 1 ))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19005);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I2+ 1 ; if(!qbevent)break;evnt(19006);}while(r); do{ goto fornext_exit_2698; if(!qbevent)break;evnt(19007);}while(r); } S_21092:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 92 ))||new_error){ if(qbevent){evnt(19010);if(r)goto S_21092;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,func_mid(_FUNC_LINEFORMAT_STRING_CA,*_FUNC_LINEFORMAT_LONG_P1,*_FUNC_LINEFORMAT_LONG_I2-*_FUNC_LINEFORMAT_LONG_P1,1)),qbs_new_txt_len("\\\\",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19011);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I2+ 1 ; if(!qbevent)break;evnt(19012);}while(r); } S_21096:; if (((-(*_FUNC_LINEFORMAT_LONG_C2< 32 ))|(-(*_FUNC_LINEFORMAT_LONG_C2> 126 )))||new_error){ if(qbevent){evnt(19015);if(r)goto S_21096;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_O,func_oct(*_FUNC_LINEFORMAT_LONG_C2,32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19016);}while(r); S_21098:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_O->len< 3 )))||new_error){ if(qbevent){evnt(19017);if(r)goto S_21098;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_O,qbs_add(qbs_new_txt_len("0",1),_FUNC_LINEFORMAT_STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19018);}while(r); S_21100:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_O->len< 3 )))||new_error){ if(qbevent){evnt(19019);if(r)goto S_21100;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_O,qbs_add(qbs_new_txt_len("0",1),_FUNC_LINEFORMAT_STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19019);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,func_mid(_FUNC_LINEFORMAT_STRING_CA,*_FUNC_LINEFORMAT_LONG_P1,*_FUNC_LINEFORMAT_LONG_I2-*_FUNC_LINEFORMAT_LONG_P1,1)),qbs_new_txt_len("\\",1)),_FUNC_LINEFORMAT_STRING_O)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19021);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I2+ 1 ; if(!qbevent)break;evnt(19022);}while(r); } } fornext_exit_2698:; S_21108:; if ((-(*_FUNC_LINEFORMAT_LONG_I2==(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19027);if(r)goto S_21108;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,func_mid(_FUNC_LINEFORMAT_STRING_CA,*_FUNC_LINEFORMAT_LONG_P1,(*_FUNC_LINEFORMAT_LONG_N- 2 )-*_FUNC_LINEFORMAT_LONG_P1+ 1 ,1)),func_chr( 34 )),qbs_new_txt_len(",",1)),FUNC_STR2(&(pass2703=(*_FUNC_LINEFORMAT_LONG_N- 2 )-(*_FUNC_LINEFORMAT_LONG_I+ 1 )+ 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19028);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_N- 1 ; if(!qbevent)break;evnt(19029);}while(r); } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19032);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_FIRSTI=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(19037);}while(r); S_21115:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 46 ))||new_error){ if(qbevent){evnt(19038);if(r)goto S_21115;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_C2,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 , 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19039);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_C2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19039);}while(r); S_21118:; if ((((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 ))))||new_error){ if(qbevent){evnt(19040);if(r)goto S_21118;} do{ goto LABEL_LFNUMBER; if(!qbevent)break;evnt(19040);}while(r); } } S_21122:; if ((((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 57 ))))||new_error){ if(qbevent){evnt(19042);if(r)goto S_21122;} LABEL_LFNUMBER:; if(qbevent){evnt(19043);r=0;} S_21123:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(_FUNC_LINEFORMAT_STRING_A2, 5 )),(qbs_add(__STRING1_SP,qbs_new_txt_len("ELSE",4))))))||new_error){ if(qbevent){evnt(19046);if(r)goto S_21123;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("GOTO",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19047);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_MODE= 0 ; if(!qbevent)break;evnt(19055);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19056);}while(r); do{ *_FUNC_LINEFORMAT_LONG_DP= 0 ; if(!qbevent)break;evnt(19057);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19058);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 0 ; if(!qbevent)break;evnt(19059);}while(r); do{ *_FUNC_LINEFORMAT_LONG_PM= 1 ; if(!qbevent)break;evnt(19060);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_EX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19061);}while(r); LABEL_LFREADNUMBER:; if(qbevent){evnt(19066);r=0;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 0 ; if(!qbevent)break;evnt(19067);}while(r); S_21134:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 46 ))||new_error){ if(qbevent){evnt(19069);if(r)goto S_21134;} S_21135:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 0 ))||new_error){ if(qbevent){evnt(19070);if(r)goto S_21135;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19070);}while(r); do{ *_FUNC_LINEFORMAT_LONG_DP= 1 ; if(!qbevent)break;evnt(19070);}while(r); do{ *_FUNC_LINEFORMAT_LONG_MODE= 1 ; if(!qbevent)break;evnt(19070);}while(r); } } S_21141:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(19073);if(r)goto S_21141;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19074);}while(r); S_21143:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 0 ))||new_error){ if(qbevent){evnt(19075);if(r)goto S_21143;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_add(_FUNC_LINEFORMAT_STRING_WHOLE,_FUNC_LINEFORMAT_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19075);}while(r); } S_21146:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 1 ))||new_error){ if(qbevent){evnt(19076);if(r)goto S_21146;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_FRAC,qbs_add(_FUNC_LINEFORMAT_STRING_FRAC,_FUNC_LINEFORMAT_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19076);}while(r); } S_21149:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 2 ))||new_error){ if(qbevent){evnt(19077);if(r)goto S_21149;} do{ *_FUNC_LINEFORMAT_LONG_MODE= 3 ; if(!qbevent)break;evnt(19077);}while(r); } S_21152:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 3 ))||new_error){ if(qbevent){evnt(19078);if(r)goto S_21152;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_EX,qbs_add(_FUNC_LINEFORMAT_STRING_EX,_FUNC_LINEFORMAT_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19078);}while(r); } } S_21156:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 69 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 68 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 70 )))||new_error){ if(qbevent){evnt(19081);if(r)goto S_21156;} S_21157:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE< 2 ))||new_error){ if(qbevent){evnt(19082);if(r)goto S_21157;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19083);}while(r); S_21159:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 69 ))||new_error){ if(qbevent){evnt(19084);if(r)goto S_21159;} do{ *_FUNC_LINEFORMAT_LONG_ED= 1 ; if(!qbevent)break;evnt(19084);}while(r); } S_21162:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 68 ))||new_error){ if(qbevent){evnt(19085);if(r)goto S_21162;} do{ *_FUNC_LINEFORMAT_LONG_ED= 2 ; if(!qbevent)break;evnt(19085);}while(r); } S_21165:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 70 ))||new_error){ if(qbevent){evnt(19086);if(r)goto S_21165;} do{ *_FUNC_LINEFORMAT_LONG_ED= 3 ; if(!qbevent)break;evnt(19086);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_MODE= 2 ; if(!qbevent)break;evnt(19087);}while(r); } } S_21171:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 43 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 45 )))||new_error){ if(qbevent){evnt(19091);if(r)goto S_21171;} S_21172:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 2 ))||new_error){ if(qbevent){evnt(19092);if(r)goto S_21172;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19093);}while(r); S_21174:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 45 ))||new_error){ if(qbevent){evnt(19094);if(r)goto S_21174;} do{ *_FUNC_LINEFORMAT_LONG_PM= -1 ; if(!qbevent)break;evnt(19094);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_MODE= 3 ; if(!qbevent)break;evnt(19095);}while(r); } } S_21180:; if ((*_FUNC_LINEFORMAT_LONG_VALID)||new_error){ if(qbevent){evnt(19099);if(r)goto S_21180;} S_21181:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19100);if(r)goto S_21181;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19100);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_C,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19100);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19100);}while(r); do{ goto LABEL_LFREADNUMBER; if(!qbevent)break;evnt(19100);}while(r); } } S_21188:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_WHOLE, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19106);if(r)goto S_21188;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_right(_FUNC_LINEFORMAT_STRING_WHOLE,_FUNC_LINEFORMAT_STRING_WHOLE->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19106);}while(r); } dl_exit_2704:; S_21191:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_LINEFORMAT_STRING_FRAC, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19108);if(r)goto S_21191;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_FRAC,qbs_left(_FUNC_LINEFORMAT_STRING_FRAC,_FUNC_LINEFORMAT_STRING_FRAC->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19108);}while(r); } dl_exit_2706:; S_21194:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_EX, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19110);if(r)goto S_21194;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_EX,qbs_right(_FUNC_LINEFORMAT_STRING_EX,_FUNC_LINEFORMAT_STRING_EX->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19110);}while(r); } dl_exit_2708:; S_21197:; if (((-(*_FUNC_LINEFORMAT_LONG_DP!= 0 ))|(-(*_FUNC_LINEFORMAT_LONG_ED!= 0 )))||new_error){ if(qbevent){evnt(19112);if(r)goto S_21197;} do{ *_FUNC_LINEFORMAT_LONG_FLOAT= 1 ; if(!qbevent)break;evnt(19112);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_FLOAT= 0 ; if(!qbevent)break;evnt(19112);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_EXTUSED= 1 ; if(!qbevent)break;evnt(19114);}while(r); S_21203:; if ((*_FUNC_LINEFORMAT_LONG_ED)||new_error){ if(qbevent){evnt(19116);if(r)goto S_21203;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19116);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19116);}while(r); } S_21207:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(19119);if(r)goto S_21207;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19120);}while(r); S_21209:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%%",3)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19121);if(r)goto S_21209;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19121);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19121);}while(r); } S_21213:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&&",3)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19122);if(r)goto S_21213;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19122);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19122);}while(r); } S_21217:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%&",3)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19123);if(r)goto S_21217;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19123);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19123);}while(r); } } S_21222:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19126);if(r)goto S_21222;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19127);}while(r); S_21224:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19128);if(r)goto S_21224;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19128);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19128);}while(r); } S_21228:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%",2)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19129);if(r)goto S_21228;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19129);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19129);}while(r); } S_21232:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19130);if(r)goto S_21232;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19130);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19130);}while(r); } S_21236:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&",2)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19131);if(r)goto S_21236;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19131);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19131);}while(r); } S_21240:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%&",2)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19132);if(r)goto S_21240;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19132);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19132);}while(r); } S_21244:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(19133);if(r)goto S_21244;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19134);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 3 ; if(!qbevent)break;evnt(19135);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19136);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19137);}while(r); } S_21250:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(19139);if(r)goto S_21250;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19140);}while(r); do{ goto LABEL_LFFOUNDBITEXT; if(!qbevent)break;evnt(19141);}while(r); } } S_21255:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19145);if(r)goto S_21255;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19146);}while(r); S_21257:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19147);if(r)goto S_21257;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19147);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19147);}while(r); } S_21261:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1)))&(-(*_FUNC_LINEFORMAT_LONG_FLOAT== 0 ))))||new_error){ if(qbevent){evnt(19148);if(r)goto S_21261;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19148);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19148);}while(r); } S_21265:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(19149);if(r)goto S_21265;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19150);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 1 ; if(!qbevent)break;evnt(19151);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19152);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19153);}while(r); } S_21271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(19155);if(r)goto S_21271;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19156);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 2 ; if(!qbevent)break;evnt(19157);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19158);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19159);}while(r); } S_21277:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19161);if(r)goto S_21277;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19162);}while(r); LABEL_LFFOUNDBITEXT:; if(qbevent){evnt(19163);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19164);}while(r); S_21280:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19165);if(r)goto S_21280;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19166);}while(r); S_21282:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19167);if(r)goto S_21282;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_add(_FUNC_LINEFORMAT_STRING_BITN,func_chr(*_FUNC_LINEFORMAT_LONG_C2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19168);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19169);}while(r); }else{ do{ goto dl_exit_2710; if(!qbevent)break;evnt(19171);}while(r); } } dl_exit_2710:; S_21289:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19174);if(r)goto S_21289;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19174);}while(r); } S_21292:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_BITN, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19176);if(r)goto S_21292;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_right(_FUNC_LINEFORMAT_STRING_BITN,_FUNC_LINEFORMAT_STRING_BITN->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19176);}while(r); } dl_exit_2711:; do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_add(_FUNC_LINEFORMAT_STRING_E,_FUNC_LINEFORMAT_STRING_BITN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19177);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19178);}while(r); } } S_21299:; if ((*_FUNC_LINEFORMAT_LONG_FLOAT)||new_error){ if(qbevent){evnt(19182);if(r)goto S_21299;} S_21300:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19184);if(r)goto S_21300;} do{ *_FUNC_LINEFORMAT_LONG_OFFSET=_FUNC_LINEFORMAT_STRING_WHOLE->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19185);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SIGDIGITS=_FUNC_LINEFORMAT_STRING_WHOLE->len+_FUNC_LINEFORMAT_STRING_FRAC->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19186);}while(r); }else{ S_21304:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19188);if(r)goto S_21304;} do{ *_FUNC_LINEFORMAT_LONG_OFFSET= -1 ; if(!qbevent)break;evnt(19189);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SIGDIGITS=_FUNC_LINEFORMAT_STRING_FRAC->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19190);}while(r); S_21307:; fornext_value2718= 1 ; fornext_finalvalue2718=_FUNC_LINEFORMAT_STRING_FRAC->len; fornext_step2718= 1 ; if (fornext_step2718<0) fornext_step_negative2718=1; else fornext_step_negative2718=0; if (new_error) goto fornext_error2718; goto fornext_entrylabel2718; while(1){ fornext_value2718=fornext_step2718+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2718: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2718; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2718){ if (fornext_value2718fornext_finalvalue2718) break; } fornext_error2718:; if(qbevent){evnt(19191);if(r)goto S_21307;} S_21308:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(_FUNC_LINEFORMAT_STRING_FRAC,*_FUNC_LINEFORMAT_LONG_I2, 1 ,1),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19192);if(r)goto S_21308;} do{ goto fornext_exit_2717; if(!qbevent)break;evnt(19192);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_OFFSET=*_FUNC_LINEFORMAT_LONG_OFFSET- 1 ; if(!qbevent)break;evnt(19193);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SIGDIGITS=*_FUNC_LINEFORMAT_LONG_SIGDIGITS- 1 ; if(!qbevent)break;evnt(19194);}while(r); } fornext_exit_2717:; }else{ do{ *_FUNC_LINEFORMAT_LONG_OFFSET= 0 ; if(!qbevent)break;evnt(19198);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SIGDIGITS= 0 ; if(!qbevent)break;evnt(19199);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_right(qbs_add(_FUNC_LINEFORMAT_STRING_WHOLE,_FUNC_LINEFORMAT_STRING_FRAC),*_FUNC_LINEFORMAT_LONG_SIGDIGITS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19202);}while(r); S_21320:; if ((-(*_FUNC_LINEFORMAT_LONG_SIGDIGITS<= 7 ))||new_error){ if(qbevent){evnt(19204);if(r)goto S_21320;} S_21321:; if (((-(*_FUNC_LINEFORMAT_LONG_OFFSET<= 38 ))&(-(*_FUNC_LINEFORMAT_LONG_OFFSET>= -38 )))||new_error){ if(qbevent){evnt(19205);if(r)goto S_21321;} S_21322:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== 38 ))||new_error){ if(qbevent){evnt(19206);if(r)goto S_21322;} S_21323:; if ((qbs_cleanup(qbs_tmp_base,qbs_greaterthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("3402823",7))))||new_error){ if(qbevent){evnt(19207);if(r)goto S_21323;} do{ goto LABEL_LFXSINGLE; if(!qbevent)break;evnt(19207);}while(r); } } S_21327:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== -38 ))||new_error){ if(qbevent){evnt(19209);if(r)goto S_21327;} S_21328:; if ((qbs_cleanup(qbs_tmp_base,qbs_lessthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("1175494",7))))||new_error){ if(qbevent){evnt(19210);if(r)goto S_21328;} do{ goto LABEL_LFXSINGLE; if(!qbevent)break;evnt(19210);}while(r); } } do{ *_FUNC_LINEFORMAT_LONG_ED= 1 ; if(!qbevent)break;evnt(19212);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19213);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19214);}while(r); } } LABEL_LFXSINGLE:; if(qbevent){evnt(19217);r=0;} S_21337:; if ((-(*_FUNC_LINEFORMAT_LONG_SIGDIGITS<= 16 ))||new_error){ if(qbevent){evnt(19219);if(r)goto S_21337;} S_21338:; if (((-(*_FUNC_LINEFORMAT_LONG_OFFSET<= 308 ))&(-(*_FUNC_LINEFORMAT_LONG_OFFSET>= -308 )))||new_error){ if(qbevent){evnt(19220);if(r)goto S_21338;} S_21339:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== 308 ))||new_error){ if(qbevent){evnt(19221);if(r)goto S_21339;} S_21340:; if ((qbs_cleanup(qbs_tmp_base,qbs_greaterthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("1797693134862315",16))))||new_error){ if(qbevent){evnt(19222);if(r)goto S_21340;} do{ goto LABEL_LFXDOUBLE; if(!qbevent)break;evnt(19222);}while(r); } } S_21344:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== -308 ))||new_error){ if(qbevent){evnt(19224);if(r)goto S_21344;} S_21345:; if ((qbs_cleanup(qbs_tmp_base,qbs_lessthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("2225073858507201",16))))||new_error){ if(qbevent){evnt(19225);if(r)goto S_21345;} do{ goto LABEL_LFXDOUBLE; if(!qbevent)break;evnt(19225);}while(r); } } do{ *_FUNC_LINEFORMAT_LONG_ED= 2 ; if(!qbevent)break;evnt(19227);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19228);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19229);}while(r); } } LABEL_LFXDOUBLE:; if(qbevent){evnt(19232);r=0;} do{ *_FUNC_LINEFORMAT_LONG_ED= 3 ; if(!qbevent)break;evnt(19234);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19235);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19235);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_EXTUSED= 0 ; if(!qbevent)break;evnt(19238);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19239);}while(r); LABEL_LFFOUNDEXT:; if(qbevent){evnt(19240);r=0;} S_21360:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19243);if(r)goto S_21360;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19243);}while(r); } S_21363:; if ((*_FUNC_LINEFORMAT_LONG_FLOAT)||new_error){ if(qbevent){evnt(19245);if(r)goto S_21363;} do{ *_FUNC_LINEFORMAT_LONG_DP= 1 ; if(!qbevent)break;evnt(19246);}while(r); S_21365:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19247);if(r)goto S_21365;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19247);}while(r); } } S_21369:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_LINEFORMAT_LONG_ED!= 0 ))&(qbs_equal(_FUNC_LINEFORMAT_STRING_EX,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(19250);if(r)goto S_21369;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_EX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19250);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19252);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,_FUNC_LINEFORMAT_STRING_WHOLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19253);}while(r); S_21374:; if ((*_FUNC_LINEFORMAT_LONG_DP)||new_error){ if(qbevent){evnt(19254);if(r)goto S_21374;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len(".",1)),_FUNC_LINEFORMAT_STRING_FRAC)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19254);}while(r); } S_21377:; if ((*_FUNC_LINEFORMAT_LONG_ED)||new_error){ if(qbevent){evnt(19255);if(r)goto S_21377;} S_21378:; if ((-(*_FUNC_LINEFORMAT_LONG_ED== 1 ))||new_error){ if(qbevent){evnt(19256);if(r)goto S_21378;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len("E",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19256);}while(r); } S_21381:; if ((-(*_FUNC_LINEFORMAT_LONG_ED== 2 ))||new_error){ if(qbevent){evnt(19257);if(r)goto S_21381;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len("D",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19257);}while(r); } S_21384:; if ((-(*_FUNC_LINEFORMAT_LONG_ED== 3 ))||new_error){ if(qbevent){evnt(19258);if(r)goto S_21384;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len("F",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19258);}while(r); } S_21387:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_LINEFORMAT_LONG_PM== -1 ))&(qbs_notequal(_FUNC_LINEFORMAT_STRING_EX,qbs_new_txt_len("0",1)))))||new_error){ if(qbevent){evnt(19259);if(r)goto S_21387;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len("-",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19259);}while(r); }else{ do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len("+",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19259);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,_FUNC_LINEFORMAT_STRING_EX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19260);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,_FUNC_LINEFORMAT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19262);}while(r); S_21395:; if ((*_FUNC_LINEFORMAT_LONG_EXTUSED)||new_error){ if(qbevent){evnt(19264);if(r)goto S_21395;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len(",",1)),func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_FIRSTI,*_FUNC_LINEFORMAT_LONG_I-*_FUNC_LINEFORMAT_LONG_FIRSTI,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19264);}while(r); } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19266);}while(r); } S_21400:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(19271);if(r)goto S_21400;} S_21401:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 , 1 ,1),qbs_new_txt_len("H",1))))||new_error){ if(qbevent){evnt(19272);if(r)goto S_21401;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19273);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19274);}while(r); LABEL_LFREADHEX:; if(qbevent){evnt(19275);r=0;} S_21404:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19276);if(r)goto S_21404;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_C,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19277);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19277);}while(r); S_21407:; if ((((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 57 )))|((-(*_FUNC_LINEFORMAT_LONG_C>= 65 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 70 ))))||new_error){ if(qbevent){evnt(19278);if(r)goto S_21407;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_add(_FUNC_LINEFORMAT_STRING_HX,_FUNC_LINEFORMAT_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19278);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19278);}while(r); do{ goto LABEL_LFREADHEX; if(!qbevent)break;evnt(19278);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_FULLHX,qbs_add(qbs_new_txt_len("&H",2),_FUNC_LINEFORMAT_STRING_HX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19280);}while(r); S_21414:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_HX, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19283);if(r)goto S_21414;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_right(_FUNC_LINEFORMAT_STRING_HX,_FUNC_LINEFORMAT_STRING_HX->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19283);}while(r); } dl_exit_2720:; S_21417:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19284);if(r)goto S_21417;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19284);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19286);}while(r); S_21421:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(19288);if(r)goto S_21421;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19289);}while(r); S_21423:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(19290);if(r)goto S_21423;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19290);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19290);}while(r); } S_21427:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(19291);if(r)goto S_21427;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19291);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19291);}while(r); } S_21431:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(19292);if(r)goto S_21431;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19292);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19292);}while(r); } } S_21436:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19295);if(r)goto S_21436;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19296);}while(r); S_21438:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19297);if(r)goto S_21438;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19297);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19297);}while(r); } S_21442:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(19298);if(r)goto S_21442;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19298);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19298);}while(r); } S_21446:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19299);if(r)goto S_21446;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19299);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19299);}while(r); } S_21450:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(19300);if(r)goto S_21450;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19300);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19300);}while(r); } S_21454:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(19301);if(r)goto S_21454;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19301);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19301);}while(r); } S_21458:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(19302);if(r)goto S_21458;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19303);}while(r); do{ goto LABEL_LFHXBITEXT; if(!qbevent)break;evnt(19304);}while(r); } } S_21463:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19308);if(r)goto S_21463;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19309);}while(r); S_21465:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19310);if(r)goto S_21465;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19310);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19310);}while(r); } S_21469:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19311);if(r)goto S_21469;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19311);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19311);}while(r); } S_21473:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19312);if(r)goto S_21473;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19313);}while(r); LABEL_LFHXBITEXT:; if(qbevent){evnt(19314);r=0;} S_21475:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19315);if(r)goto S_21475;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19316);}while(r); S_21477:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19317);if(r)goto S_21477;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_add(_FUNC_LINEFORMAT_STRING_BITN,func_chr(*_FUNC_LINEFORMAT_LONG_C2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19318);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19319);}while(r); }else{ do{ goto dl_exit_2722; if(!qbevent)break;evnt(19321);}while(r); } } dl_exit_2722:; S_21484:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19324);if(r)goto S_21484;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19324);}while(r); } S_21487:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_BITN, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19326);if(r)goto S_21487;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_right(_FUNC_LINEFORMAT_STRING_BITN,_FUNC_LINEFORMAT_STRING_BITN->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19326);}while(r); } dl_exit_2723:; do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19327);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19332);}while(r); S_21494:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 8 )))||new_error){ if(qbevent){evnt(19333);if(r)goto S_21494;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19333);}while(r); } S_21497:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 4 )))||new_error){ if(qbevent){evnt(19334);if(r)goto S_21497;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19334);}while(r); } do{ goto LABEL_LFHXEXT2; if(!qbevent)break;evnt(19335);}while(r); LABEL_LFHXEXT:; if(qbevent){evnt(19336);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_FULLHX,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_FULLHX,_FUNC_LINEFORMAT_STRING_E),_FUNC_LINEFORMAT_STRING_BITN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19337);}while(r); LABEL_LFHXEXT2:; if(qbevent){evnt(19338);r=0;} S_21502:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len> 16 )))||new_error){ if(qbevent){evnt(19341);if(r)goto S_21502;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19341);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19341);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V= 0 ; if(!qbevent)break;evnt(19342);}while(r); S_21507:; fornext_value2729= 1 ; fornext_finalvalue2729=_FUNC_LINEFORMAT_STRING_HX->len; fornext_step2729= 1 ; if (fornext_step2729<0) fornext_step_negative2729=1; else fornext_step_negative2729=0; if (new_error) goto fornext_error2729; goto fornext_entrylabel2729; while(1){ fornext_value2729=fornext_step2729+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2729: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2729; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2729){ if (fornext_value2729fornext_finalvalue2729) break; } fornext_error2729:; if(qbevent){evnt(19343);if(r)goto S_21507;} do{ *_FUNC_LINEFORMAT_LONG_V2=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_HX,*_FUNC_LINEFORMAT_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19344);}while(r); S_21509:; if ((-(*_FUNC_LINEFORMAT_LONG_V2<= 57 ))||new_error){ if(qbevent){evnt(19345);if(r)goto S_21509;} do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 48 ; if(!qbevent)break;evnt(19345);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 65 + 10 ; if(!qbevent)break;evnt(19345);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(*_FUNC_LINEFORMAT_UINTEGER64_V* 16 )+*_FUNC_LINEFORMAT_LONG_V2; if(!qbevent)break;evnt(19346);}while(r); } fornext_exit_2728:; LABEL_FINISHHEXOCTBIN:; if(qbevent){evnt(19349);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_NUM,FUNC_STR2U64(_FUNC_LINEFORMAT_UINTEGER64_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19350);}while(r); S_21517:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_LINEFORMAT_STRING_E, 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(19351);if(r)goto S_21517;} S_21518:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19354);if(r)goto S_21518;} S_21519:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 127 ))||new_error){ if(qbevent){evnt(19355);if(r)goto S_21519;} S_21520:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 255 ))||new_error){ if(qbevent){evnt(19356);if(r)goto S_21520;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19356);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19356);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))& 255 )+ 1 ; if(!qbevent)break;evnt(19357);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_NUM,qbs_add(qbs_add(qbs_new_txt_len("-",1),__STRING1_SP),FUNC_STR2U64(_FUNC_LINEFORMAT_UINTEGER64_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19358);}while(r); } } S_21528:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19362);if(r)goto S_21528;} S_21529:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 32767 ))||new_error){ if(qbevent){evnt(19363);if(r)goto S_21529;} S_21530:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 65535 ))||new_error){ if(qbevent){evnt(19364);if(r)goto S_21530;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19364);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19364);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))& 65535 )+ 1 ; if(!qbevent)break;evnt(19365);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_NUM,qbs_add(qbs_add(qbs_new_txt_len("-",1),__STRING1_SP),FUNC_STR2U64(_FUNC_LINEFORMAT_UINTEGER64_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19366);}while(r); } } S_21538:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19370);if(r)goto S_21538;} S_21539:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 2147483647 ))||new_error){ if(qbevent){evnt(19371);if(r)goto S_21539;} S_21540:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 4294967295ll ))||new_error){ if(qbevent){evnt(19372);if(r)goto S_21540;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19372);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19372);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))& 4294967295ll )+ 1 ; if(!qbevent)break;evnt(19373);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_NUM,qbs_add(qbs_add(qbs_new_txt_len("-",1),__STRING1_SP),FUNC_STR2U64(_FUNC_LINEFORMAT_UINTEGER64_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19374);}while(r); } } S_21548:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19378);if(r)goto S_21548;} S_21549:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 9223372036854775807ll ))||new_error){ if(qbevent){evnt(19379);if(r)goto S_21549;} do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(~(*_FUNC_LINEFORMAT_UINTEGER64_V))+ 1 ; if(!qbevent)break;evnt(19381);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_NUM,qbs_add(qbs_add(qbs_new_txt_len("-",1),__STRING1_SP),FUNC_STR2U64(_FUNC_LINEFORMAT_UINTEGER64_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19382);}while(r); } } S_21554:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19386);if(r)goto S_21554;} do{ *_FUNC_LINEFORMAT_LONG_VBITN=qbr(func_val(_FUNC_LINEFORMAT_STRING_BITN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19387);}while(r); do{ *_FUNC_LINEFORMAT_UINTEGER64_H= 1 ; if(!qbevent)break;evnt(19388);}while(r); S_21557:; fornext_value2732= 1 ; fornext_finalvalue2732=*_FUNC_LINEFORMAT_LONG_VBITN- 1 ; fornext_step2732= 1 ; if (fornext_step2732<0) fornext_step_negative2732=1; else fornext_step_negative2732=0; if (new_error) goto fornext_error2732; goto fornext_entrylabel2732; while(1){ fornext_value2732=fornext_step2732+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2732: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2732; if (fornext_step_negative2732){ if (fornext_value2732fornext_finalvalue2732) break; } fornext_error2732:; if(qbevent){evnt(19388);if(r)goto S_21557;} do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H* 2 ; if(!qbevent)break;evnt(19388);}while(r); } fornext_exit_2731:; do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H- 1 ; if(!qbevent)break;evnt(19388);}while(r); S_21561:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V>*_FUNC_LINEFORMAT_UINTEGER64_H))||new_error){ if(qbevent){evnt(19389);if(r)goto S_21561;} do{ *_FUNC_LINEFORMAT_UINTEGER64_H= 1 ; if(!qbevent)break;evnt(19390);}while(r); S_21563:; fornext_value2734= 1 ; fornext_finalvalue2734=*_FUNC_LINEFORMAT_LONG_VBITN; fornext_step2734= 1 ; if (fornext_step2734<0) fornext_step_negative2734=1; else fornext_step_negative2734=0; if (new_error) goto fornext_error2734; goto fornext_entrylabel2734; while(1){ fornext_value2734=fornext_step2734+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2734: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2734; if (fornext_step_negative2734){ if (fornext_value2734fornext_finalvalue2734) break; } fornext_error2734:; if(qbevent){evnt(19390);if(r)goto S_21563;} do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H* 2 ; if(!qbevent)break;evnt(19390);}while(r); } fornext_exit_2733:; do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H- 1 ; if(!qbevent)break;evnt(19390);}while(r); S_21567:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V>*_FUNC_LINEFORMAT_UINTEGER64_H))||new_error){ if(qbevent){evnt(19391);if(r)goto S_21567;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19391);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19391);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))&*_FUNC_LINEFORMAT_UINTEGER64_H)+ 1 ; if(!qbevent)break;evnt(19392);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_NUM,qbs_add(qbs_add(qbs_new_txt_len("-",1),__STRING1_SP),FUNC_STR2U64(_FUNC_LINEFORMAT_UINTEGER64_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19393);}while(r); } } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),_FUNC_LINEFORMAT_STRING_NUM),_FUNC_LINEFORMAT_STRING_E),_FUNC_LINEFORMAT_STRING_BITN),qbs_new_txt_len(",",1)),_FUNC_LINEFORMAT_STRING_FULLHX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19399);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19401);}while(r); } } S_21580:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(19407);if(r)goto S_21580;} S_21581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 , 1 ,1),qbs_new_txt_len("O",1))))||new_error){ if(qbevent){evnt(19408);if(r)goto S_21581;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19409);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19411);}while(r); LABEL_LFREADOCT:; if(qbevent){evnt(19412);r=0;} S_21584:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19413);if(r)goto S_21584;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_C,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19414);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19414);}while(r); S_21587:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 55 )))||new_error){ if(qbevent){evnt(19415);if(r)goto S_21587;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_add(_FUNC_LINEFORMAT_STRING_HX,_FUNC_LINEFORMAT_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19415);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19415);}while(r); do{ goto LABEL_LFREADOCT; if(!qbevent)break;evnt(19415);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_FULLHX,qbs_add(qbs_new_txt_len("&O",2),_FUNC_LINEFORMAT_STRING_HX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19417);}while(r); S_21594:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_HX, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19420);if(r)goto S_21594;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_right(_FUNC_LINEFORMAT_STRING_HX,_FUNC_LINEFORMAT_STRING_HX->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19420);}while(r); } dl_exit_2735:; S_21597:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19421);if(r)goto S_21597;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19421);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19423);}while(r); S_21601:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(19425);if(r)goto S_21601;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19426);}while(r); S_21603:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(19427);if(r)goto S_21603;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19427);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19427);}while(r); } S_21607:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(19428);if(r)goto S_21607;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19428);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19428);}while(r); } S_21611:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(19429);if(r)goto S_21611;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19429);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19429);}while(r); } } S_21616:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19432);if(r)goto S_21616;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19433);}while(r); S_21618:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19434);if(r)goto S_21618;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19434);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19434);}while(r); } S_21622:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(19435);if(r)goto S_21622;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19435);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19435);}while(r); } S_21626:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19436);if(r)goto S_21626;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19436);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19436);}while(r); } S_21630:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(19437);if(r)goto S_21630;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19437);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19437);}while(r); } S_21634:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(19438);if(r)goto S_21634;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19438);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19438);}while(r); } S_21638:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(19439);if(r)goto S_21638;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19440);}while(r); do{ goto LABEL_LFOTBITEXT; if(!qbevent)break;evnt(19441);}while(r); } } S_21643:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19445);if(r)goto S_21643;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19446);}while(r); S_21645:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19447);if(r)goto S_21645;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19447);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19447);}while(r); } S_21649:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19448);if(r)goto S_21649;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19448);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19448);}while(r); } S_21653:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19449);if(r)goto S_21653;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19450);}while(r); LABEL_LFOTBITEXT:; if(qbevent){evnt(19451);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19452);}while(r); S_21656:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19453);if(r)goto S_21656;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19454);}while(r); S_21658:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19455);if(r)goto S_21658;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_add(_FUNC_LINEFORMAT_STRING_BITN,func_chr(*_FUNC_LINEFORMAT_LONG_C2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19456);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19457);}while(r); }else{ do{ goto dl_exit_2737; if(!qbevent)break;evnt(19459);}while(r); } } dl_exit_2737:; S_21665:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19462);if(r)goto S_21665;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19462);}while(r); } S_21668:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_BITN, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19464);if(r)goto S_21668;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_right(_FUNC_LINEFORMAT_STRING_BITN,_FUNC_LINEFORMAT_STRING_BITN->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19464);}while(r); } dl_exit_2738:; do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19465);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19470);}while(r); S_21675:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 11 )))||new_error){ if(qbevent){evnt(19472);if(r)goto S_21675;} S_21676:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_LINEFORMAT_STRING_HX->len< 11 ))|(-(qbs_asc(qbs_left(_FUNC_LINEFORMAT_STRING_HX, 1 ))<= 51 ))))||new_error){ if(qbevent){evnt(19473);if(r)goto S_21676;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19473);}while(r); } } S_21680:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 6 )))||new_error){ if(qbevent){evnt(19476);if(r)goto S_21680;} S_21681:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_LINEFORMAT_STRING_HX->len< 6 ))|(qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_HX, 1 ),qbs_new_txt_len("1",1)))))||new_error){ if(qbevent){evnt(19477);if(r)goto S_21681;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19477);}while(r); } } do{ goto LABEL_LFOTEXT2; if(!qbevent)break;evnt(19480);}while(r); LABEL_LFOTEXT:; if(qbevent){evnt(19481);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_FULLHX,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_FULLHX,_FUNC_LINEFORMAT_STRING_E),_FUNC_LINEFORMAT_STRING_BITN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19482);}while(r); LABEL_LFOTEXT2:; if(qbevent){evnt(19483);r=0;} S_21687:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len> 22 )))||new_error){ if(qbevent){evnt(19487);if(r)goto S_21687;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19487);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19487);}while(r); } S_21691:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len== 22 )))||new_error){ if(qbevent){evnt(19488);if(r)goto S_21691;} S_21692:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_LINEFORMAT_STRING_HX, 1 ),qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(19489);if(r)goto S_21692;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19489);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19489);}while(r); } } do{ *_FUNC_LINEFORMAT_UINTEGER64_V= 0 ; if(!qbevent)break;evnt(19492);}while(r); S_21698:; fornext_value2747= 1 ; fornext_finalvalue2747=_FUNC_LINEFORMAT_STRING_HX->len; fornext_step2747= 1 ; if (fornext_step2747<0) fornext_step_negative2747=1; else fornext_step_negative2747=0; if (new_error) goto fornext_error2747; goto fornext_entrylabel2747; while(1){ fornext_value2747=fornext_step2747+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2747: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2747; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2747){ if (fornext_value2747fornext_finalvalue2747) break; } fornext_error2747:; if(qbevent){evnt(19493);if(r)goto S_21698;} do{ *_FUNC_LINEFORMAT_LONG_V2=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_HX,*_FUNC_LINEFORMAT_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19494);}while(r); do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 48 ; if(!qbevent)break;evnt(19495);}while(r); do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(*_FUNC_LINEFORMAT_UINTEGER64_V* 8 )+*_FUNC_LINEFORMAT_LONG_V2; if(!qbevent)break;evnt(19496);}while(r); } fornext_exit_2746:; do{ goto LABEL_FINISHHEXOCTBIN; if(!qbevent)break;evnt(19499);}while(r); } } S_21706:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(19505);if(r)goto S_21706;} S_21707:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 , 1 ,1),qbs_new_txt_len("B",1))))||new_error){ if(qbevent){evnt(19506);if(r)goto S_21707;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19507);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19509);}while(r); LABEL_LFREADBIN:; if(qbevent){evnt(19510);r=0;} S_21710:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19511);if(r)goto S_21710;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_C,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19512);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19512);}while(r); S_21713:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 49 )))||new_error){ if(qbevent){evnt(19513);if(r)goto S_21713;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_add(_FUNC_LINEFORMAT_STRING_HX,_FUNC_LINEFORMAT_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19513);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19513);}while(r); do{ goto LABEL_LFREADBIN; if(!qbevent)break;evnt(19513);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_FULLHX,qbs_add(qbs_new_txt_len("&B",2),_FUNC_LINEFORMAT_STRING_HX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19515);}while(r); S_21720:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_HX, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19518);if(r)goto S_21720;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_right(_FUNC_LINEFORMAT_STRING_HX,_FUNC_LINEFORMAT_STRING_HX->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19518);}while(r); } dl_exit_2749:; S_21723:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19519);if(r)goto S_21723;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19519);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19521);}while(r); S_21727:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(19523);if(r)goto S_21727;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19524);}while(r); S_21729:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(19525);if(r)goto S_21729;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19525);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19525);}while(r); } S_21733:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(19526);if(r)goto S_21733;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19526);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19526);}while(r); } S_21737:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(19527);if(r)goto S_21737;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19527);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19527);}while(r); } } S_21742:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19530);if(r)goto S_21742;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19531);}while(r); S_21744:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19532);if(r)goto S_21744;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19532);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19532);}while(r); } S_21748:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(19533);if(r)goto S_21748;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19533);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19533);}while(r); } S_21752:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19534);if(r)goto S_21752;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19534);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19534);}while(r); } S_21756:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(19535);if(r)goto S_21756;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot use _OFFSET symbols after numbers",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19535);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19535);}while(r); } S_21760:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(19536);if(r)goto S_21760;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19536);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19536);}while(r); } S_21764:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(19537);if(r)goto S_21764;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19538);}while(r); do{ goto LABEL_LFBIBITEXT; if(!qbevent)break;evnt(19539);}while(r); } } S_21769:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19545);if(r)goto S_21769;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19546);}while(r); S_21771:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19547);if(r)goto S_21771;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19547);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19547);}while(r); } S_21775:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19548);if(r)goto S_21775;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19548);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19548);}while(r); } S_21779:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19549);if(r)goto S_21779;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19550);}while(r); LABEL_LFBIBITEXT:; if(qbevent){evnt(19551);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19552);}while(r); S_21782:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19553);if(r)goto S_21782;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19554);}while(r); S_21784:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19555);if(r)goto S_21784;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_add(_FUNC_LINEFORMAT_STRING_BITN,func_chr(*_FUNC_LINEFORMAT_LONG_C2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19556);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19557);}while(r); }else{ do{ goto dl_exit_2751; if(!qbevent)break;evnt(19559);}while(r); } } dl_exit_2751:; S_21791:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19562);if(r)goto S_21791;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19562);}while(r); } S_21794:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_BITN, 1 ),qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(19564);if(r)goto S_21794;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_right(_FUNC_LINEFORMAT_STRING_BITN,_FUNC_LINEFORMAT_STRING_BITN->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19564);}while(r); } dl_exit_2752:; do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(19565);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19570);}while(r); S_21801:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 32 )))||new_error){ if(qbevent){evnt(19571);if(r)goto S_21801;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19571);}while(r); } S_21804:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 16 )))||new_error){ if(qbevent){evnt(19572);if(r)goto S_21804;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19572);}while(r); } do{ goto LABEL_LFBIEXT2; if(!qbevent)break;evnt(19574);}while(r); LABEL_LFBIEXT:; if(qbevent){evnt(19575);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_FULLHX,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_FULLHX,_FUNC_LINEFORMAT_STRING_E),_FUNC_LINEFORMAT_STRING_BITN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19576);}while(r); LABEL_LFBIEXT2:; if(qbevent){evnt(19577);r=0;} S_21809:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len> 64 )))||new_error){ if(qbevent){evnt(19580);if(r)goto S_21809;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19580);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19580);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V= 0 ; if(!qbevent)break;evnt(19582);}while(r); S_21814:; fornext_value2758= 1 ; fornext_finalvalue2758=_FUNC_LINEFORMAT_STRING_HX->len; fornext_step2758= 1 ; if (fornext_step2758<0) fornext_step_negative2758=1; else fornext_step_negative2758=0; if (new_error) goto fornext_error2758; goto fornext_entrylabel2758; while(1){ fornext_value2758=fornext_step2758+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2758: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2758; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2758){ if (fornext_value2758fornext_finalvalue2758) break; } fornext_error2758:; if(qbevent){evnt(19583);if(r)goto S_21814;} do{ *_FUNC_LINEFORMAT_LONG_V2=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_HX,*_FUNC_LINEFORMAT_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19584);}while(r); do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 48 ; if(!qbevent)break;evnt(19585);}while(r); do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(*_FUNC_LINEFORMAT_UINTEGER64_V* 2 )+*_FUNC_LINEFORMAT_LONG_V2; if(!qbevent)break;evnt(19586);}while(r); } fornext_exit_2757:; do{ goto LABEL_FINISHHEXOCTBIN; if(!qbevent)break;evnt(19589);}while(r); } } S_21822:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(19595);if(r)goto S_21822;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected &H... or &O...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19595);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19595);}while(r); } S_21826:; if (((((-(*_FUNC_LINEFORMAT_LONG_C>= 65 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 90 ))))|(-(*_FUNC_LINEFORMAT_LONG_C== 95 )))||new_error){ if(qbevent){evnt(19599);if(r)goto S_21826;} S_21827:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 95 ))||new_error){ if(qbevent){evnt(19600);if(r)goto S_21827;} do{ *_FUNC_LINEFORMAT_LONG_P2= 0 ; if(!qbevent)break;evnt(19600);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(19600);}while(r); } S_21832:; fornext_value2761=*_FUNC_LINEFORMAT_LONG_I+ 1 ; fornext_finalvalue2761=*_FUNC_LINEFORMAT_LONG_N; fornext_step2761= 1 ; if (fornext_step2761<0) fornext_step_negative2761=1; else fornext_step_negative2761=0; if (new_error) goto fornext_error2761; goto fornext_entrylabel2761; while(1){ fornext_value2761=fornext_step2761+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2761: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2761; if (fornext_step_negative2761){ if (fornext_value2761fornext_finalvalue2761) break; } fornext_error2761:; if(qbevent){evnt(19601);if(r)goto S_21832;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19602);}while(r); S_21834:; if ((~(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((*_FUNC_LINEFORMAT_LONG_C2)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(19603);if(r)goto S_21834;} do{ goto fornext_exit_2760; if(!qbevent)break;evnt(19603);}while(r); } S_21837:; if ((-(*_FUNC_LINEFORMAT_LONG_C2!= 95 ))||new_error){ if(qbevent){evnt(19604);if(r)goto S_21837;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I2; if(!qbevent)break;evnt(19604);}while(r); } } fornext_exit_2760:; S_21841:; if ((*_FUNC_LINEFORMAT_LONG_P2)||new_error){ if(qbevent){evnt(19606);if(r)goto S_21841;} do{ *_FUNC_LINEFORMAT_LONG_N2=*_FUNC_LINEFORMAT_LONG_P2-*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19608);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_A3,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I,*_FUNC_LINEFORMAT_LONG_N2,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19609);}while(r); S_21844:; if ((-(*_FUNC_LINEFORMAT_LONG_N2== 3 ))||new_error){ if(qbevent){evnt(19612);if(r)goto S_21844;} S_21845:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A3,qbs_new_txt_len("REM",3))))||new_error){ if(qbevent){evnt(19613);if(r)goto S_21845;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_N2; if(!qbevent)break;evnt(19614);}while(r); S_21847:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_ucase(qbs_right(_FUNC_LINEFORMAT_STRING_A2, 5 ))),(qbs_add(__STRING1_SP,qbs_new_txt_len("THEN",4))))))||new_error){ if(qbevent){evnt(19616);if(r)goto S_21847;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19616);}while(r); } do{ qbs_set(__STRING_LAYOUTCOMMENT,qbs_new_txt_len("REM",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19617);}while(r); do{ goto LABEL_COMMENT; if(!qbevent)break;evnt(19618);}while(r); } } S_21854:; if ((-(*_FUNC_LINEFORMAT_LONG_N2== 4 ))||new_error){ if(qbevent){evnt(19623);if(r)goto S_21854;} S_21855:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A3,qbs_new_txt_len("DATA",4))))||new_error){ if(qbevent){evnt(19624);if(r)goto S_21855;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_X,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19625);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_N2; if(!qbevent)break;evnt(19626);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SCAN= 0 ; if(!qbevent)break;evnt(19627);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 0 ; if(!qbevent)break;evnt(19628);}while(r); do{ *_FUNC_LINEFORMAT_LONG_COMMANEXT= 0 ; if(!qbevent)break;evnt(19629);}while(r); do{ *_FUNC_LINEFORMAT_LONG_FINALDATA= 0 ; if(!qbevent)break;evnt(19630);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19631);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1= 0 ; if(!qbevent)break;evnt(19632);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P2= 0 ; if(!qbevent)break;evnt(19633);}while(r); LABEL_NEXTDATACHR:; if(qbevent){evnt(19634);r=0;} S_21865:; if ((-(*_FUNC_LINEFORMAT_LONG_I<*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19635);if(r)goto S_21865;} do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19636);}while(r); S_21867:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 9 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 32 )))||new_error){ if(qbevent){evnt(19638);if(r)goto S_21867;} S_21868:; if ((-(*_FUNC_LINEFORMAT_LONG_SCAN== 0 ))||new_error){ if(qbevent){evnt(19639);if(r)goto S_21868;} do{ goto LABEL_SKIPWHITESPACE; if(!qbevent)break;evnt(19639);}while(r); } } S_21872:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 58 ))||new_error){ if(qbevent){evnt(19642);if(r)goto S_21872;} S_21873:; if ((-(*_FUNC_LINEFORMAT_LONG_SPEECHMARKS== 0 ))||new_error){ if(qbevent){evnt(19643);if(r)goto S_21873;} do{ *_FUNC_LINEFORMAT_LONG_FINALDATA= 1 ; if(!qbevent)break;evnt(19643);}while(r); do{ goto LABEL_ADDDATA; if(!qbevent)break;evnt(19643);}while(r); } } S_21878:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 44 ))||new_error){ if(qbevent){evnt(19646);if(r)goto S_21878;} S_21879:; if ((-(*_FUNC_LINEFORMAT_LONG_SPEECHMARKS== 0 ))||new_error){ if(qbevent){evnt(19647);if(r)goto S_21879;} LABEL_ADDDATA:; if(qbevent){evnt(19648);r=0;} S_21880:; if ((-(*__LONG_PREPASS== 0 ))||new_error){ if(qbevent){evnt(19649);if(r)goto S_21880;} S_21881:; if ((*_FUNC_LINEFORMAT_LONG_P1)||new_error){ if(qbevent){evnt(19650);if(r)goto S_21881;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_X,qbs_add(_FUNC_LINEFORMAT_STRING_X,func_mid(_FUNC_LINEFORMAT_STRING_CA,*_FUNC_LINEFORMAT_LONG_P1,*_FUNC_LINEFORMAT_LONG_P2-*_FUNC_LINEFORMAT_LONG_P1+ 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19654);}while(r); } S_21884:; if ((*_FUNC_LINEFORMAT_LONG_SPEECHMARKS)||new_error){ if(qbevent){evnt(19657);if(r)goto S_21884;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_X,qbs_add(_FUNC_LINEFORMAT_STRING_X,func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19659);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_X,qbs_add(_FUNC_LINEFORMAT_STRING_X,func_chr( 44 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19663);}while(r); } S_21889:; if ((-(*_FUNC_LINEFORMAT_LONG_FINALDATA== 1 ))||new_error){ if(qbevent){evnt(19665);if(r)goto S_21889;} do{ goto LABEL_FINISHEDDATA; if(!qbevent)break;evnt(19665);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19666);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1= 0 ; if(!qbevent)break;evnt(19667);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P2= 0 ; if(!qbevent)break;evnt(19668);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 0 ; if(!qbevent)break;evnt(19669);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SCAN= 0 ; if(!qbevent)break;evnt(19670);}while(r); do{ *_FUNC_LINEFORMAT_LONG_COMMANEXT= 0 ; if(!qbevent)break;evnt(19671);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19672);}while(r); do{ goto LABEL_NEXTDATACHR; if(!qbevent)break;evnt(19673);}while(r); } } S_21902:; if ((-(*_FUNC_LINEFORMAT_LONG_COMMANEXT== 1 ))||new_error){ if(qbevent){evnt(19677);if(r)goto S_21902;} S_21903:; if (((-(*_FUNC_LINEFORMAT_LONG_C!= 32 ))&(-(*_FUNC_LINEFORMAT_LONG_C!= 9 )))||new_error){ if(qbevent){evnt(19678);if(r)goto S_21903;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected , after quoted string in DATA statement",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19678);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19678);}while(r); } } S_21908:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 34 ))||new_error){ if(qbevent){evnt(19681);if(r)goto S_21908;} S_21909:; if ((-(*_FUNC_LINEFORMAT_LONG_SPEECHMARKS== 1 ))||new_error){ if(qbevent){evnt(19682);if(r)goto S_21909;} do{ *_FUNC_LINEFORMAT_LONG_COMMANEXT= 1 ; if(!qbevent)break;evnt(19683);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 0 ; if(!qbevent)break;evnt(19684);}while(r); } S_21913:; if ((-(*_FUNC_LINEFORMAT_LONG_SCAN== 0 ))||new_error){ if(qbevent){evnt(19686);if(r)goto S_21913;} do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 1 ; if(!qbevent)break;evnt(19686);}while(r); } } do{ *_FUNC_LINEFORMAT_LONG_SCAN= 1 ; if(!qbevent)break;evnt(19689);}while(r); S_21918:; if ((-(*_FUNC_LINEFORMAT_LONG_P1== 0 ))||new_error){ if(qbevent){evnt(19691);if(r)goto S_21918;} do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(19691);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(19691);}while(r); } S_21922:; if (((-(*_FUNC_LINEFORMAT_LONG_C!= 9 ))&(-(*_FUNC_LINEFORMAT_LONG_C!= 32 )))||new_error){ if(qbevent){evnt(19692);if(r)goto S_21922;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(19692);}while(r); } LABEL_SKIPWHITESPACE:; if(qbevent){evnt(19694);r=0;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19695);}while(r); do{ goto LABEL_NEXTDATACHR; if(!qbevent)break;evnt(19695);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_FINALDATA= 1 ; if(!qbevent)break;evnt(19697);}while(r); do{ goto LABEL_ADDDATA; if(!qbevent)break;evnt(19697);}while(r); LABEL_FINISHEDDATA:; if(qbevent){evnt(19698);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19699);}while(r); S_21931:; if ((-(*__LONG_PREPASS== 0 ))||new_error){ if(qbevent){evnt(19700);if(r)goto S_21931;} do{ sub_put2( 16 ,NULL,byte_element((uint64)_FUNC_LINEFORMAT_STRING_X->chr,_FUNC_LINEFORMAT_STRING_X->len,byte_element_2762),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19701);}while(r); do{ *__LONG_DATAOFFSET=*__LONG_DATAOFFSET+_FUNC_LINEFORMAT_STRING_X->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19702);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,func_space((_FUNC_LINEFORMAT_STRING_X->len- 1 )* 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19704);}while(r); S_21935:; fornext_value2766= 1 ; fornext_finalvalue2766=_FUNC_LINEFORMAT_STRING_X->len- 1 ; fornext_step2766= 1 ; if (fornext_step2766<0) fornext_step_negative2766=1; else fornext_step_negative2766=0; if (new_error) goto fornext_error2766; goto fornext_entrylabel2766; while(1){ fornext_value2766=fornext_step2766+(*_FUNC_LINEFORMAT_LONG_EC); fornext_entrylabel2766: *_FUNC_LINEFORMAT_LONG_EC=fornext_value2766; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2766){ if (fornext_value2766fornext_finalvalue2766) break; } fornext_error2766:; if(qbevent){evnt(19705);if(r)goto S_21935;} do{ *_FUNC_LINEFORMAT_LONG_V1=qbs_asc(_FUNC_LINEFORMAT_STRING_X,*_FUNC_LINEFORMAT_LONG_EC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19707);}while(r); do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V1/ 16 ; if(!qbevent)break;evnt(19708);}while(r); S_21938:; if ((-(*_FUNC_LINEFORMAT_LONG_V2<= 9 ))||new_error){ if(qbevent){evnt(19708);if(r)goto S_21938;} do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2+ 48 ; if(!qbevent)break;evnt(19708);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2+ 55 ; if(!qbevent)break;evnt(19708);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_V1=*_FUNC_LINEFORMAT_LONG_V1& 15 ; if(!qbevent)break;evnt(19709);}while(r); S_21944:; if ((-(*_FUNC_LINEFORMAT_LONG_V1<= 9 ))||new_error){ if(qbevent){evnt(19709);if(r)goto S_21944;} do{ *_FUNC_LINEFORMAT_LONG_V1=*_FUNC_LINEFORMAT_LONG_V1+ 48 ; if(!qbevent)break;evnt(19709);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_V1=*_FUNC_LINEFORMAT_LONG_V1+ 55 ; if(!qbevent)break;evnt(19709);}while(r); } do{ tqbs=_FUNC_LINEFORMAT_STRING_E; if (!new_error){ tmp_fileno=(*_FUNC_LINEFORMAT_LONG_EC* 2 )-( 1 ); if (!new_error){ tmp_long=*_FUNC_LINEFORMAT_LONG_V1; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(19710);}while(r); do{ tqbs=_FUNC_LINEFORMAT_STRING_E; if (!new_error){ tmp_fileno=*_FUNC_LINEFORMAT_LONG_EC* 2 ; if (!new_error){ tmp_long=*_FUNC_LINEFORMAT_LONG_V2; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(19711);}while(r); } fornext_exit_2765:; } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("DATA",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19716);}while(r); S_21954:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_LINEFORMAT_STRING_E->len))||new_error){ if(qbevent){evnt(19716);if(r)goto S_21954;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("_",1)),_FUNC_LINEFORMAT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19716);}while(r); } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19717);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),func_mid(_FUNC_LINEFORMAT_STRING_CA,*_FUNC_LINEFORMAT_LONG_I,*_FUNC_LINEFORMAT_LONG_N2,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19721);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_N2; if(!qbevent)break;evnt(19722);}while(r); LABEL_EXTCHECK:; if(qbevent){evnt(19725);r=0;} S_21962:; if ((-(*_FUNC_LINEFORMAT_LONG_N2> 40 ))||new_error){ if(qbevent){evnt(19726);if(r)goto S_21962;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Identifier longer than 40 character limit",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19726);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19726);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_C3=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19727);}while(r); do{ *_FUNC_LINEFORMAT_LONG_M= 0 ; if(!qbevent)break;evnt(19728);}while(r); S_21968:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 126 ))||new_error){ if(qbevent){evnt(19729);if(r)goto S_21968;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,func_mid(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 , 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19730);}while(r); S_21970:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19731);if(r)goto S_21970;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19731);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19731);}while(r); } S_21974:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19732);if(r)goto S_21974;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19732);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19732);}while(r); } S_21978:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(19733);if(r)goto S_21978;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19733);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19733);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,func_chr(qbs_asc(_FUNC_LINEFORMAT_STRING_E2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19734);}while(r); S_21983:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19735);if(r)goto S_21983;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19735);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19735);}while(r); } S_21987:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19736);if(r)goto S_21987;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19736);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19736);}while(r); } S_21991:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19737);if(r)goto S_21991;} do{ *_FUNC_LINEFORMAT_LONG_M= 1 ; if(!qbevent)break;evnt(19737);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~`",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19737);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19737);}while(r); } } S_21997:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 37 ))||new_error){ if(qbevent){evnt(19739);if(r)goto S_21997;} do{ *_FUNC_LINEFORMAT_LONG_C4=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19740);}while(r); S_21999:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 37 ))||new_error){ if(qbevent){evnt(19741);if(r)goto S_21999;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19741);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19741);}while(r); } S_22003:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 38 ))||new_error){ if(qbevent){evnt(19742);if(r)goto S_22003;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19742);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19742);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19743);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19743);}while(r); } S_22010:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 38 ))||new_error){ if(qbevent){evnt(19745);if(r)goto S_22010;} do{ *_FUNC_LINEFORMAT_LONG_C4=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19746);}while(r); S_22012:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 38 ))||new_error){ if(qbevent){evnt(19747);if(r)goto S_22012;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19747);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19747);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19748);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19748);}while(r); } S_22019:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 33 ))||new_error){ if(qbevent){evnt(19750);if(r)goto S_22019;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19750);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19750);}while(r); } S_22023:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 35 ))||new_error){ if(qbevent){evnt(19751);if(r)goto S_22023;} do{ *_FUNC_LINEFORMAT_LONG_C4=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19752);}while(r); S_22025:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 35 ))||new_error){ if(qbevent){evnt(19753);if(r)goto S_22025;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19753);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19753);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19754);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19754);}while(r); } S_22032:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 36 ))||new_error){ if(qbevent){evnt(19756);if(r)goto S_22032;} do{ *_FUNC_LINEFORMAT_LONG_M= 1 ; if(!qbevent)break;evnt(19756);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19756);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19756);}while(r); } S_22037:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 96 ))||new_error){ if(qbevent){evnt(19757);if(r)goto S_22037;} do{ *_FUNC_LINEFORMAT_LONG_M= 1 ; if(!qbevent)break;evnt(19757);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("`",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19757);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(19757);}while(r); } S_22042:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I)== 46 )))||new_error){ if(qbevent){evnt(19761);if(r)goto S_22042;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19762);}while(r); S_22044:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19763);if(r)goto S_22044;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19765);}while(r); S_22046:; fornext_value2770=*_FUNC_LINEFORMAT_LONG_I+ 2 ; fornext_finalvalue2770=*_FUNC_LINEFORMAT_LONG_N; fornext_step2770= 1 ; if (fornext_step2770<0) fornext_step_negative2770=1; else fornext_step_negative2770=0; if (new_error) goto fornext_error2770; goto fornext_entrylabel2770; while(1){ fornext_value2770=fornext_step2770+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2770: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2770; if (fornext_step_negative2770){ if (fornext_value2770fornext_finalvalue2770) break; } fornext_error2770:; if(qbevent){evnt(19766);if(r)goto S_22046;} do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19767);}while(r); S_22048:; if ((~(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((*_FUNC_LINEFORMAT_LONG_C)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(19769);if(r)goto S_22048;} do{ goto fornext_exit_2769; if(!qbevent)break;evnt(19769);}while(r); } S_22051:; if ((-(*_FUNC_LINEFORMAT_LONG_C!= 95 ))||new_error){ if(qbevent){evnt(19770);if(r)goto S_22051;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I2; if(!qbevent)break;evnt(19770);}while(r); } } fornext_exit_2769:; do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len(".",1)),__STRING1_SP),func_mid(_FUNC_LINEFORMAT_STRING_CA,*_FUNC_LINEFORMAT_LONG_I+ 1 ,*_FUNC_LINEFORMAT_LONG_P2-(*_FUNC_LINEFORMAT_LONG_I+ 1 )+ 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19772);}while(r); do{ *_FUNC_LINEFORMAT_LONG_N2=*_FUNC_LINEFORMAT_LONG_N2+ 1 +(*_FUNC_LINEFORMAT_LONG_P2-(*_FUNC_LINEFORMAT_LONG_I+ 1 )+ 1 ); if(!qbevent)break;evnt(19773);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_P2+ 1 ; if(!qbevent)break;evnt(19774);}while(r); do{ goto LABEL_EXTCHECK; if(!qbevent)break;evnt(19775);}while(r); } } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19779);}while(r); LABEL_LFGETVE:; if(qbevent){evnt(19781);r=0;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+_FUNC_LINEFORMAT_STRING_E2->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19782);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,_FUNC_LINEFORMAT_STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19783);}while(r); S_22064:; if ((*_FUNC_LINEFORMAT_LONG_M)||new_error){ if(qbevent){evnt(19784);if(r)goto S_22064;} LABEL_LFGETVD:; if(qbevent){evnt(19785);r=0;} S_22065:; if ((-(*_FUNC_LINEFORMAT_LONG_I<*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19786);if(r)goto S_22065;} do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19787);}while(r); S_22067:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(19788);if(r)goto S_22067;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(_FUNC_LINEFORMAT_STRING_A2,func_chr(*_FUNC_LINEFORMAT_LONG_C))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19788);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19788);}while(r); do{ goto LABEL_LFGETVD; if(!qbevent)break;evnt(19788);}while(r); } } } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19792);}while(r); } } S_22077:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 32 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 9 )))||new_error){ if(qbevent){evnt(19799);if(r)goto S_22077;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19799);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19799);}while(r); } S_22081:; if ((((int32*)(__ARRAY_LONG_LFSINGLECHAR[0]))[array_check((*_FUNC_LINEFORMAT_LONG_C)-__ARRAY_LONG_LFSINGLECHAR[4],__ARRAY_LONG_LFSINGLECHAR[5])])||new_error){ if(qbevent){evnt(19803);if(r)goto S_22081;} S_22082:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 60 ))||new_error){ if(qbevent){evnt(19805);if(r)goto S_22082;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19806);}while(r); S_22084:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 61 ))||new_error){ if(qbevent){evnt(19807);if(r)goto S_22084;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("<=",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19807);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19807);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19807);}while(r); } S_22089:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 62 ))||new_error){ if(qbevent){evnt(19808);if(r)goto S_22089;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("<>",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19808);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19808);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19808);}while(r); } } S_22095:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 62 ))||new_error){ if(qbevent){evnt(19810);if(r)goto S_22095;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19811);}while(r); S_22097:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 61 ))||new_error){ if(qbevent){evnt(19812);if(r)goto S_22097;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len(">=",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19812);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19812);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19812);}while(r); } S_22102:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 60 ))||new_error){ if(qbevent){evnt(19813);if(r)goto S_22102;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("<>",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19813);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19813);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19813);}while(r); } } S_22108:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 61 ))||new_error){ if(qbevent){evnt(19815);if(r)goto S_22108;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19816);}while(r); S_22110:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 62 ))||new_error){ if(qbevent){evnt(19817);if(r)goto S_22110;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len(">=",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19817);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19817);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19817);}while(r); } S_22115:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 60 ))||new_error){ if(qbevent){evnt(19818);if(r)goto S_22115;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("<=",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19818);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19818);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19818);}while(r); } } S_22121:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_LINEFORMAT_LONG_C== 36 ))&(_FUNC_LINEFORMAT_STRING_A2->len)))||new_error){ if(qbevent){evnt(19821);if(r)goto S_22121;} do{ goto LABEL_BADUSAGE; if(!qbevent)break;evnt(19821);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),func_chr(*_FUNC_LINEFORMAT_LONG_C))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19823);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19824);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19825);}while(r); } LABEL_BADUSAGE:; if(qbevent){evnt(19827);r=0;} S_22128:; if ((-(*_FUNC_LINEFORMAT_LONG_C!= 39 ))||new_error){ if(qbevent){evnt(19829);if(r)goto S_22128;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unexpected character on line",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19829);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19829);}while(r); } do{ qbs_set(__STRING_LAYOUTCOMMENT,qbs_new_txt_len("'",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19832);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19833);}while(r); LABEL_COMMENT:; if(qbevent){evnt(19834);r=0;} S_22134:; if ((-(*_FUNC_LINEFORMAT_LONG_I>=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19835);if(r)goto S_22134;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19835);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_C,qbs_right(_FUNC_LINEFORMAT_STRING_A,_FUNC_LINEFORMAT_STRING_A->len-*_FUNC_LINEFORMAT_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19836);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_CC,qbs_right(_FUNC_LINEFORMAT_STRING_CA,_FUNC_LINEFORMAT_STRING_CA->len-*_FUNC_LINEFORMAT_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19837);}while(r); S_22139:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_C->len== 0 )))||new_error){ if(qbevent){evnt(19838);if(r)goto S_22139;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19838);}while(r); } do{ qbs_set(__STRING_LAYOUTCOMMENT,qbs_rtrim(qbs_add(__STRING_LAYOUTCOMMENT,_FUNC_LINEFORMAT_STRING_CC))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19839);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_C,qbs_ltrim(_FUNC_LINEFORMAT_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19841);}while(r); S_22144:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_C->len== 0 )))||new_error){ if(qbevent){evnt(19842);if(r)goto S_22144;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19842);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_AC=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19843);}while(r); S_22148:; if ((-(*_FUNC_LINEFORMAT_LONG_AC!= 36 ))||new_error){ if(qbevent){evnt(19844);if(r)goto S_22148;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19844);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_NOCASEC,qbs_ltrim(qbs_right(_FUNC_LINEFORMAT_STRING_CA,_FUNC_LINEFORMAT_STRING_CA->len-*_FUNC_LINEFORMAT_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19845);}while(r); do{ *_FUNC_LINEFORMAT_LONG_MEMMODE= 0 ; if(!qbevent)break;evnt(19846);}while(r); S_22153:; fornext_value2779= 1 ; fornext_finalvalue2779=_FUNC_LINEFORMAT_STRING_C->len; fornext_step2779= 1 ; if (fornext_step2779<0) fornext_step_negative2779=1; else fornext_step_negative2779=0; if (new_error) goto fornext_error2779; goto fornext_entrylabel2779; while(1){ fornext_value2779=fornext_step2779+(*_FUNC_LINEFORMAT_LONG_X); fornext_entrylabel2779: *_FUNC_LINEFORMAT_LONG_X=fornext_value2779; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2779){ if (fornext_value2779fornext_finalvalue2779) break; } fornext_error2779:; if(qbevent){evnt(19847);if(r)goto S_22153;} LABEL_MCNEXT:; if(qbevent){evnt(19848);r=0;} S_22154:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_LINEFORMAT_STRING_C,*_FUNC_LINEFORMAT_LONG_X, 1 ,1),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(19849);if(r)goto S_22154;} S_22155:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_LINEFORMAT_STRING_C,*_FUNC_LINEFORMAT_LONG_X, 7 ,1),qbs_new_txt_len("$STATIC",7))))||new_error){ if(qbevent){evnt(19853);if(r)goto S_22155;} do{ *_FUNC_LINEFORMAT_LONG_MEMMODE= 1 ; if(!qbevent)break;evnt(19854);}while(r); do{ *_FUNC_LINEFORMAT_LONG_XX=func_instr(*_FUNC_LINEFORMAT_LONG_X+ 1 ,_FUNC_LINEFORMAT_STRING_C,qbs_new_txt_len("$",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19855);}while(r); S_22158:; if ((-(*_FUNC_LINEFORMAT_LONG_XX== 0 ))||new_error){ if(qbevent){evnt(19856);if(r)goto S_22158;} do{ goto fornext_exit_2778; if(!qbevent)break;evnt(19856);}while(r); }else{ } do{ *_FUNC_LINEFORMAT_LONG_X=*_FUNC_LINEFORMAT_LONG_XX; if(!qbevent)break;evnt(19857);}while(r); do{ goto LABEL_MCNEXT; if(!qbevent)break;evnt(19857);}while(r); } S_22165:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_LINEFORMAT_STRING_C,*_FUNC_LINEFORMAT_LONG_X, 8 ,1),qbs_new_txt_len("$DYNAMIC",8))))||new_error){ if(qbevent){evnt(19860);if(r)goto S_22165;} do{ *_FUNC_LINEFORMAT_LONG_MEMMODE= 2 ; if(!qbevent)break;evnt(19861);}while(r); do{ *_FUNC_LINEFORMAT_LONG_XX=func_instr(*_FUNC_LINEFORMAT_LONG_X+ 1 ,_FUNC_LINEFORMAT_STRING_C,qbs_new_txt_len("$",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19862);}while(r); S_22168:; if ((-(*_FUNC_LINEFORMAT_LONG_XX== 0 ))||new_error){ if(qbevent){evnt(19863);if(r)goto S_22168;} do{ goto fornext_exit_2778; if(!qbevent)break;evnt(19863);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_X=*_FUNC_LINEFORMAT_LONG_XX; if(!qbevent)break;evnt(19864);}while(r); do{ goto LABEL_MCNEXT; if(!qbevent)break;evnt(19864);}while(r); } S_22174:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_LINEFORMAT_STRING_C,*_FUNC_LINEFORMAT_LONG_X, 8 ,1),qbs_new_txt_len("$INCLUDE",8))))||new_error){ if(qbevent){evnt(19867);if(r)goto S_22174;} S_22175:; fornext_value2782=*_FUNC_LINEFORMAT_LONG_X+ 8 ; fornext_finalvalue2782=_FUNC_LINEFORMAT_STRING_C->len; fornext_step2782= 1 ; if (fornext_step2782<0) fornext_step_negative2782=1; else fornext_step_negative2782=0; if (new_error) goto fornext_error2782; goto fornext_entrylabel2782; while(1){ fornext_value2782=fornext_step2782+(*_FUNC_LINEFORMAT_LONG_XX); fornext_entrylabel2782: *_FUNC_LINEFORMAT_LONG_XX=fornext_value2782; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2782){ if (fornext_value2782fornext_finalvalue2782) break; } fornext_error2782:; if(qbevent){evnt(19871);if(r)goto S_22175;} do{ *_FUNC_LINEFORMAT_LONG_AC=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_C,*_FUNC_LINEFORMAT_LONG_XX, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19872);}while(r); S_22177:; if ((-(*_FUNC_LINEFORMAT_LONG_AC== 58 ))||new_error){ if(qbevent){evnt(19873);if(r)goto S_22177;} do{ goto fornext_exit_2781; if(!qbevent)break;evnt(19873);}while(r); } S_22180:; if (((-(*_FUNC_LINEFORMAT_LONG_AC!= 32 ))&(-(*_FUNC_LINEFORMAT_LONG_AC!= 9 )))||new_error){ if(qbevent){evnt(19874);if(r)goto S_22180;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19874);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19874);}while(r); } } fornext_exit_2781:; do{ *_FUNC_LINEFORMAT_LONG_X=*_FUNC_LINEFORMAT_LONG_XX; if(!qbevent)break;evnt(19876);}while(r); S_22186:; fornext_value2785=*_FUNC_LINEFORMAT_LONG_X+ 1 ; fornext_finalvalue2785=_FUNC_LINEFORMAT_STRING_C->len; fornext_step2785= 1 ; if (fornext_step2785<0) fornext_step_negative2785=1; else fornext_step_negative2785=0; if (new_error) goto fornext_error2785; goto fornext_entrylabel2785; while(1){ fornext_value2785=fornext_step2785+(*_FUNC_LINEFORMAT_LONG_XX); fornext_entrylabel2785: *_FUNC_LINEFORMAT_LONG_XX=fornext_value2785; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2785){ if (fornext_value2785fornext_finalvalue2785) break; } fornext_error2785:; if(qbevent){evnt(19878);if(r)goto S_22186;} do{ *_FUNC_LINEFORMAT_LONG_AC=qbs_asc(func_mid(_FUNC_LINEFORMAT_STRING_C,*_FUNC_LINEFORMAT_LONG_XX, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19879);}while(r); S_22188:; if ((-(*_FUNC_LINEFORMAT_LONG_AC== 39 ))||new_error){ if(qbevent){evnt(19880);if(r)goto S_22188;} do{ goto fornext_exit_2784; if(!qbevent)break;evnt(19880);}while(r); } S_22191:; if (((-(*_FUNC_LINEFORMAT_LONG_AC!= 32 ))&(-(*_FUNC_LINEFORMAT_LONG_AC!= 9 )))||new_error){ if(qbevent){evnt(19881);if(r)goto S_22191;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19881);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19881);}while(r); } } fornext_exit_2784:; do{ *_FUNC_LINEFORMAT_LONG_X=*_FUNC_LINEFORMAT_LONG_XX; if(!qbevent)break;evnt(19883);}while(r); do{ *_FUNC_LINEFORMAT_LONG_XX=func_instr(*_FUNC_LINEFORMAT_LONG_X+ 1 ,_FUNC_LINEFORMAT_STRING_C,qbs_new_txt_len("'",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19884);}while(r); S_22198:; if ((-(*_FUNC_LINEFORMAT_LONG_XX== 0 ))||new_error){ if(qbevent){evnt(19885);if(r)goto S_22198;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19885);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19885);}while(r); } do{ qbs_set(__STRING_ADDMETAINCLUDE,func_mid(_FUNC_LINEFORMAT_STRING_NOCASEC,*_FUNC_LINEFORMAT_LONG_X+ 1 ,*_FUNC_LINEFORMAT_LONG_XX-*_FUNC_LINEFORMAT_LONG_X- 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19886);}while(r); S_22203:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19887);if(r)goto S_22203;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19887);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19887);}while(r); } do{ goto LABEL_MCFINAL; if(!qbevent)break;evnt(19888);}while(r); } } } fornext_exit_2778:; LABEL_MCFINAL:; if(qbevent){evnt(19895);r=0;} S_22211:; if ((-(*_FUNC_LINEFORMAT_LONG_MEMMODE== 1 ))||new_error){ if(qbevent){evnt(19897);if(r)goto S_22211;} do{ *__INTEGER_ADDMETASTATIC= 1 ; if(!qbevent)break;evnt(19897);}while(r); } S_22214:; if ((-(*_FUNC_LINEFORMAT_LONG_MEMMODE== 2 ))||new_error){ if(qbevent){evnt(19898);if(r)goto S_22214;} do{ *__INTEGER_ADDMETADYNAMIC= 1 ; if(!qbevent)break;evnt(19898);}while(r); } do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19900);}while(r); LABEL_LINEFORMATDONE:; if(qbevent){evnt(19904);r=0;} S_22218:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_LINEFORMAT_STRING_A2->len))||new_error){ if(qbevent){evnt(19908);if(r)goto S_22218;} S_22219:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_LINEFORMAT_STRING_A2, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(19909);if(r)goto S_22219;} do{ *__LONG_LINECONTINUATION= 1 ; if(!qbevent)break;evnt(19911);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19912);}while(r); S_22222:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_A2->len>= 2 )))||new_error){ if(qbevent){evnt(19915);if(r)goto S_22222;} S_22223:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(_FUNC_LINEFORMAT_STRING_A2, 2 )),(qbs_add(__STRING1_SP,qbs_new_txt_len("_",1))))))||new_error){ if(qbevent){evnt(19916);if(r)goto S_22223;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_left(_FUNC_LINEFORMAT_STRING_A2,_FUNC_LINEFORMAT_STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19916);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_left(_FUNC_LINEFORMAT_STRING_A2,_FUNC_LINEFORMAT_STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19918);}while(r); S_22228:; if ((*__LONG_INCLEVEL)||new_error){ if(qbevent){evnt(19920);if(r)goto S_22228;} do{ *_FUNC_LINEFORMAT_LONG_FH= 99 +*__LONG_INCLEVEL; if(!qbevent)break;evnt(19921);}while(r); S_22230:; if ((func_eof(*_FUNC_LINEFORMAT_LONG_FH))||new_error){ if(qbevent){evnt(19922);if(r)goto S_22230;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19922);}while(r); } do{ tmp_fileno=*_FUNC_LINEFORMAT_LONG_FH; if (new_error) goto skip2791; sub_file_line_input_string(tmp_fileno,_FUNC_LINEFORMAT_STRING_A); if (new_error) goto skip2791; skip2791: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19923);}while(r); do{ tmp_long=array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5]); if (!new_error) ((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[tmp_long]=((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]+ 1 ; if(!qbevent)break;evnt(19924);}while(r); do{ goto LABEL_INCLUDECONT; if(!qbevent)break;evnt(19925);}while(r); } S_22237:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(19928);if(r)goto S_22237;} do{ qbs_set(__STRING_IDECOMMAND,func_chr( 100 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19929);}while(r); do{ *_FUNC_LINEFORMAT_LONG_IGNORE=FUNC_IDE(&(pass2792= 0 )); if(!qbevent)break;evnt(19930);}while(r); do{ *__LONG_IDEERROR= 0 ; if(!qbevent)break;evnt(19931);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_A,__STRING_IDERETURN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19932);}while(r); S_22242:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19933);if(r)goto S_22242;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19933);}while(r); } }else{ do{ qbs_set(_FUNC_LINEFORMAT_STRING_A,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19935);}while(r); S_22247:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A,func_chr( 13 ))))||new_error){ if(qbevent){evnt(19936);if(r)goto S_22247;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(19936);}while(r); } } do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER+ 1 ; if(!qbevent)break;evnt(19939);}while(r); LABEL_INCLUDECONT:; if(qbevent){evnt(19941);r=0;} do{ *_FUNC_LINEFORMAT_LONG_CONTLINE= 1 ; if(!qbevent)break;evnt(19943);}while(r); do{ goto LABEL_CONTINUELINE; if(!qbevent)break;evnt(19944);}while(r); } } LABEL_LINEFORMATDONE2:; if(qbevent){evnt(19948);r=0;} S_22256:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_A2, 1 ),__STRING1_SP)))||new_error){ if(qbevent){evnt(19949);if(r)goto S_22256;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_right(_FUNC_LINEFORMAT_STRING_A2,_FUNC_LINEFORMAT_STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19949);}while(r); } S_22259:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_LINEFORMAT_STRING_A2, 1 ),qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(19952);if(r)goto S_22259;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_add(qbs_add(_FUNC_LINEFORMAT_STRING_A2,__STRING1_SP),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19952);}while(r); } S_22262:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(19954);if(r)goto S_22262;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2794; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("lineformat():return:",20),_FUNC_LINEFORMAT_STRING_A2), 0 , 0 , 1 ); if (new_error) goto skip2794; skip2794: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(19954);}while(r); } S_22265:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19955);if(r)goto S_22265;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19955);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_LINEFORMAT,_FUNC_LINEFORMAT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19956);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free44.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_LINEFORMAT_STRING_LINEFORMAT);return _FUNC_LINEFORMAT_STRING_LINEFORMAT; } void SUB_MAKEIDREFER(qbs*_SUB_MAKEIDREFER_STRING_REF,int32*_SUB_MAKEIDREFER_LONG_TYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data45.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_MAKEIDREFER_STRING_REF,FUNC_STR2(__LONG_CURRENTID)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19962);}while(r); do{ *_SUB_MAKEIDREFER_LONG_TYP=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(19963);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free45.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_NUMELEMENTS(qbs*_FUNC_NUMELEMENTS_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data46.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_22271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_NUMELEMENTS_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19967);if(r)goto S_22271;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19967);}while(r); } do{ *_FUNC_NUMELEMENTS_LONG_N= 1 ; if(!qbevent)break;evnt(19968);}while(r); do{ *_FUNC_NUMELEMENTS_LONG_P= 1 ; if(!qbevent)break;evnt(19969);}while(r); LABEL_NUMELEMENTSNEXT:; if(qbevent){evnt(19970);r=0;} do{ *_FUNC_NUMELEMENTS_LONG_I=func_instr(*_FUNC_NUMELEMENTS_LONG_P,_FUNC_NUMELEMENTS_STRING_A,__STRING1_SP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19971);}while(r); S_22277:; if ((-(*_FUNC_NUMELEMENTS_LONG_I== 0 ))||new_error){ if(qbevent){evnt(19972);if(r)goto S_22277;} do{ *_FUNC_NUMELEMENTS_LONG_NUMELEMENTS=*_FUNC_NUMELEMENTS_LONG_N; if(!qbevent)break;evnt(19972);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19972);}while(r); } do{ *_FUNC_NUMELEMENTS_LONG_N=*_FUNC_NUMELEMENTS_LONG_N+ 1 ; if(!qbevent)break;evnt(19973);}while(r); do{ *_FUNC_NUMELEMENTS_LONG_P=*_FUNC_NUMELEMENTS_LONG_I+ 1 ; if(!qbevent)break;evnt(19974);}while(r); do{ goto LABEL_NUMELEMENTSNEXT; if(!qbevent)break;evnt(19975);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free46.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_NUMELEMENTS_LONG_NUMELEMENTS; } int32 FUNC_OPERATORUSAGE(qbs*_FUNC_OPERATORUSAGE_STRING_OPERATOR,int32*_FUNC_OPERATORUSAGE_LONG_TYP,qbs*_FUNC_OPERATORUSAGE_STRING_INFO,int32*_FUNC_OPERATORUSAGE_LONG_LHS,int32*_FUNC_OPERATORUSAGE_LONG_RHS,int32*_FUNC_OPERATORUSAGE_LONG_RESULT){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data47.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 7 ; if(!qbevent)break;evnt(19979);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 7 ; if(!qbevent)break;evnt(19979);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 0 ; if(!qbevent)break;evnt(19979);}while(r); S_22287:; if (((*_FUNC_OPERATORUSAGE_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(19995);if(r)goto S_22287;} do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 4 ; if(!qbevent)break;evnt(19996);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 4 ; if(!qbevent)break;evnt(19996);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 4 ; if(!qbevent)break;evnt(19997);}while(r); S_22291:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(19998);if(r)goto S_22291;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_add",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19998);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(19998);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19998);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 8 ; if(!qbevent)break;evnt(19999);}while(r); S_22297:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(20000);if(r)goto S_22297;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_equal",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20000);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20000);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20000);}while(r); } S_22302:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(20001);if(r)goto S_22302;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_notequal",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20001);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20001);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20001);}while(r); } S_22307:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(20002);if(r)goto S_22307;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_greaterthan",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20002);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20002);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20002);}while(r); } S_22312:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(20003);if(r)goto S_22312;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_lessthan",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20003);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20003);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20003);}while(r); } S_22317:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(20004);if(r)goto S_22317;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_greaterorequal",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20004);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20004);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20004);}while(r); } S_22322:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(20005);if(r)goto S_22322;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_lessorequal",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20005);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20005);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20005);}while(r); } S_22327:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(20006);if(r)goto S_22327;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2799; sub_file_print(tmp_fileno,qbs_new_txt_len("INVALID STRING OPERATOR!",24), 0 , 0 , 1 ); if (new_error) goto skip2799; skip2799: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(20006);}while(r); do{ sub_end(); if(!qbevent)break;evnt(20006);}while(r); } } do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 1 + 2 ; if(!qbevent)break;evnt(20010);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 1 + 2 ; if(!qbevent)break;evnt(20010);}while(r); S_22334:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(20011);if(r)goto S_22334;} do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 2 ; if(!qbevent)break;evnt(20011);}while(r); do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("pow2",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20011);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20011);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20011);}while(r); } S_22340:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("\361",1))))||new_error){ if(qbevent){evnt(20012);if(r)goto S_22340;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20012);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 5 ; if(!qbevent)break;evnt(20012);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20012);}while(r); } S_22345:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(20013);if(r)goto S_22345;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("/ ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20014);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20014);}while(r); S_22348:; if (((*_FUNC_OPERATORUSAGE_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(20017);if(r)goto S_22348;} do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 2 ; if(!qbevent)break;evnt(20019);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 1 + 2 ; if(!qbevent)break;evnt(20020);}while(r); }else{ do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 1 + 2 ; if(!qbevent)break;evnt(20023);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 2 ; if(!qbevent)break;evnt(20024);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 2 ; if(!qbevent)break;evnt(20026);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20027);}while(r); } S_22358:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(20029);if(r)goto S_22358;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("*",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20029);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20029);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20029);}while(r); } S_22363:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(20030);if(r)goto S_22363;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("+",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20030);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20030);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20030);}while(r); } S_22368:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(20031);if(r)goto S_22368;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20031);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20031);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20031);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 8 ; if(!qbevent)break;evnt(20033);}while(r); S_22374:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(20034);if(r)goto S_22374;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("==",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20034);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20034);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20034);}while(r); } S_22379:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(20035);if(r)goto S_22379;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len(">",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20035);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20035);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20035);}while(r); } S_22384:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(20036);if(r)goto S_22384;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("<",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20036);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20036);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20036);}while(r); } S_22389:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(20037);if(r)goto S_22389;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("!=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20037);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20037);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20037);}while(r); } S_22394:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(20038);if(r)goto S_22394;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("<=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20038);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20038);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20038);}while(r); } S_22399:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(20039);if(r)goto S_22399;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len(">=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20039);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20039);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20039);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 1 ; if(!qbevent)break;evnt(20041);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 1 ; if(!qbevent)break;evnt(20041);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 1 ; if(!qbevent)break;evnt(20041);}while(r); S_22407:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(20042);if(r)goto S_22407;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20042);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20042);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20042);}while(r); } S_22412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(20043);if(r)goto S_22412;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("/ ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20043);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20043);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20043);}while(r); } S_22417:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(20044);if(r)goto S_22417;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("|",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20044);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 4 ; if(!qbevent)break;evnt(20044);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20044);}while(r); } S_22422:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(20045);if(r)goto S_22422;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("^",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20045);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 4 ; if(!qbevent)break;evnt(20045);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20045);}while(r); } S_22427:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(20046);if(r)goto S_22427;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("^",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20046);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20046);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20046);}while(r); } S_22432:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(20047);if(r)goto S_22432;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("|",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20047);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20047);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20047);}while(r); } S_22437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(20048);if(r)goto S_22437;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20048);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20048);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20048);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 7 ; if(!qbevent)break;evnt(20050);}while(r); S_22443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(20051);if(r)goto S_22443;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("~",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20051);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 5 ; if(!qbevent)break;evnt(20051);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20051);}while(r); } S_22448:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(20053);if(r)goto S_22448;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2800; sub_file_print(tmp_fileno,qbs_new_txt_len("INVALID NUMBERIC OPERATOR!",26), 0 , 0 , 1 ); if (new_error) goto skip2800; skip2800: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(20053);}while(r); do{ sub_end(); if(!qbevent)break;evnt(20053);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free47.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE; } qbs* FUNC_REFER(qbs*_FUNC_REFER_STRING_A2,int32*_FUNC_REFER_LONG_TYP,int32*_FUNC_REFER_LONG_METHOD){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data48.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_REFER_LONG_TYPBAK=*_FUNC_REFER_LONG_TYP; if(!qbevent)break;evnt(20058);}while(r); do{ qbs_set(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20062);}while(r); do{ *_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20065);}while(r); S_22455:; if ((*_FUNC_REFER_LONG_I)||new_error){ if(qbevent){evnt(20066);if(r)goto S_22455;} do{ *_FUNC_REFER_LONG_IDNUMBER=qbr(func_val(qbs_left(_FUNC_REFER_STRING_A,*_FUNC_REFER_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20067);}while(r); do{ qbs_set(_FUNC_REFER_STRING_A,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20067);}while(r); }else{ do{ *_FUNC_REFER_LONG_IDNUMBER=qbr(func_val(_FUNC_REFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20069);}while(r); } do{ SUB_GETID(_FUNC_REFER_LONG_IDNUMBER); if(!qbevent)break;evnt(20071);}while(r); S_22462:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(20072);if(r)goto S_22462;} do{ goto exit_subfunc; if(!qbevent)break;evnt(20072);}while(r); } S_22465:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(20075);if(r)goto S_22465;} S_22466:; if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(20076);if(r)goto S_22466;} do{ qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20077);}while(r); S_22468:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(20078);if(r)goto S_22468;} do{ qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_REFER_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20078);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_N,qbs_add(FUNC_SCOPE(),_FUNC_REFER_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20079);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20080);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20081);}while(r); } do{ *_FUNC_REFER_LONG_U=qbr(func_val(_FUNC_REFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20086);}while(r); do{ *_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20087);}while(r); do{ qbs_set(_FUNC_REFER_STRING_A,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20087);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_REFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20087);}while(r); do{ *_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20088);}while(r); do{ qbs_set(_FUNC_REFER_STRING_O,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20088);}while(r); do{ qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20089);}while(r); S_22482:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(20089);if(r)goto S_22482;} do{ qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20089);}while(r); } S_22485:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(20090);if(r)goto S_22485;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("User defined types in expressions are invalid",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20090);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20090);}while(r); } S_22489:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(20091);if(r)goto S_22489;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot resolve bit-length variables inside user defined types yet",65)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20091);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20091);}while(r); } S_22493:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(20093);if(r)goto S_22493;} do{ qbs_set(_FUNC_REFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((uint8*)",10),FUNC_SCOPE()),_FUNC_REFER_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_REFER_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20094);}while(r); do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_new_fixed(",14),_FUNC_REFER_STRING_O2),qbs_new_txt_len(",",1)),FUNC_STR2((&(((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])])))),qbs_new_txt_len(",1)",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20095);}while(r); do{ *_FUNC_REFER_LONG_TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(20096);}while(r); }else{ do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISUDT-*__LONG_ISREFERENCE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20098);}while(r); S_22499:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(20099);if(r)goto S_22499;} do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISARRAY; if(!qbevent)break;evnt(20099);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_T,FUNC_TYP2CTYP(_FUNC_REFER_LONG_TYP,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20100);}while(r); S_22503:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(20101);if(r)goto S_22503;} do{ goto exit_subfunc; if(!qbevent)break;evnt(20101);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_REFER_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_REFER_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20102);}while(r); do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),qbs_new_txt_len("(",1)),_FUNC_REFER_STRING_T),qbs_new_txt_len("*)",2)),_FUNC_REFER_STRING_O2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20103);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20107);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20108);}while(r); } S_22512:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(20113);if(r)goto S_22512;} do{ qbs_set(_FUNC_REFER_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20115);}while(r); S_22514:; if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(20116);if(r)goto S_22514;} do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20117);}while(r); do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK; if(!qbevent)break;evnt(20118);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20119);}while(r); } do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISPOINTER-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(20121);}while(r); S_22520:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(20123);if(r)goto S_22520;} S_22521:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(20124);if(r)goto S_22521;} do{ qbs_set(_FUNC_REFER_STRING_OFFSET,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("&((uint8*)(",11),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]))[(",7)),_FUNC_REFER_STRING_A),qbs_new_txt_len(")*",2)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20125);}while(r); do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_new_fixed(",14),_FUNC_REFER_STRING_OFFSET),qbs_new_txt_len(",",1)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))),qbs_new_txt_len(",1)",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20126);}while(r); }else{ do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((qbs*)(((uint64*)(",19),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]))[",6)),_FUNC_REFER_STRING_A),qbs_new_txt_len("]))",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20128);}while(r); } do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(20130);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20131);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20132);}while(r); } S_22531:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(20135);if(r)goto S_22531;} S_22532:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(20138);if(r)goto S_22532;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_new_txt_len("getubits",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20138);}while(r); }else{ do{ qbs_set(_FUNC_REFER_STRING_R,qbs_new_txt_len("getbits",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20138);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(_FUNC_REFER_STRING_R,qbs_new_txt_len("(",1)),FUNC_STR2(&(pass2805=*_FUNC_REFER_LONG_TYP& 511 ))),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20139);}while(r); do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_REFER_STRING_R,qbs_new_txt_len("(uint8*)(",9)),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0])",4)),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20140);}while(r); do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(_FUNC_REFER_STRING_R,_FUNC_REFER_STRING_A),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20141);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20142);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20143);}while(r); }else{ do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20145);}while(r); S_22544:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(20146);if(r)goto S_22544;} S_22545:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(20147);if(r)goto S_22545;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20147);}while(r); } S_22548:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(20148);if(r)goto S_22548;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20148);}while(r); } S_22551:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 256 ))||new_error){ if(qbevent){evnt(20149);if(r)goto S_22551;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20149);}while(r); } }else{ S_22555:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(20151);if(r)goto S_22555;} S_22556:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(20152);if(r)goto S_22556;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint8",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20152);}while(r); } S_22559:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(20153);if(r)goto S_22559;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint16",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20153);}while(r); } S_22562:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(20154);if(r)goto S_22562;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20154);}while(r); } S_22565:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(20155);if(r)goto S_22565;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint64",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20155);}while(r); } S_22568:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(20156);if(r)goto S_22568;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20156);}while(r); } }else{ S_22572:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(20158);if(r)goto S_22572;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20158);}while(r); } S_22575:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(20159);if(r)goto S_22575;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20159);}while(r); } S_22578:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(20160);if(r)goto S_22578;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20160);}while(r); } S_22581:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(20161);if(r)goto S_22581;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20161);}while(r); } S_22584:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(20162);if(r)goto S_22584;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20162);}while(r); } } } } S_22590:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_REFER_STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(20166);if(r)goto S_22590;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot find C type to return array data",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20166);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20166);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_FUNC_REFER_STRING_T),qbs_new_txt_len("*)(",3)),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]))[",6)),_FUNC_REFER_STRING_A),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20167);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20168);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20169);}while(r); } S_22598:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(20173);if(r)goto S_22598;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20174);}while(r); do{ *_FUNC_REFER_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(20175);}while(r); S_22601:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(20177);if(r)goto S_22601;} do{ *_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(20177);}while(r); } S_22604:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(20179);if(r)goto S_22604;} S_22605:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(20180);if(r)goto S_22605;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING",6)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20181);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20181);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING_",7)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20183);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20183);}while(r); } S_22612:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(20186);if(r)goto S_22612;} S_22613:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(20187);if(r)goto S_22613;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UBIT",4)),FUNC_STR2(&(pass2806=*_FUNC_REFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20188);}while(r); }else{ do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("BIT",3)),FUNC_STR2(&(pass2807=*_FUNC_REFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20190);}while(r); } do{ goto LABEL_REF; if(!qbevent)break;evnt(20192);}while(r); } S_22620:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_BYTETYPE))||new_error){ if(qbevent){evnt(20194);if(r)goto S_22620;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("BYTE_",5)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20194);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20194);}while(r); } S_22624:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UBYTETYPE))||new_error){ if(qbevent){evnt(20195);if(r)goto S_22624;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UBYTE_",6)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20195);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20195);}while(r); } S_22628:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGERTYPE))||new_error){ if(qbevent){evnt(20196);if(r)goto S_22628;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("INTEGER_",8)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20196);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20196);}while(r); } S_22632:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGERTYPE))||new_error){ if(qbevent){evnt(20197);if(r)goto S_22632;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UINTEGER_",9)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20197);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20197);}while(r); } S_22636:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_LONGTYPE))||new_error){ if(qbevent){evnt(20198);if(r)goto S_22636;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("LONG_",5)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20198);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20198);}while(r); } S_22640:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_ULONGTYPE))||new_error){ if(qbevent){evnt(20199);if(r)goto S_22640;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("ULONG_",6)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20199);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20199);}while(r); } S_22644:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGER64TYPE))||new_error){ if(qbevent){evnt(20200);if(r)goto S_22644;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("INTEGER64_",10)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20200);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20200);}while(r); } S_22648:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGER64TYPE))||new_error){ if(qbevent){evnt(20201);if(r)goto S_22648;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UINTEGER64_",11)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20201);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20201);}while(r); } S_22652:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_SINGLETYPE))||new_error){ if(qbevent){evnt(20202);if(r)goto S_22652;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("SINGLE_",7)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20202);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20202);}while(r); } S_22656:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_DOUBLETYPE))||new_error){ if(qbevent){evnt(20203);if(r)goto S_22656;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("DOUBLE_",7)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20203);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20203);}while(r); } S_22660:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_FLOATTYPE))||new_error){ if(qbevent){evnt(20204);if(r)goto S_22660;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("FLOAT_",6)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20204);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20204);}while(r); } S_22664:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_OFFSETTYPE))||new_error){ if(qbevent){evnt(20205);if(r)goto S_22664;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("OFFSET_",7)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20205);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20205);}while(r); } S_22668:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UOFFSETTYPE))||new_error){ if(qbevent){evnt(20206);if(r)goto S_22668;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UOFFSET_",8)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20206);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20206);}while(r); } LABEL_REF:; if(qbevent){evnt(20207);r=0;} S_22672:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(20208);if(r)goto S_22672;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(20208);}while(r); } S_22675:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(20209);if(r)goto S_22675;} do{ *_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20209);}while(r); } do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_T; if(!qbevent)break;evnt(20210);}while(r); S_22679:; if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(20211);if(r)goto S_22679;} S_22680:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_REFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(20212);if(r)goto S_22680;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_right(_FUNC_REFER_STRING_R,_FUNC_REFER_STRING_R->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20212);}while(r); } do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK; if(!qbevent)break;evnt(20213);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20215);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20216);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free48.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_REFER_STRING_REFER);return _FUNC_REFER_STRING_REFER; } void SUB_REGID(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data49.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_IDN=*__LONG_IDN+ 1 ; if(!qbevent)break;evnt(20224);}while(r); S_22689:; if ((-(*__LONG_IDN>*__LONG_IDS_MAX))||new_error){ if(qbevent){evnt(20226);if(r)goto S_22689;} do{ *__LONG_IDS_MAX=*__LONG_IDS_MAX* 2 ; if(!qbevent)break;evnt(20227);}while(r); do{ if (__ARRAY_UDT_IDS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_IDS[2]&1){ preserved_elements=__ARRAY_UDT_IDS[5]; } else preserved_elements=0; __ARRAY_UDT_IDS[4]= 1 ; __ARRAY_UDT_IDS[5]=(*__LONG_IDS_MAX)-__ARRAY_UDT_IDS[4]+1; __ARRAY_UDT_IDS[6]=1; if (__ARRAY_UDT_IDS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_IDS[0]),preserved_elements*22880/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDS[0])); tmp_long=__ARRAY_UDT_IDS[5]; __ARRAY_UDT_IDS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*22880/8+1); memcpy((void*)(__ARRAY_UDT_IDS[0]),redim_preserve_cmem_buffer,preserved_elements*22880/8+1); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER_CMEMLIST[2]&1){ preserved_elements=__ARRAY_INTEGER_CMEMLIST[5]; } else preserved_elements=0; __ARRAY_INTEGER_CMEMLIST[4]= 1 ; __ARRAY_INTEGER_CMEMLIST[5]=(*__LONG_IDS_MAX+ 1 )-__ARRAY_INTEGER_CMEMLIST[4]+1; __ARRAY_INTEGER_CMEMLIST[6]=1; if (__ARRAY_INTEGER_CMEMLIST[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER_CMEMLIST[0]),preserved_elements*2); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_CMEMLIST[0])); tmp_long=__ARRAY_INTEGER_CMEMLIST[5]; __ARRAY_INTEGER_CMEMLIST[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2); memcpy((void*)(__ARRAY_INTEGER_CMEMLIST[0]),redim_preserve_cmem_buffer,preserved_elements*2); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING100_SFCMEMARGS[2]&1){ preserved_elements=__ARRAY_STRING100_SFCMEMARGS[5]; } else preserved_elements=0; __ARRAY_STRING100_SFCMEMARGS[4]= 1 ; __ARRAY_STRING100_SFCMEMARGS[5]=(*__LONG_IDS_MAX+ 1 )-__ARRAY_STRING100_SFCMEMARGS[4]+1; __ARRAY_STRING100_SFCMEMARGS[6]=1; if (__ARRAY_STRING100_SFCMEMARGS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_STRING100_SFCMEMARGS[0]),preserved_elements*100); cmem_dynamic_free((uint8*)(__ARRAY_STRING100_SFCMEMARGS[0])); tmp_long=__ARRAY_STRING100_SFCMEMARGS[5]; __ARRAY_STRING100_SFCMEMARGS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*100); memcpy((void*)(__ARRAY_STRING100_SFCMEMARGS[0]),redim_preserve_cmem_buffer,preserved_elements*100); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER_ARRAYELEMENTSLIST[2]&1){ preserved_elements=__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]; } else preserved_elements=0; __ARRAY_INTEGER_ARRAYELEMENTSLIST[4]= 1 ; __ARRAY_INTEGER_ARRAYELEMENTSLIST[5]=(*__LONG_IDS_MAX+ 1 )-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4]+1; __ARRAY_INTEGER_ARRAYELEMENTSLIST[6]=1; if (__ARRAY_INTEGER_ARRAYELEMENTSLIST[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]),preserved_elements*2); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0])); tmp_long=__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]; __ARRAY_INTEGER_ARRAYELEMENTSLIST[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2); memcpy((void*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]),redim_preserve_cmem_buffer,preserved_elements*2); if (preserved_elementslen== 0 )))||new_error){ if(qbevent){evnt(20319);if(r)goto S_22786;} S_22787:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20320);if(r)goto S_22787;} S_22788:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20322);if(r)goto S_22788;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20322);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20322);}while(r); } }else{ do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20324);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20324);}while(r); } } S_22797:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_REGID_STRING_MUSTHAVE,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20327);if(r)goto S_22797;} S_22798:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20328);if(r)goto S_22798;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20328);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20328);}while(r); } }else{ S_22803:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20331);if(r)goto S_22803;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20331);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20331);}while(r); } } } S_22809:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 1024 )||new_error){ if(qbevent){evnt(20336);if(r)goto S_22809;} do{ *_SUB_REGID_LONG_SCOPE1=((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]; if(!qbevent)break;evnt(20337);}while(r); S_22811:; if (((((-(*_SUB_REGID_LONG_SCOPE1== 0 ))&(-(*__LONG_ALLOWLOCALNAME== 0 ))))|(-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2)))||new_error){ if(qbevent){evnt(20338);if(r)goto S_22811;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20338);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20338);}while(r); } } S_22816:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 2048 )||new_error){ if(qbevent){evnt(20342);if(r)goto S_22816;} do{ *_SUB_REGID_LONG_ASTYPE1= 0 ; if(!qbevent)break;evnt(20343);}while(r); S_22818:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1))== 32 )))||new_error){ if(qbevent){evnt(20343);if(r)goto S_22818;} do{ *_SUB_REGID_LONG_ASTYPE1= 1 ; if(!qbevent)break;evnt(20343);}while(r); } do{ *_SUB_REGID_LONG_SCOPE1=*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2638)); if(!qbevent)break;evnt(20344);}while(r); S_22822:; if (((-(*_SUB_REGID_LONG_ASTYPE1== 1 ))&(-(*_SUB_REGID_LONG_ASTYPE2== 1 )))||new_error){ if(qbevent){evnt(20345);if(r)goto S_22822;} S_22823:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20346);if(r)goto S_22823;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20346);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20346);}while(r); } } S_22828:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))==*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+536))))||new_error){ if(qbevent){evnt(20349);if(r)goto S_22828;} S_22829:; if ((-(*(int32*)(((char*)__UDT_ID)+(540))==*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+540))))||new_error){ if(qbevent){evnt(20350);if(r)goto S_22829;} S_22830:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20351);if(r)goto S_22830;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20351);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20351);}while(r); } } } S_22836:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(20355);if(r)goto S_22836;} S_22837:; if ((-(*_SUB_REGID_LONG_ASTYPE2== 1 ))||new_error){ if(qbevent){evnt(20356);if(r)goto S_22837;} S_22838:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+536))&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(20357);if(r)goto S_22838;} S_22839:; if ((-((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+536))&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(20358);if(r)goto S_22839;} S_22840:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20359);if(r)goto S_22840;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20359);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20359);}while(r); } } } } } } LABEL_VARNAME_EXCEPTION:; if(qbevent){evnt(20366);r=0;} S_22849:; if ((-(*_SUB_REGID_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(20367);if(r)goto S_22849;} do{ *_SUB_REGID_LONG_HASHRES=FUNC_HASHFINDCONT(_SUB_REGID_LONG_HASHRESFLAGS,_SUB_REGID_LONG_HASHRESREF); if(!qbevent)break;evnt(20367);}while(r); }else{ do{ *_SUB_REGID_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(20367);}while(r); } } dl_exit_2810:; } } S_22857:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(20373);if(r)goto S_22857;} do{ *_SUB_REGID_LONG_HASHFLAGS=*_SUB_REGID_LONG_HASHFLAGS+ 4096 ; if(!qbevent)break;evnt(20374);}while(r); do{ *_SUB_REGID_LONG_ALLOW= 0 ; if(!qbevent)break;evnt(20375);}while(r); LABEL_ARY_RECHECK:; if(qbevent){evnt(20376);r=0;} do{ *_SUB_REGID_LONG_SCOPE2=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(20377);}while(r); S_22861:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))== 32 )))||new_error){ if(qbevent){evnt(20378);if(r)goto S_22861;} do{ *_SUB_REGID_LONG_ASTYPE2= 1 ; if(!qbevent)break;evnt(20378);}while(r); } do{ *_SUB_REGID_LONG_HASHCHKFLAGS= 8 + 64 + 128 + 4096 ; if(!qbevent)break;evnt(20379);}while(r); do{ *_SUB_REGID_LONG_HASHRES=FUNC_HASHFIND(_SUB_REGID_STRING_N,_SUB_REGID_LONG_HASHCHKFLAGS,_SUB_REGID_LONG_HASHRESFLAGS,_SUB_REGID_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20380);}while(r); S_22866:; while((*_SUB_REGID_LONG_HASHRES)||new_error){ if(qbevent){evnt(20381);if(r)goto S_22866;} S_22867:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 8 )||new_error){ if(qbevent){evnt(20384);if(r)goto S_22867;} do{ qbs_set(_SUB_REGID_STRING_MUSTHAVE,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20385);}while(r); S_22869:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_REGID_STRING_MUSTHAVE,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20386);if(r)goto S_22869;} }else{ do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20390);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20390);}while(r); } } S_22875:; if ((*_SUB_REGID_LONG_HASHRESFLAGS&( 128 + 64 ))||new_error){ if(qbevent){evnt(20395);if(r)goto S_22875;} S_22876:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+548))== 0 ))||new_error){ if(qbevent){evnt(20396);if(r)goto S_22876;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20396);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20396);}while(r); } S_22880:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)),qbs_new_txt_len("WIDTH",5)))&(-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+544))== 2 ))))||new_error){ if(qbevent){evnt(20397);if(r)goto S_22880;} do{ goto LABEL_ARRAYNAME_EXCEPTION; if(!qbevent)break;evnt(20397);}while(r); } do{ qbs_set(_SUB_REGID_STRING_MUSTHAVE,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20398);}while(r); S_22884:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_REGID_STRING_MUSTHAVE->len== 0 )))||new_error){ if(qbevent){evnt(20400);if(r)goto S_22884;} S_22885:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20401);if(r)goto S_22885;} S_22886:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20403);if(r)goto S_22886;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20403);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20403);}while(r); } }else{ do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20405);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20405);}while(r); } } S_22895:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_REGID_STRING_MUSTHAVE,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20408);if(r)goto S_22895;} S_22896:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20409);if(r)goto S_22896;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20409);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20409);}while(r); } }else{ S_22901:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20412);if(r)goto S_22901;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20412);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20412);}while(r); } } } S_22907:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 4096 )||new_error){ if(qbevent){evnt(20417);if(r)goto S_22907;} do{ *_SUB_REGID_LONG_ASTYPE1= 0 ; if(!qbevent)break;evnt(20418);}while(r); S_22909:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+528)),8,1))== 32 )))||new_error){ if(qbevent){evnt(20418);if(r)goto S_22909;} do{ *_SUB_REGID_LONG_ASTYPE1= 1 ; if(!qbevent)break;evnt(20418);}while(r); } do{ *_SUB_REGID_LONG_SCOPE1=*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+2638)); if(!qbevent)break;evnt(20419);}while(r); S_22913:; if (((-(*_SUB_REGID_LONG_ASTYPE1== 1 ))&(-(*_SUB_REGID_LONG_ASTYPE2== 1 )))||new_error){ if(qbevent){evnt(20420);if(r)goto S_22913;} S_22914:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20421);if(r)goto S_22914;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20421);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20421);}while(r); } } S_22919:; if ((-(*(int32*)(((char*)__UDT_ID)+(512))==*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+512))))||new_error){ if(qbevent){evnt(20424);if(r)goto S_22919;} S_22920:; if ((-(*(int32*)(((char*)__UDT_ID)+(540))==*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+540))))||new_error){ if(qbevent){evnt(20425);if(r)goto S_22920;} S_22921:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20426);if(r)goto S_22921;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20426);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20426);}while(r); } } } S_22927:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(20430);if(r)goto S_22927;} S_22928:; if ((-(*_SUB_REGID_LONG_ASTYPE2== 1 ))||new_error){ if(qbevent){evnt(20431);if(r)goto S_22928;} S_22929:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+512))&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(20432);if(r)goto S_22929;} S_22930:; if ((-((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+512))&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(20433);if(r)goto S_22930;} S_22931:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20434);if(r)goto S_22931;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Name already in use",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20434);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20434);}while(r); } } } } } } LABEL_ARRAYNAME_EXCEPTION:; if(qbevent){evnt(20441);r=0;} S_22940:; if ((-(*_SUB_REGID_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(20442);if(r)goto S_22940;} do{ *_SUB_REGID_LONG_HASHRES=FUNC_HASHFINDCONT(_SUB_REGID_LONG_HASHRESFLAGS,_SUB_REGID_LONG_HASHRESREF); if(!qbevent)break;evnt(20442);}while(r); }else{ do{ *_SUB_REGID_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(20442);}while(r); } } dl_exit_2812:; } do{ SUB_HASHADD(_SUB_REGID_STRING_N,_SUB_REGID_LONG_HASHFLAGS,__LONG_CURRENTID); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20447);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free49.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_REGINTERNAL(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data50.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(20452);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20480);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ASC",3)); if(!qbevent)break;evnt(20481);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20481);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20481);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20481);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20482);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("END",3)); if(!qbevent)break;evnt(20483);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20483);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20483);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20483);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20484);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LSET",4)); if(!qbevent)break;evnt(20485);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20485);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20485);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20485);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20486);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RSET",4)); if(!qbevent)break;evnt(20487);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20487);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20487);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20487);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20488);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MID",3)); if(!qbevent)break;evnt(20489);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20489);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20489);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(20489);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20489);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20490);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PRINT",5)); if(!qbevent)break;evnt(20491);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20491);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20491);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20491);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20492);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("OPTION",6)); if(!qbevent)break;evnt(20493);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20493);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20493);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20493);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20494);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SWAP",4)); if(!qbevent)break;evnt(20495);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20495);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20495);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20495);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20496);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SYSTEM",6)); if(!qbevent)break;evnt(20497);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20497);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20497);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20497);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20498);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("WRITE",5)); if(!qbevent)break;evnt(20499);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20499);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20499);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20499);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20500);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("READ",4)); if(!qbevent)break;evnt(20501);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20501);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20501);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20501);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20502);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CLOSE",5)); if(!qbevent)break;evnt(20503);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20503);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20503);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20503);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20504);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RESET",5)); if(!qbevent)break;evnt(20505);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20505);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20505);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20505);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20506);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("INPUT",5)); if(!qbevent)break;evnt(20507);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20507);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20507);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20507);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20509);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TRON",4)); if(!qbevent)break;evnt(20510);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20510);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20510);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20510);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20511);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TROFF",5)); if(!qbevent)break;evnt(20512);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20512);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20512);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20512);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20513);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LIST",4)); if(!qbevent)break;evnt(20514);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20514);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20514);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20514);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20515);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("DEF",3)); if(!qbevent)break;evnt(20516);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20516);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20516);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2122)),256,1),qbs_new_txt_len("SEG",3)); if(!qbevent)break;evnt(20516);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20516);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20517);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("IOCTL",5)); if(!qbevent)break;evnt(20518);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20518);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20518);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20518);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20519);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("IOCTL",5)); if(!qbevent)break;evnt(20520);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20520);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); if(!qbevent)break;evnt(20520);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(20520);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20520);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20520);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20520);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20520);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20521);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("FRE",3)); if(!qbevent)break;evnt(20522);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20522);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); if(!qbevent)break;evnt(20522);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20522);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20522);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20522);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20522);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20523);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SETMEM",6)); if(!qbevent)break;evnt(20524);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20524);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); if(!qbevent)break;evnt(20524);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20524);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20524);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20524);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20524);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20525);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("FILEATTR",8)); if(!qbevent)break;evnt(20526);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20526);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); if(!qbevent)break;evnt(20526);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20526);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20526);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20526);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20526);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20527);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMGET",7)); if(!qbevent)break;evnt(20528);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20528);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20528);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20528);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20529);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMPUT",7)); if(!qbevent)break;evnt(20530);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20530);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20530);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20530);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20531);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMFILL",8)); if(!qbevent)break;evnt(20532);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20532);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); if(!qbevent)break;evnt(20532);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20532);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20535);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_GLRENDER",9)); if(!qbevent)break;evnt(20536);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20537);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__glrender",13)); if(!qbevent)break;evnt(20538);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20539);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20540);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{_BEHIND|_ONTOP|_ONLY}",22)); if(!qbevent)break;evnt(20541);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20542);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20546);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMGET",7)); if(!qbevent)break;evnt(20547);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20548);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memget",12)); if(!qbevent)break;evnt(20549);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(20550);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_UDTTYPE+( 1 )),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string( -1 ))); if(!qbevent)break;evnt(20551);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))= -1 ; if(!qbevent)break;evnt(20552);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20553);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20555);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEM",4)); if(!qbevent)break;evnt(20556);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20557);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mem",9)); if(!qbevent)break;evnt(20558);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20561);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20562);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(20563);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20564);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20565);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20568);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMELEMENT",11)); if(!qbevent)break;evnt(20569);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20570);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mem",9)); if(!qbevent)break;evnt(20571);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20572);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -8 )); if(!qbevent)break;evnt(20573);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20574);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20575);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20580);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMFREE",8)); if(!qbevent)break;evnt(20581);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20582);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__memfree",12)); if(!qbevent)break;evnt(20583);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20584);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_UDTTYPE+( 1 ))); if(!qbevent)break;evnt(20585);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20586);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20588);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMNEW",7)); if(!qbevent)break;evnt(20589);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20590);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memnew",12)); if(!qbevent)break;evnt(20591);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20592);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20593);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20594);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20595);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20597);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMIMAGE",9)); if(!qbevent)break;evnt(20598);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20599);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memimage",14)); if(!qbevent)break;evnt(20600);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20601);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20602);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20603);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20604);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20605);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20607);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MEMCOPY",8)); if(!qbevent)break;evnt(20608);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20609);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__memcopy",12)); if(!qbevent)break;evnt(20610);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 5 ; if(!qbevent)break;evnt(20611);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_UDTTYPE+( 1 )),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_UDTTYPE+( 1 ))),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20612);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?,?{TO}?,?",12)); if(!qbevent)break;evnt(20613);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20614);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20616);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CONSOLETITLE",13)); if(!qbevent)break;evnt(20617);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20618);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__consoletitle",17)); if(!qbevent)break;evnt(20619);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20620);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20621);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20622);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20624);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENSHOW",11)); if(!qbevent)break;evnt(20625);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20626);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenshow",15)); if(!qbevent)break;evnt(20627);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20628);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20630);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENHIDE",11)); if(!qbevent)break;evnt(20631);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20632);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenhide",15)); if(!qbevent)break;evnt(20633);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20634);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20636);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CONSOLE",8)); if(!qbevent)break;evnt(20637);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20638);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__console",13)); if(!qbevent)break;evnt(20639);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20640);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20641);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20643);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CONSOLE",8)); if(!qbevent)break;evnt(20644);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20645);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__console",12)); if(!qbevent)break;evnt(20646);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20647);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20648);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{ON|OFF}",8)); if(!qbevent)break;evnt(20649);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20650);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20652);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CONTROLCHR",11)); if(!qbevent)break;evnt(20653);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20654);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__controlchr",15)); if(!qbevent)break;evnt(20655);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20656);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20657);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{ON|OFF}",8)); if(!qbevent)break;evnt(20658);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20659);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20661);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FILEEXISTS",11)); if(!qbevent)break;evnt(20662);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20663);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fileexists",16)); if(!qbevent)break;evnt(20664);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20665);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20666);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20667);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20668);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20670);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DIREXISTS",10)); if(!qbevent)break;evnt(20671);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20672);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__direxists",15)); if(!qbevent)break;evnt(20673);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20674);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20675);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20676);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20677);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20681);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("STICK",5)); if(!qbevent)break;evnt(20682);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20683);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stick",10)); if(!qbevent)break;evnt(20684);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20685);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20686);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20687);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(20688);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20689);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20691);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("STRIG",5)); if(!qbevent)break;evnt(20692);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20693);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_strig",10)); if(!qbevent)break;evnt(20694);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20695);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20696);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20697);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(20698);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20699);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20701);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("STRIG",5)); if(!qbevent)break;evnt(20702);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20703);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_strig",9)); if(!qbevent)break;evnt(20704);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(20705);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20706);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[(?[,?])]{ON|OFF|STOP}",22)); if(!qbevent)break;evnt(20707);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20709);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20713);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DEVICES",8)); if(!qbevent)break;evnt(20714);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20715);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__devices",13)); if(!qbevent)break;evnt(20716);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20717);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20718);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20720);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DEVICE",7)); if(!qbevent)break;evnt(20721);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(20722);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20723);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__device",12)); if(!qbevent)break;evnt(20724);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20725);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20726);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20727);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20728);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20729);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20731);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DEVICEINPUT",12)); if(!qbevent)break;evnt(20732);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20733);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__deviceinput",17)); if(!qbevent)break;evnt(20734);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20735);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20736);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20737);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20738);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20739);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20741);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_LASTBUTTON",11)); if(!qbevent)break;evnt(20742);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20743);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__lastbutton",16)); if(!qbevent)break;evnt(20744);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20745);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20746);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20747);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20748);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20749);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20751);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_LASTAXIS",9)); if(!qbevent)break;evnt(20752);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20753);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__lastaxis",14)); if(!qbevent)break;evnt(20754);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20755);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20756);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20757);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20758);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20759);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20761);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_LASTWHEEL",10)); if(!qbevent)break;evnt(20762);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20763);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__lastwheel",15)); if(!qbevent)break;evnt(20764);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20765);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20766);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20767);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20768);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20769);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20771);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_BUTTON",7)); if(!qbevent)break;evnt(20772);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20773);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__button",12)); if(!qbevent)break;evnt(20774);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20775);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20776);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20777);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20778);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20779);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20781);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_BUTTONCHANGE",13)); if(!qbevent)break;evnt(20782);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20783);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__buttonchange",18)); if(!qbevent)break;evnt(20784);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20785);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20786);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20787);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20788);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20789);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20791);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_AXIS",5)); if(!qbevent)break;evnt(20792);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20793);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__axis",10)); if(!qbevent)break;evnt(20794);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20795);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20796);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20797);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20798);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20799);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20802);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_WHEEL",6)); if(!qbevent)break;evnt(20803);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20804);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__wheel",11)); if(!qbevent)break;evnt(20805);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20806);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20807);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20808);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20809);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20810);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20821);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("KEY",3)); if(!qbevent)break;evnt(20822);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20823);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_key",7)); if(!qbevent)break;evnt(20824);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20825);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20826);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("(?){ON|OFF|STOP}",16)); if(!qbevent)break;evnt(20827);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20828);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20830);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENX",8)); if(!qbevent)break;evnt(20831);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20832);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__screenx",13)); if(!qbevent)break;evnt(20833);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20834);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20835);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20837);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENY",8)); if(!qbevent)break;evnt(20838);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20839);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__screeny",13)); if(!qbevent)break;evnt(20840);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20841);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20842);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20844);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENMOVE",11)); if(!qbevent)break;evnt(20845);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20846);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenmove",15)); if(!qbevent)break;evnt(20847);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20848);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20849);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{_MIDDLE}][?,?]",16)); if(!qbevent)break;evnt(20850);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20851);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20853);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEMOVE",10)); if(!qbevent)break;evnt(20854);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20855);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mousemove",14)); if(!qbevent)break;evnt(20856);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20857);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20858);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20859);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20861);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_OS",3)); if(!qbevent)break;evnt(20862);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(20863);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20864);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__os",8)); if(!qbevent)break;evnt(20865);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20866);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20867);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20869);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MAPUNICODE",11)); if(!qbevent)break;evnt(20870);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20871);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mapunicode",15)); if(!qbevent)break;evnt(20872);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20873);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20874);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?{TO}?",6)); if(!qbevent)break;evnt(20875);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20876);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20878);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MAPUNICODE",11)); if(!qbevent)break;evnt(20879);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20880);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mapunicode",16)); if(!qbevent)break;evnt(20881);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20882);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20883);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20884);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20885);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20887);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_KEYDOWN",8)); if(!qbevent)break;evnt(20888);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20889);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__keydown",13)); if(!qbevent)break;evnt(20890);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20891);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20892);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20893);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20894);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20896);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_KEYHIT",7)); if(!qbevent)break;evnt(20897);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20898);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__keyhit",12)); if(!qbevent)break;evnt(20899);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20900);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20901);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20903);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("FILES",5)); if(!qbevent)break;evnt(20904);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20905);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_files",9)); if(!qbevent)break;evnt(20906);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20907);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20908);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(20909);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20910);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20912);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PRINTIMAGE",11)); if(!qbevent)break;evnt(20913);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20914);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__printimage",15)); if(!qbevent)break;evnt(20915);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20916);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20917);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20920);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20924);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENCLICK",12)); if(!qbevent)break;evnt(20925);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20926);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenclick",16)); if(!qbevent)break;evnt(20927);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20928);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20929);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20930);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20932);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENPRINT",12)); if(!qbevent)break;evnt(20933);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20934);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenprint",16)); if(!qbevent)break;evnt(20935);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20936);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20937);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20938);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20940);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SCREENIMAGE",12)); if(!qbevent)break;evnt(20941);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20942);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__screenimage",17)); if(!qbevent)break;evnt(20943);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(20944);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20945);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?,?,?,?]",9)); if(!qbevent)break;evnt(20946);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20947);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20948);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20954);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LOCK",4)); if(!qbevent)break;evnt(20955);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20956);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_lock",8)); if(!qbevent)break;evnt(20957);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(20958);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20959);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[#]?[,[?][{TO}?]]",17)); if(!qbevent)break;evnt(20960);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20961);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20963);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("UNLOCK",6)); if(!qbevent)break;evnt(20964);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20965);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_unlock",10)); if(!qbevent)break;evnt(20966);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(20967);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20968);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[#]?[,[?][{TO}?]]",17)); if(!qbevent)break;evnt(20969);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20970);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20972);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FREETIMER",10)); if(!qbevent)break;evnt(20973);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20974);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__freetimer",15)); if(!qbevent)break;evnt(20975);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20976);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20977);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20979);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TIMER",5)); if(!qbevent)break;evnt(20980);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20981);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_timer",9)); if(!qbevent)break;evnt(20982);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(20983);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(20984);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[(?)]{ON|OFF|STOP|FREE}",23)); if(!qbevent)break;evnt(20985);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20986);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20988);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FULLSCREEN",11)); if(!qbevent)break;evnt(20989);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20990);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__fullscreen",15)); if(!qbevent)break;evnt(20991);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(20992);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(20993);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{_OFF|_STRETCH|_SQUAREPIXELS}]",31)); if(!qbevent)break;evnt(20994);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20995);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20997);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FULLSCREEN",11)); if(!qbevent)break;evnt(20998);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20999);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fullscreen",16)); if(!qbevent)break;evnt(21000);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21001);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21002);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21004);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CLIPBOARD",10)); if(!qbevent)break;evnt(21005);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(21006);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21007);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__clipboard",14)); if(!qbevent)break;evnt(21008);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21009);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21010);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("=?",2)); if(!qbevent)break;evnt(21011);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21012);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21014);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CLIPBOARD",10)); if(!qbevent)break;evnt(21015);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(21016);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21017);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__clipboard",15)); if(!qbevent)break;evnt(21018);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21019);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21020);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21022);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_EXIT",5)); if(!qbevent)break;evnt(21023);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21024);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__exit",10)); if(!qbevent)break;evnt(21025);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21026);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21027);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21029);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_OPENHOST",9)); if(!qbevent)break;evnt(21030);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21031);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__openhost",14)); if(!qbevent)break;evnt(21032);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21033);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21034);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21035);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21036);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21038);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CONNECTED",10)); if(!qbevent)break;evnt(21039);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21040);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__connected",15)); if(!qbevent)break;evnt(21041);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21042);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21043);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21044);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21045);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21047);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CONNECTIONADDRESS",18)); if(!qbevent)break;evnt(21048);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(21049);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21050);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__connectionaddress",23)); if(!qbevent)break;evnt(21051);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21052);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21053);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21054);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21055);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21057);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_OPENCONNECTION",15)); if(!qbevent)break;evnt(21058);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21059);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__openconnection",20)); if(!qbevent)break;evnt(21060);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21061);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21062);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21063);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21064);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21066);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_OPENCLIENT",11)); if(!qbevent)break;evnt(21067);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21068);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__openclient",16)); if(!qbevent)break;evnt(21069);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21070);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21071);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21072);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21073);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21076);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ENVIRON",7)); if(!qbevent)break;evnt(21077);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(21078);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21079);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_environ",12)); if(!qbevent)break;evnt(21080);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21081);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21082);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21083);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21084);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21086);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ENVIRON",7)); if(!qbevent)break;evnt(21087);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21088);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_environ",11)); if(!qbevent)break;evnt(21089);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21090);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21091);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21092);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21094);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_ERRORLINE",10)); if(!qbevent)break;evnt(21095);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21096);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__errorline",15)); if(!qbevent)break;evnt(21097);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21098);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21099);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21101);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DISPLAY",8)); if(!qbevent)break;evnt(21102);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21103);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__display",12)); if(!qbevent)break;evnt(21104);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21105);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21107);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_AUTODISPLAY",12)); if(!qbevent)break;evnt(21108);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21109);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__autodisplay",16)); if(!qbevent)break;evnt(21110);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21111);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21114);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_LIMIT",6)); if(!qbevent)break;evnt(21115);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21116);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__limit",10)); if(!qbevent)break;evnt(21117);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21118);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21119);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21120);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21122);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DELAY",6)); if(!qbevent)break;evnt(21123);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21124);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__delay",10)); if(!qbevent)break;evnt(21125);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21126);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21127);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21128);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21130);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_ICON",5)); if(!qbevent)break;evnt(21131);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21132);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__icon",9)); if(!qbevent)break;evnt(21133);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21134);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21135);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21136);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21138);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_TITLE",6)); if(!qbevent)break;evnt(21139);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21140);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__title",10)); if(!qbevent)break;evnt(21141);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21142);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21143);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21144);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21146);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CLEAR",5)); if(!qbevent)break;evnt(21147);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21148);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_clear",9)); if(!qbevent)break;evnt(21149);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(21150);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21151);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?][,[?][,?]]",13)); if(!qbevent)break;evnt(21152);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21153);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21157);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_NEWIMAGE",9)); if(!qbevent)break;evnt(21158);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21159);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__newimage",14)); if(!qbevent)break;evnt(21160);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(21161);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21162);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?[,?]",7)); if(!qbevent)break;evnt(21163);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21164);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21165);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21167);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_LOADIMAGE",10)); if(!qbevent)break;evnt(21168);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21169);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__loadimage",15)); if(!qbevent)break;evnt(21170);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21171);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21172);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21173);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21174);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21175);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21177);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FREEIMAGE",10)); if(!qbevent)break;evnt(21178);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21179);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__freeimage",14)); if(!qbevent)break;evnt(21180);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21181);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21182);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21183);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21184);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21186);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_COPYIMAGE",10)); if(!qbevent)break;evnt(21187);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21188);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__copyimage",15)); if(!qbevent)break;evnt(21189);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21190);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21191);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21192);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21193);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21194);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21198);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SOURCE",7)); if(!qbevent)break;evnt(21199);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21200);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__source",11)); if(!qbevent)break;evnt(21201);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21202);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21203);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?",1)); if(!qbevent)break;evnt(21204);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21205);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21207);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DEST",5)); if(!qbevent)break;evnt(21208);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21209);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__dest",9)); if(!qbevent)break;evnt(21210);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21211);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21212);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?",1)); if(!qbevent)break;evnt(21213);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21214);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21216);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SOURCE",7)); if(!qbevent)break;evnt(21217);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21218);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__source",12)); if(!qbevent)break;evnt(21219);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21220);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21221);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21223);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DEST",5)); if(!qbevent)break;evnt(21224);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21225);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__dest",10)); if(!qbevent)break;evnt(21226);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21227);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21228);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21230);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DISPLAY",8)); if(!qbevent)break;evnt(21231);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21232);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__display",13)); if(!qbevent)break;evnt(21233);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21234);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21235);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21239);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_BLEND",6)); if(!qbevent)break;evnt(21240);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21241);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__blend",10)); if(!qbevent)break;evnt(21242);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21243);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21244);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21245);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21246);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21248);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DONTBLEND",10)); if(!qbevent)break;evnt(21249);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21250);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__dontblend",14)); if(!qbevent)break;evnt(21251);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21252);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21253);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21254);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21255);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21257);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CLEARCOLOR",11)); if(!qbevent)break;evnt(21258);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21259);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__clearcolor",15)); if(!qbevent)break;evnt(21260);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21261);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21262);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{_NONE}][?][,?]",16)); if(!qbevent)break;evnt(21263);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21264);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21268);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PUTIMAGE",9)); if(!qbevent)break;evnt(21269);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21270);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__putimage",13)); if(!qbevent)break;evnt(21271);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 10 ; if(!qbevent)break;evnt(21272);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21273);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[[{STEP}](?,?)[-[{STEP}](?,?)]][,[?][,[?][,[[{STEP}](?,?)[-[{STEP}](?,?)]]]]]",77)); if(!qbevent)break;evnt(21274);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21275);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21277);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MAPTRIANGLE",12)); if(!qbevent)break;evnt(21278);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21279);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__maptriangle",16)); if(!qbevent)break;evnt(21280);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 14 ; if(!qbevent)break;evnt(21281);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21282);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{_SEAMLESS}](?,?)-(?,?)-(?,?)[,?]{TO}(?,?)-(?,?)-(?,?)[,?]",59)); if(!qbevent)break;evnt(21283);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21284);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21286);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SETALPHA",9)); if(!qbevent)break;evnt(21287);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21288);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__setalpha",13)); if(!qbevent)break;evnt(21289);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(21290);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21291);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,[?[{TO}?]][,?]]",18)); if(!qbevent)break;evnt(21292);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21293);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21297);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_WIDTH",6)); if(!qbevent)break;evnt(21298);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21299);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__width",11)); if(!qbevent)break;evnt(21300);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21301);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21302);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21303);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21304);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21305);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21307);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_HEIGHT",7)); if(!qbevent)break;evnt(21308);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21309);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__height",12)); if(!qbevent)break;evnt(21310);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21311);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21312);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21313);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21314);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21315);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21317);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PIXELSIZE",10)); if(!qbevent)break;evnt(21318);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21319);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__pixelsize",15)); if(!qbevent)break;evnt(21320);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21321);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21322);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21323);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21324);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21325);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21327);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CLEARCOLOR",11)); if(!qbevent)break;evnt(21328);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21329);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__clearcolor",16)); if(!qbevent)break;evnt(21330);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21331);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21332);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21333);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21334);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21335);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21337);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_BLEND",6)); if(!qbevent)break;evnt(21338);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21339);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__blend",11)); if(!qbevent)break;evnt(21340);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21341);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21342);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21343);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21344);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21345);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21347);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_DEFAULTCOLOR",13)); if(!qbevent)break;evnt(21348);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21349);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__defaultcolor",18)); if(!qbevent)break;evnt(21350);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21351);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21352);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21353);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21354);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21355);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21357);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_BACKGROUNDCOLOR",16)); if(!qbevent)break;evnt(21358);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21359);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__backgroundcolor",21)); if(!qbevent)break;evnt(21360);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21361);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21362);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21363);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21364);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21365);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21369);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PALETTECOLOR",13)); if(!qbevent)break;evnt(21370);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21371);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__palettecolor",18)); if(!qbevent)break;evnt(21372);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21373);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21374);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21375);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21376);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21377);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21379);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PALETTECOLOR",13)); if(!qbevent)break;evnt(21380);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21381);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__palettecolor",17)); if(!qbevent)break;evnt(21382);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(21383);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21384);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?[,?]",7)); if(!qbevent)break;evnt(21385);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21386);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21388);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_COPYPALETTE",12)); if(!qbevent)break;evnt(21389);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21390);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__copypalette",16)); if(!qbevent)break;evnt(21391);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21392);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21393);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?][,?]",7)); if(!qbevent)break;evnt(21394);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21395);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21399);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_LOADFONT",9)); if(!qbevent)break;evnt(21400);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21401);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__loadfont",14)); if(!qbevent)break;evnt(21402);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(21403);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21404);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?[,?]",7)); if(!qbevent)break;evnt(21405);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21406);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 1 ; if(!qbevent)break;evnt(21407);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21408);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21410);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FONT",5)); if(!qbevent)break;evnt(21411);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21412);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__font",9)); if(!qbevent)break;evnt(21413);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21414);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21415);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21416);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21417);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21419);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FONTWIDTH",10)); if(!qbevent)break;evnt(21420);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21421);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fontwidth",15)); if(!qbevent)break;evnt(21422);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21423);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21424);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21425);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21426);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21427);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21429);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FONTHEIGHT",11)); if(!qbevent)break;evnt(21430);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21431);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fontheight",16)); if(!qbevent)break;evnt(21432);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21433);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21434);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21435);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21436);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21437);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21439);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FONT",5)); if(!qbevent)break;evnt(21440);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21441);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__font",10)); if(!qbevent)break;evnt(21442);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21443);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21444);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21445);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21446);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21447);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21449);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PRINTSTRING",12)); if(!qbevent)break;evnt(21450);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21451);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__printstring",16)); if(!qbevent)break;evnt(21452);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(21453);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21454);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?),?[,?]",19)); if(!qbevent)break;evnt(21455);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21456);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21458);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PRINTWIDTH",11)); if(!qbevent)break;evnt(21459);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21460);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__printwidth",16)); if(!qbevent)break;evnt(21461);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21462);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21463);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21464);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21465);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21466);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21468);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_FREEFONT",9)); if(!qbevent)break;evnt(21469);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21470);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__freefont",13)); if(!qbevent)break;evnt(21471);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21472);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21473);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?",1)); if(!qbevent)break;evnt(21474);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21475);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21477);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PRINTMODE",10)); if(!qbevent)break;evnt(21478);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21479);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__printmode",14)); if(!qbevent)break;evnt(21480);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21481);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21482);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{_FILLBACKGROUND|_KEEPBACKGROUND|_ONLYBACKGROUND}[,?]",53)); if(!qbevent)break;evnt(21483);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21484);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21486);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_PRINTMODE",10)); if(!qbevent)break;evnt(21487);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21488);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__printmode",15)); if(!qbevent)break;evnt(21489);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21490);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21491);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21492);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21493);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21494);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21498);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_RGBA",5)); if(!qbevent)break;evnt(21499);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21500);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgba",10)); if(!qbevent)break;evnt(21501);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 5 ; if(!qbevent)break;evnt(21502);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21503);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?,?,?[,?]",11)); if(!qbevent)break;evnt(21504);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21505);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21506);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21508);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_RGB",4)); if(!qbevent)break;evnt(21509);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21510);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgb",9)); if(!qbevent)break;evnt(21511);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(21512);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21513);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?,?[,?]",9)); if(!qbevent)break;evnt(21514);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21515);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21516);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21518);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_RED",4)); if(!qbevent)break;evnt(21519);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21520);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__red",9)); if(!qbevent)break;evnt(21521);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21522);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21523);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21524);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21525);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21526);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21528);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_GREEN",6)); if(!qbevent)break;evnt(21529);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21530);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__green",11)); if(!qbevent)break;evnt(21531);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21532);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21533);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21534);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21535);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21536);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21538);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_BLUE",5)); if(!qbevent)break;evnt(21539);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21540);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__blue",10)); if(!qbevent)break;evnt(21541);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21542);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21543);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21544);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21545);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21546);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21548);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_ALPHA",6)); if(!qbevent)break;evnt(21549);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21550);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__alpha",11)); if(!qbevent)break;evnt(21551);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21552);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21553);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21554);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21555);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21556);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21558);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_RGBA32",7)); if(!qbevent)break;evnt(21559);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21560);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgba32",12)); if(!qbevent)break;evnt(21561);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(21562);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21563);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21564);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21565);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21567);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_RGB32",6)); if(!qbevent)break;evnt(21568);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21569);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgb32",11)); if(!qbevent)break;evnt(21570);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(21571);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21572);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21573);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21574);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21576);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_RED32",6)); if(!qbevent)break;evnt(21577);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21578);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__red32",11)); if(!qbevent)break;evnt(21579);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21580);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21581);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21582);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21583);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21585);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_GREEN32",8)); if(!qbevent)break;evnt(21586);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21587);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__green32",13)); if(!qbevent)break;evnt(21588);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21589);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21590);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21591);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21592);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21594);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_BLUE32",7)); if(!qbevent)break;evnt(21595);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21596);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__blue32",12)); if(!qbevent)break;evnt(21597);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21598);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21599);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21600);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21601);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21603);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_ALPHA32",8)); if(!qbevent)break;evnt(21604);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21605);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__alpha32",13)); if(!qbevent)break;evnt(21606);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21607);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21608);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21609);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21610);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21613);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("DRAW",4)); if(!qbevent)break;evnt(21614);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21615);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_draw",8)); if(!qbevent)break;evnt(21616);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21617);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21618);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21619);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21621);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PLAY",4)); if(!qbevent)break;evnt(21622);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21622);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21623);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_play",8)); if(!qbevent)break;evnt(21624);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21625);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21626);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21627);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21629);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PLAY",4)); if(!qbevent)break;evnt(21630);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21630);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21631);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_play",9)); if(!qbevent)break;evnt(21632);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21633);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21634);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21635);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21636);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21639);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSESHOW",10)); if(!qbevent)break;evnt(21640);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21641);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mouseshow",14)); if(!qbevent)break;evnt(21642);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21643);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21645);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEHIDE",10)); if(!qbevent)break;evnt(21646);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21647);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mousehide",14)); if(!qbevent)break;evnt(21648);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21649);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21651);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEINPUT",11)); if(!qbevent)break;evnt(21652);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21653);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mouseinput",16)); if(!qbevent)break;evnt(21654);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21655);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21656);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21658);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEX",7)); if(!qbevent)break;evnt(21659);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21660);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousex",12)); if(!qbevent)break;evnt(21661);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21662);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21663);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21665);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEY",7)); if(!qbevent)break;evnt(21666);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21668);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousey",12)); if(!qbevent)break;evnt(21669);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21670);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21671);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21673);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEMOVEMENTX",15)); if(!qbevent)break;evnt(21674);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21675);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousemovementx",20)); if(!qbevent)break;evnt(21676);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21677);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21678);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21680);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEMOVEMENTY",15)); if(!qbevent)break;evnt(21681);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21682);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousemovementy",20)); if(!qbevent)break;evnt(21683);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21684);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21685);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21687);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEBUTTON",12)); if(!qbevent)break;evnt(21688);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21689);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousebutton",17)); if(!qbevent)break;evnt(21690);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21691);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21692);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21693);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21694);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21696);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MOUSEWHEEL",11)); if(!qbevent)break;evnt(21697);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21698);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousewheel",16)); if(!qbevent)break;evnt(21699);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21700);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21701);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21703);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("FREEFILE",8)); if(!qbevent)break;evnt(21704);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21705);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_freefile",13)); if(!qbevent)break;evnt(21706);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21707);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21708);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21710);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("NAME",4)); if(!qbevent)break;evnt(21711);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21712);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_name",8)); if(!qbevent)break;evnt(21713);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21714);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21715);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?{AS}?",6)); if(!qbevent)break;evnt(21716);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21717);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21719);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("KILL",4)); if(!qbevent)break;evnt(21720);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21721);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_kill",8)); if(!qbevent)break;evnt(21722);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21723);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21724);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21725);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21727);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CHDIR",5)); if(!qbevent)break;evnt(21728);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21729);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_chdir",9)); if(!qbevent)break;evnt(21730);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21731);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21732);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21733);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21735);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKDIR",5)); if(!qbevent)break;evnt(21736);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21737);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_mkdir",9)); if(!qbevent)break;evnt(21738);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21739);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21740);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2858))= 1 ; if(!qbevent)break;evnt(21741);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21742);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21744);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RMDIR",5)); if(!qbevent)break;evnt(21745);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21746);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_rmdir",9)); if(!qbevent)break;evnt(21747);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21748);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21749);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21750);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21752);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CHAIN",5)); if(!qbevent)break;evnt(21753);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21754);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_chain",9)); if(!qbevent)break;evnt(21755);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21756);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21757);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2858))= 1 ; if(!qbevent)break;evnt(21758);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21759);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21761);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SHELL",5)); if(!qbevent)break;evnt(21762);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21763);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_shell",9)); if(!qbevent)break;evnt(21764);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21765);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21766);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(21767);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2858))= 1 ; if(!qbevent)break;evnt(21769);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21770);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21772);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SHELL",5)); if(!qbevent)break;evnt(21773);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21774);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_shell2",10)); if(!qbevent)break;evnt(21775);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21776);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21777);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{_HIDE}[{_DONTWAIT}][?]",23)); if(!qbevent)break;evnt(21778);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("_HIDE",5)); if(!qbevent)break;evnt(21779);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2858))= 1 ; if(!qbevent)break;evnt(21780);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21781);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21783);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SHELL",5)); if(!qbevent)break;evnt(21784);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21785);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_shell3",10)); if(!qbevent)break;evnt(21786);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21787);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21788);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{_DONTWAIT}[{_HIDE}][?]",23)); if(!qbevent)break;evnt(21789);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("_DONTWAIT",9)); if(!qbevent)break;evnt(21790);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2858))= 1 ; if(!qbevent)break;evnt(21791);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21792);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21794);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SHELL",5)); if(!qbevent)break;evnt(21795);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21796);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_shell",10)); if(!qbevent)break;evnt(21797);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21798);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21799);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21800);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2858))= 1 ; if(!qbevent)break;evnt(21801);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21802);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21804);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SHELLHIDE",10)); if(!qbevent)break;evnt(21805);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21806);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__shellhide",15)); if(!qbevent)break;evnt(21807);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21808);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21809);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21810);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2858))= 1 ; if(!qbevent)break;evnt(21811);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21812);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21814);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("COMMAND",7)); if(!qbevent)break;evnt(21815);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(21816);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21817);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_command",12)); if(!qbevent)break;evnt(21818);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 0 ; if(!qbevent)break;evnt(21819);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21820);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21821);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21825);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDRATE",8)); if(!qbevent)break;evnt(21826);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21826);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21827);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndrate",13)); if(!qbevent)break;evnt(21828);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21829);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21830);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21832);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDRAW",7)); if(!qbevent)break;evnt(21833);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21833);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21834);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndraw",11)); if(!qbevent)break;evnt(21835);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(21836);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21837);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,[?][,?]]",11)); if(!qbevent)break;evnt(21838);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21839);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21841);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDOPENRAW",11)); if(!qbevent)break;evnt(21842);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21842);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21843);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndopenraw",16)); if(!qbevent)break;evnt(21844);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21845);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21846);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21848);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDRAWLEN",10)); if(!qbevent)break;evnt(21849);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21849);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21850);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndrawlen",15)); if(!qbevent)break;evnt(21851);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21852);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21853);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21855);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDLEN",7)); if(!qbevent)break;evnt(21856);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21856);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21857);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndlen",12)); if(!qbevent)break;evnt(21858);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21859);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21860);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21861);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21862);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21864);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDPAUSED",10)); if(!qbevent)break;evnt(21865);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21865);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21866);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndpaused",15)); if(!qbevent)break;evnt(21867);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21868);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21869);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21870);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21871);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21873);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDPLAYFILE",12)); if(!qbevent)break;evnt(21874);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 3 ; if(!qbevent)break;evnt(21874);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21875);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndplayfile",16)); if(!qbevent)break;evnt(21876);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(21877);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21878);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,[?][,?]]",11)); if(!qbevent)break;evnt(21879);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21880);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21882);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDPLAYCOPY",12)); if(!qbevent)break;evnt(21883);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21883);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21884);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndplaycopy",16)); if(!qbevent)break;evnt(21885);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21886);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21887);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21888);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21889);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21891);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDSTOP",8)); if(!qbevent)break;evnt(21892);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21892);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21893);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndstop",12)); if(!qbevent)break;evnt(21894);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21895);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21896);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21897);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21899);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDLOOP",8)); if(!qbevent)break;evnt(21900);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21900);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21901);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndloop",12)); if(!qbevent)break;evnt(21902);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21903);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21904);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21905);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21907);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDLIMIT",9)); if(!qbevent)break;evnt(21908);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21908);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21909);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndlimit",13)); if(!qbevent)break;evnt(21910);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21911);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21912);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21913);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21915);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDOPEN",8)); if(!qbevent)break;evnt(21916);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 3 ; if(!qbevent)break;evnt(21916);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21917);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndopen",13)); if(!qbevent)break;evnt(21918);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21919);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21920);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(21921);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21922);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21923);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21925);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDSETPOS",10)); if(!qbevent)break;evnt(21926);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21926);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21927);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndsetpos",14)); if(!qbevent)break;evnt(21928);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21929);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21930);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21931);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21933);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDGETPOS",10)); if(!qbevent)break;evnt(21934);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21934);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21935);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndgetpos",15)); if(!qbevent)break;evnt(21936);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21937);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21938);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21939);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21940);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21942);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDPLAYING",11)); if(!qbevent)break;evnt(21943);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21943);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21944);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndplaying",16)); if(!qbevent)break;evnt(21945);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21946);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21947);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21948);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21949);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21951);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDPAUSE",9)); if(!qbevent)break;evnt(21952);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21952);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21953);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndpause",13)); if(!qbevent)break;evnt(21954);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21955);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21956);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21957);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21959);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDBAL",7)); if(!qbevent)break;evnt(21960);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21960);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21961);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndbal",11)); if(!qbevent)break;evnt(21962);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(21963);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21964);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,[?][,[?][,[?]]]",17)); if(!qbevent)break;evnt(21965);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21966);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21969);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDVOL",7)); if(!qbevent)break;evnt(21970);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21970);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21971);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndvol",11)); if(!qbevent)break;evnt(21972);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(21973);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(21974);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21975);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21977);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDPLAY",8)); if(!qbevent)break;evnt(21978);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21978);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21979);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndplay",12)); if(!qbevent)break;evnt(21980);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21981);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21982);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21983);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21985);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDCOPY",8)); if(!qbevent)break;evnt(21986);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21986);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(21987);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndcopy",13)); if(!qbevent)break;evnt(21988);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21989);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21990);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21991);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(21992);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(21994);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_SNDCLOSE",9)); if(!qbevent)break;evnt(21995);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(21995);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(21996);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndclose",13)); if(!qbevent)break;evnt(21997);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(21998);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(21999);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22000);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22002);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("INPUT",5)); if(!qbevent)break;evnt(22003);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22004);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22005);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_input",10)); if(!qbevent)break;evnt(22006);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22007);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22008);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(22009);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22010);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22011);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22013);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SEEK",4)); if(!qbevent)break;evnt(22014);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22015);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_seek",8)); if(!qbevent)break;evnt(22016);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22017);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22018);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[#]?,?",6)); if(!qbevent)break;evnt(22019);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22020);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22022);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SEEK",4)); if(!qbevent)break;evnt(22023);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22024);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_seek",9)); if(!qbevent)break;evnt(22025);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22026);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22027);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22028);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22029);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22031);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LOC",3)); if(!qbevent)break;evnt(22032);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22033);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_loc",8)); if(!qbevent)break;evnt(22034);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22035);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22036);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22037);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22038);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22040);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("EOF",3)); if(!qbevent)break;evnt(22041);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22042);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_eof",8)); if(!qbevent)break;evnt(22043);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22044);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22045);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22046);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22047);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22049);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LOF",3)); if(!qbevent)break;evnt(22050);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22051);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_lof",8)); if(!qbevent)break;evnt(22052);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22053);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22054);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22055);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22056);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22059);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SCREEN",6)); if(!qbevent)break;evnt(22060);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22061);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_screen",11)); if(!qbevent)break;evnt(22062);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22063);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22064);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?[,?]",7)); if(!qbevent)break;evnt(22065);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22066);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22067);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22069);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PMAP",4)); if(!qbevent)break;evnt(22070);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22071);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_pmap",9)); if(!qbevent)break;evnt(22072);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22073);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22074);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22075);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22076);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22079);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("POINT",5)); if(!qbevent)break;evnt(22080);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22081);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_point",10)); if(!qbevent)break;evnt(22082);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22083);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22084);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(22085);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22086);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22087);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22090);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TAB",3)); if(!qbevent)break;evnt(22091);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22092);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_tab",8)); if(!qbevent)break;evnt(22093);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22094);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22095);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22096);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22097);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22099);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SPC",3)); if(!qbevent)break;evnt(22100);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22101);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_spc",8)); if(!qbevent)break;evnt(22102);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22103);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22104);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22105);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22106);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22109);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("WAIT",4)); if(!qbevent)break;evnt(22110);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22111);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_wait",8)); if(!qbevent)break;evnt(22112);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22113);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22114);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?[,?]",7)); if(!qbevent)break;evnt(22115);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22116);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22118);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("INP",3)); if(!qbevent)break;evnt(22119);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22120);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_inp",8)); if(!qbevent)break;evnt(22121);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22122);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22123);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22124);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22125);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22127);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("POS",3)); if(!qbevent)break;evnt(22128);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22129);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_pos",8)); if(!qbevent)break;evnt(22130);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22131);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22132);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22133);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22134);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22136);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SGN",3)); if(!qbevent)break;evnt(22137);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22138);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_sgn",8)); if(!qbevent)break;evnt(22139);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22140);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22141);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22142);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22143);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22145);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LBOUND",6)); if(!qbevent)break;evnt(22146);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22147);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22148);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22149);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,[?]",5)); if(!qbevent)break;evnt(22150);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22151);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22152);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22154);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("UBOUND",6)); if(!qbevent)break;evnt(22155);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22156);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22157);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22158);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,[?]",5)); if(!qbevent)break;evnt(22159);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22160);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22161);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22163);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("OCT",3)); if(!qbevent)break;evnt(22164);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22165);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22166);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22167);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22168);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22169);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22170);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22172);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("HEX",3)); if(!qbevent)break;evnt(22173);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22174);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22175);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22176);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22177);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22178);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22179);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22181);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SLEEP",5)); if(!qbevent)break;evnt(22182);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22183);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_sleep",9)); if(!qbevent)break;evnt(22184);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22185);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22186);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(22187);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22188);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22190);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("EXP",3)); if(!qbevent)break;evnt(22191);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22192);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22193);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22194);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))= -1 ; if(!qbevent)break;evnt(22195);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22196);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22198);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("FIX",3)); if(!qbevent)break;evnt(22199);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22200);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22201);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22202);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))= -1 ; if(!qbevent)break;evnt(22203);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22204);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22206);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("INT",3)); if(!qbevent)break;evnt(22207);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22208);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22209);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22210);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))= -1 ; if(!qbevent)break;evnt(22211);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22212);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22214);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CDBL",4)); if(!qbevent)break;evnt(22215);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22216);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22217);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22218);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22219);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22220);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22222);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CSNG",4)); if(!qbevent)break;evnt(22223);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22224);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22225);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22226);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22227);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22228);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22230);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_ROUND",6)); if(!qbevent)break;evnt(22231);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22232);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22233);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22234);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22235);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22236);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22238);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CINT",4)); if(!qbevent)break;evnt(22239);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22240);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22241);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22242);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22243);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22244);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22246);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CLNG",4)); if(!qbevent)break;evnt(22247);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22248);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22249);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22250);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22251);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22252);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22256);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TIME",4)); if(!qbevent)break;evnt(22257);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22258);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22259);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_time",8)); if(!qbevent)break;evnt(22260);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22261);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22262);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("=?",2)); if(!qbevent)break;evnt(22263);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22264);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22266);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TIME",4)); if(!qbevent)break;evnt(22267);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22268);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22269);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_time",9)); if(!qbevent)break;evnt(22270);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22271);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22272);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22276);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("DATE",4)); if(!qbevent)break;evnt(22277);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22278);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22279);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_date",8)); if(!qbevent)break;evnt(22280);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22281);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22282);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("=?",2)); if(!qbevent)break;evnt(22283);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22284);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22286);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("DATE",4)); if(!qbevent)break;evnt(22287);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22288);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22289);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_date",9)); if(!qbevent)break;evnt(22290);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22291);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22292);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22294);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CSRLIN",6)); if(!qbevent)break;evnt(22295);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22296);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_csrlin",11)); if(!qbevent)break;evnt(22297);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22298);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22299);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22302);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PAINT",5)); if(!qbevent)break;evnt(22303);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22304);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_paint",9)); if(!qbevent)break;evnt(22305);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 5 ; if(!qbevent)break;evnt(22306);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22307);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?)[,[?][,[?][,?]]]",29)); if(!qbevent)break;evnt(22308);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22310);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22312);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CIRCLE",6)); if(!qbevent)break;evnt(22313);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22314);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_circle",10)); if(!qbevent)break;evnt(22315);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 7 ; if(!qbevent)break;evnt(22316);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22317);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?),?[,[?][,[?][,[?][,?]]]]",37)); if(!qbevent)break;evnt(22318);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22320);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22322);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("BLOAD",5)); if(!qbevent)break;evnt(22323);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22324);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_bload",9)); if(!qbevent)break;evnt(22325);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22326);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22327);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[,?]",5)); if(!qbevent)break;evnt(22328);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22329);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22331);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("BSAVE",5)); if(!qbevent)break;evnt(22332);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22333);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_bsave",9)); if(!qbevent)break;evnt(22334);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22335);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22336);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22337);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22339);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("GET",3)); if(!qbevent)break;evnt(22340);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22341);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_get",7)); if(!qbevent)break;evnt(22342);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22343);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 ))); if(!qbevent)break;evnt(22344);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14)); if(!qbevent)break;evnt(22346);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22347);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22349);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PUT",3)); if(!qbevent)break;evnt(22350);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22351);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_put",7)); if(!qbevent)break;evnt(22352);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22353);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 ))); if(!qbevent)break;evnt(22354);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14)); if(!qbevent)break;evnt(22356);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22357);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22360);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("GET",3)); if(!qbevent)break;evnt(22361);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22362);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_get",16)); if(!qbevent)break;evnt(22363);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 6 ; if(!qbevent)break;evnt(22364);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22365);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?)-[{STEP}](?,?),?[,?]",33)); if(!qbevent)break;evnt(22366);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("STEP",4)); if(!qbevent)break;evnt(22367);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22368);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22370);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("GET",3)); if(!qbevent)break;evnt(22371);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22372);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_get",16)); if(!qbevent)break;evnt(22373);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 6 ; if(!qbevent)break;evnt(22374);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22375);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?)-[{STEP}](?,?),?[,?]",33)); if(!qbevent)break;evnt(22376);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("(",1)); if(!qbevent)break;evnt(22377);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22378);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22381);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PUT",3)); if(!qbevent)break;evnt(22382);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22383);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_put",16)); if(!qbevent)break;evnt(22384);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 5 ; if(!qbevent)break;evnt(22385);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22386);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?),?[,[{_CLIP}][{PSET|PRESET|AND|OR|XOR}][,?]]",57)); if(!qbevent)break;evnt(22387);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("STEP",4)); if(!qbevent)break;evnt(22390);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22391);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22392);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PUT",3)); if(!qbevent)break;evnt(22393);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22394);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_put",16)); if(!qbevent)break;evnt(22395);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 5 ; if(!qbevent)break;evnt(22396);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22397);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?),?[,[{_CLIP}][{PSET|PRESET|AND|OR|XOR}][,?]]",57)); if(!qbevent)break;evnt(22398);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("(",1)); if(!qbevent)break;evnt(22401);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22402);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22404);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("OPEN",4)); if(!qbevent)break;evnt(22405);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22406);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_open_gwbasic",16)); if(!qbevent)break;evnt(22407);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(22408);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22409);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,[#]?,?[,?]",12)); if(!qbevent)break;evnt(22410);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22411);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22412);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("OPEN",4)); if(!qbevent)break;evnt(22413);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22414);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_open",8)); if(!qbevent)break;evnt(22415);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 6 ; if(!qbevent)break;evnt(22416);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22417);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?[{FOR RANDOM|FOR BINARY|FOR INPUT|FOR OUTPUT|FOR APPEND}][{ACCESS READ WRITE|ACCESS READ|ACCESS WRITE}][{SHARED|LOCK READ WRITE|LOCK READ|LOCK WRITE}]{AS}[#]?[{LEN =}?]",169)); if(!qbevent)break;evnt(22418);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22419);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22421);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VAL",3)); if(!qbevent)break;evnt(22422);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22423);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_val",8)); if(!qbevent)break;evnt(22424);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22425);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22426);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22427);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22428);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22430);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKSMBF",6)); if(!qbevent)break;evnt(22431);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22432);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22433);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_mksmbf",11)); if(!qbevent)break;evnt(22434);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22435);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22436);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22437);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22438);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22439);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKDMBF",6)); if(!qbevent)break;evnt(22440);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22441);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22442);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_mkdmbf",11)); if(!qbevent)break;evnt(22443);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22444);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22445);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22446);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22447);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22449);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKI",3)); if(!qbevent)break;evnt(22450);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22451);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22452);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22453);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22454);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22455);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22456);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22457);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22458);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKL",3)); if(!qbevent)break;evnt(22459);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22460);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22461);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22462);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22463);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22464);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22465);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22466);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22467);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKS",3)); if(!qbevent)break;evnt(22468);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22469);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22470);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22471);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22472);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22473);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22474);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22475);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22476);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKD",3)); if(!qbevent)break;evnt(22477);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22478);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22479);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22480);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22481);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22482);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22483);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22484);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22485);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_MK",3)); if(!qbevent)break;evnt(22486);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22487);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22488);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22489);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22490);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string( -1 ),l2string( -1 ))); if(!qbevent)break;evnt(22491);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22492);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22493);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22495);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVSMBF",6)); if(!qbevent)break;evnt(22496);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22497);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_cvsmbf",11)); if(!qbevent)break;evnt(22498);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22499);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22500);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22501);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22502);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22503);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVDMBF",6)); if(!qbevent)break;evnt(22504);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22505);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_cvdmbf",11)); if(!qbevent)break;evnt(22506);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22507);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22508);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22509);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22510);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22512);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVI",3)); if(!qbevent)break;evnt(22513);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22514);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22515);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22516);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22517);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22518);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22519);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22520);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVL",3)); if(!qbevent)break;evnt(22521);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22522);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22523);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22524);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22525);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22526);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22527);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22528);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVS",3)); if(!qbevent)break;evnt(22529);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22530);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22531);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22532);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22533);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22534);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22535);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22536);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVD",3)); if(!qbevent)break;evnt(22537);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22538);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22539);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22540);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22541);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22542);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22543);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22544);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_CV",3)); if(!qbevent)break;evnt(22545);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22546);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22547);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22548);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22549);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))= -1 ; if(!qbevent)break;evnt(22550);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22551);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22553);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("STRING",6)); if(!qbevent)break;evnt(22554);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22555);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22556);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_string",11)); if(!qbevent)break;evnt(22557);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22558);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22559);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22560);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22561);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22563);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SPACE",5)); if(!qbevent)break;evnt(22564);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22565);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22566);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_space",10)); if(!qbevent)break;evnt(22567);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22568);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22569);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22570);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22571);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22573);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("INSTR",5)); if(!qbevent)break;evnt(22574);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22575);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_instr",10)); if(!qbevent)break;evnt(22576);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22577);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22578);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22579);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?],?,?",7)); if(!qbevent)break;evnt(22580);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22581);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22583);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MID",3)); if(!qbevent)break;evnt(22584);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22585);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22586);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_mid",8)); if(!qbevent)break;evnt(22587);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22588);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22589);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22590);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("?,?,[?]",7)); if(!qbevent)break;evnt(22591);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22592);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22594);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SADD",4)); if(!qbevent)break;evnt(22595);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22596);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22597);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22598);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22599);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22600);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22601);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22603);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CLS",3)); if(!qbevent)break;evnt(22604);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22605);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_cls",7)); if(!qbevent)break;evnt(22606);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22607);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22608);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?][,?]",7)); if(!qbevent)break;evnt(22609);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22610);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22612);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SQR",3)); if(!qbevent)break;evnt(22613);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22614);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_sqr",8)); if(!qbevent)break;evnt(22615);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22616);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22617);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22618);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22619);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22621);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CHR",3)); if(!qbevent)break;evnt(22622);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22623);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22624);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_chr",8)); if(!qbevent)break;evnt(22625);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22626);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22627);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22628);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22629);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22631);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VARPTR",6)); if(!qbevent)break;evnt(22632);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22633);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22634);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22635);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22636);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22637);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22638);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22639);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22641);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VARPTR",6)); if(!qbevent)break;evnt(22642);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22643);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22644);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22645);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22646);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22647);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22648);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22650);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_OFFSET",7)); if(!qbevent)break;evnt(22651);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22652);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22653);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22654);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22655);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22656);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22657);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22659);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VARSEG",6)); if(!qbevent)break;evnt(22660);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22661);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22662);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22663);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22664);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22665);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22666);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22668);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("POKE",4)); if(!qbevent)break;evnt(22669);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22670);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_poke",8)); if(!qbevent)break;evnt(22671);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22672);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22673);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22674);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22676);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PEEK",4)); if(!qbevent)break;evnt(22677);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22678);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_peek",9)); if(!qbevent)break;evnt(22679);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22680);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22681);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22682);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22683);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22685);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("DEF",3)); if(!qbevent)break;evnt(22686);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22687);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_defseg",10)); if(!qbevent)break;evnt(22688);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22689);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22690);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{SEG}[=?]",9)); if(!qbevent)break;evnt(22691);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("SEG",3)); if(!qbevent)break;evnt(22692);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22693);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22695);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SIN",3)); if(!qbevent)break;evnt(22696);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22697);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sin",3)); if(!qbevent)break;evnt(22698);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22699);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22700);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22701);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22702);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22704);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("COS",3)); if(!qbevent)break;evnt(22705);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22706);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("cos",3)); if(!qbevent)break;evnt(22707);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22708);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22709);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22710);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22711);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22713);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TAN",3)); if(!qbevent)break;evnt(22714);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22715);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("tan",3)); if(!qbevent)break;evnt(22716);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22717);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22718);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22719);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22720);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22722);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ATN",3)); if(!qbevent)break;evnt(22723);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22724);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("atan",4)); if(!qbevent)break;evnt(22725);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22726);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22727);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22728);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22729);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22731);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LOG",3)); if(!qbevent)break;evnt(22732);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22733);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_log",8)); if(!qbevent)break;evnt(22734);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22735);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22736);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22737);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22738);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22740);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ABS",3)); if(!qbevent)break;evnt(22741);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22742);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_abs",8)); if(!qbevent)break;evnt(22743);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22744);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22745);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22746);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22747);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22749);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ERL",3)); if(!qbevent)break;evnt(22750);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22751);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("get_error_erl",13)); if(!qbevent)break;evnt(22752);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 0 ; if(!qbevent)break;evnt(22753);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22754);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22755);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22757);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ERR",3)); if(!qbevent)break;evnt(22758);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22759);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("get_error_err",13)); if(!qbevent)break;evnt(22760);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 0 ; if(!qbevent)break;evnt(22761);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22762);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22763);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22765);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ERROR",5)); if(!qbevent)break;evnt(22766);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22767);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("error",5)); if(!qbevent)break;evnt(22768);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22769);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22770);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22771);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22773);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LINE",4)); if(!qbevent)break;evnt(22774);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22775);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_line",8)); if(!qbevent)break;evnt(22776);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 7 ; if(!qbevent)break;evnt(22777);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22779);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[[{STEP}](?,?)]-[{STEP}](?,?)[,[?][,[{B|BF}][,?]]]",50)); if(!qbevent)break;evnt(22780);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22781);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22783);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SOUND",5)); if(!qbevent)break;evnt(22784);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(22784);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22785);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_sound",9)); if(!qbevent)break;evnt(22786);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22787);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22788);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22789);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22791);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("BEEP",4)); if(!qbevent)break;evnt(22792);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(22792);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22793);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_beep",8)); if(!qbevent)break;evnt(22794);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 0 ; if(!qbevent)break;evnt(22795);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22796);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22798);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TIMER",5)); if(!qbevent)break;evnt(22799);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22800);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_timer",10)); if(!qbevent)break;evnt(22801);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22802);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22803);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22804);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(22805);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22806);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22808);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RND",3)); if(!qbevent)break;evnt(22809);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22810);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_rnd",8)); if(!qbevent)break;evnt(22811);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22812);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22813);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22814);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?]",3)); if(!qbevent)break;evnt(22815);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22816);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22818);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RANDOMIZE",9)); if(!qbevent)break;evnt(22819);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22820);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_randomize",13)); if(!qbevent)break;evnt(22821);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22822);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22823);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[[{USING}]?]",12)); if(!qbevent)break;evnt(22824);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22825);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22827);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("OUT",3)); if(!qbevent)break;evnt(22828);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22829);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_out",7)); if(!qbevent)break;evnt(22830);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22831);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22832);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22833);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22835);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PCOPY",5)); if(!qbevent)break;evnt(22836);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22837);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_pcopy",9)); if(!qbevent)break;evnt(22838);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22839);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22840);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22841);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22843);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VIEW",4)); if(!qbevent)break;evnt(22844);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22845);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_view",12)); if(!qbevent)break;evnt(22846);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 6 ; if(!qbevent)break;evnt(22847);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22848);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[[{SCREEN}](?,?)-(?,?)[,[?][,?]]]",33)); if(!qbevent)break;evnt(22849);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2122)),256,1),qbs_new_txt_len("PRINT",5)); if(!qbevent)break;evnt(22850);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22851);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22853);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VIEW",4)); if(!qbevent)break;evnt(22854);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22855);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_view_print",18)); if(!qbevent)break;evnt(22856);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22857);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22858);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("{PRINT}[?{TO}?]",15)); if(!qbevent)break;evnt(22859);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1866)),256,1),qbs_new_txt_len("PRINT",5)); if(!qbevent)break;evnt(22860);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22861);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22863);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("WINDOW",6)); if(!qbevent)break;evnt(22864);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22865);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_window",14)); if(!qbevent)break;evnt(22866);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(22867);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22868);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[[{SCREEN}](?,?)-(?,?)]",23)); if(!qbevent)break;evnt(22869);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22870);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22872);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LOCATE",6)); if(!qbevent)break;evnt(22873);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22874);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_locate",14)); if(!qbevent)break;evnt(22875);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 5 ; if(!qbevent)break;evnt(22876);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22877);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25)); if(!qbevent)break;evnt(22878);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22879);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22881);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("COLOR",5)); if(!qbevent)break;evnt(22882);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22883);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_color",13)); if(!qbevent)break;evnt(22884);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22885);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22886);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?][,[?][,?]]",13)); if(!qbevent)break;evnt(22887);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22888);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22890);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PALETTE",7)); if(!qbevent)break;evnt(22891);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22892);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_palette",11)); if(!qbevent)break;evnt(22893);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(22894);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22895);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?,?]",5)); if(!qbevent)break;evnt(22896);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22897);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22899);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("WIDTH",5)); if(!qbevent)break;evnt(22900);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22901);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbsub_width",11)); if(!qbevent)break;evnt(22902);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22903);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22904);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{#|LPRINT}][?][,?]",19)); if(!qbevent)break;evnt(22905);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22906);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22909);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SCREEN",6)); if(!qbevent)break;evnt(22910);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22911);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_screen",10)); if(!qbevent)break;evnt(22912);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 5 ; if(!qbevent)break;evnt(22913);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22914);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,[{_MANUALDISPLAY}?]]]]]",43)); if(!qbevent)break;evnt(22918);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22919);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22921);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PSET",4)); if(!qbevent)break;evnt(22922);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22923);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_pset",8)); if(!qbevent)break;evnt(22924);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22925);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22926);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?)[,?]",17)); if(!qbevent)break;evnt(22927);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22928);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22930);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PRESET",6)); if(!qbevent)break;evnt(22931);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(22932);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_preset",10)); if(!qbevent)break;evnt(22933);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 3 ; if(!qbevent)break;evnt(22934);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(22935);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1610)),256,1),qbs_new_txt_len("[{STEP}](?,?)[,?]",17)); if(!qbevent)break;evnt(22936);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22937);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22939);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ASC",3)); if(!qbevent)break;evnt(22940);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22941);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_asc",7)); if(!qbevent)break;evnt(22942);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22943);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22944);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22945);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22946);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22948);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LEN",3)); if(!qbevent)break;evnt(22949);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22950);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(22951);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22952);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22953);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22954);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22955);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22957);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("INKEY",5)); if(!qbevent)break;evnt(22958);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22959);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22960);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_inkey",9)); if(!qbevent)break;evnt(22961);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22962);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22963);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22965);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("STR",3)); if(!qbevent)break;evnt(22966);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22967);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22968);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_str",7)); if(!qbevent)break;evnt(22969);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22970);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string( -1 )); if(!qbevent)break;evnt(22971);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22972);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22973);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22975);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("UCASE",5)); if(!qbevent)break;evnt(22976);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22977);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22978);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_ucase",9)); if(!qbevent)break;evnt(22979);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22980);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22981);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22982);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22983);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22985);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LCASE",5)); if(!qbevent)break;evnt(22986);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22987);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22988);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_lcase",9)); if(!qbevent)break;evnt(22989);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(22990);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(22991);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22992);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(22993);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(22995);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LEFT",4)); if(!qbevent)break;evnt(22996);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(22997);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(22998);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_left",8)); if(!qbevent)break;evnt(22999);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(23000);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(23001);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23002);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23003);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(23005);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RIGHT",5)); if(!qbevent)break;evnt(23006);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(23007);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(23008);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_right",9)); if(!qbevent)break;evnt(23009);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 2 ; if(!qbevent)break;evnt(23010);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(23011);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23012);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23013);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(23015);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LTRIM",5)); if(!qbevent)break;evnt(23016);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(23017);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(23018);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_ltrim",9)); if(!qbevent)break;evnt(23019);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(23020);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(23021);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23022);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23023);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(23025);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RTRIM",5)); if(!qbevent)break;evnt(23026);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); if(!qbevent)break;evnt(23027);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(23028);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_rtrim",9)); if(!qbevent)break;evnt(23029);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(23030);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(23031);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23032);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23033);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(23035);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PRINT",5)); if(!qbevent)break;evnt(23036);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(23037);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_print",9)); if(!qbevent)break;evnt(23038);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(23039);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(23040);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23041);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(23043);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LPRINT",6)); if(!qbevent)break;evnt(23044);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(23045);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_lprint",10)); if(!qbevent)break;evnt(23046);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(23047);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(23048);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23049);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(23051);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LPRINT",6)); if(!qbevent)break;evnt(23052);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(23053);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_lprint",10)); if(!qbevent)break;evnt(23054);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(23055);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(23056);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23057);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(23059);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LPOS",4)); if(!qbevent)break;evnt(23060);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(23061);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_lpos",9)); if(!qbevent)break;evnt(23062);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 1 ; if(!qbevent)break;evnt(23063);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); if(!qbevent)break;evnt(23064);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23065);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(23066);}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(23068);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free50.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_REMOVEELEMENTS(qbs*_SUB_REMOVEELEMENTS_STRING_A,int32*_SUB_REMOVEELEMENTS_LONG_FIRST,int32*_SUB_REMOVEELEMENTS_LONG_LAST,int32*_SUB_REMOVEELEMENTS_LONG_KEEPINDEXING){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data51.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_REMOVEELEMENTS_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23095);}while(r); do{ *_SUB_REMOVEELEMENTS_LONG_N=FUNC_NUMELEMENTS(_SUB_REMOVEELEMENTS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23100);}while(r); S_25310:; fornext_value2816= 1 ; fornext_finalvalue2816=*_SUB_REMOVEELEMENTS_LONG_N; fornext_step2816= 1 ; if (fornext_step2816<0) fornext_step_negative2816=1; else fornext_step_negative2816=0; if (new_error) goto fornext_error2816; goto fornext_entrylabel2816; while(1){ fornext_value2816=fornext_step2816+(*_SUB_REMOVEELEMENTS_LONG_I); fornext_entrylabel2816: *_SUB_REMOVEELEMENTS_LONG_I=fornext_value2816; if (fornext_step_negative2816){ if (fornext_value2816fornext_finalvalue2816) break; } fornext_error2816:; if(qbevent){evnt(23101);if(r)goto S_25310;} S_25311:; if (((-(*_SUB_REMOVEELEMENTS_LONG_I<*_SUB_REMOVEELEMENTS_LONG_FIRST))|(-(*_SUB_REMOVEELEMENTS_LONG_I>*_SUB_REMOVEELEMENTS_LONG_LAST)))||new_error){ if(qbevent){evnt(23102);if(r)goto S_25311;} do{ qbs_set(_SUB_REMOVEELEMENTS_STRING_A2,qbs_add(qbs_add(_SUB_REMOVEELEMENTS_STRING_A2,__STRING1_SP),FUNC_GETELEMENT(_SUB_REMOVEELEMENTS_STRING_A,_SUB_REMOVEELEMENTS_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23103);}while(r); }else{ S_25314:; if ((*_SUB_REMOVEELEMENTS_LONG_KEEPINDEXING)||new_error){ if(qbevent){evnt(23105);if(r)goto S_25314;} do{ qbs_set(_SUB_REMOVEELEMENTS_STRING_A2,qbs_add(_SUB_REMOVEELEMENTS_STRING_A2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23105);}while(r); } } } fornext_exit_2815:; S_25319:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_REMOVEELEMENTS_STRING_A2, 1 ),__STRING1_SP)))||new_error){ if(qbevent){evnt(23108);if(r)goto S_25319;} do{ qbs_set(_SUB_REMOVEELEMENTS_STRING_A2,qbs_right(_SUB_REMOVEELEMENTS_STRING_A2,_SUB_REMOVEELEMENTS_STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23108);}while(r); } do{ qbs_set(_SUB_REMOVEELEMENTS_STRING_A,_SUB_REMOVEELEMENTS_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23110);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free51.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_SYMBOLTYPE(qbs*_FUNC_SYMBOLTYPE_STRING_S){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data52.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_25323:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_SYMBOLTYPE_STRING_S->len== 0 )))||new_error){ if(qbevent){evnt(23119);if(r)goto S_25323;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23119);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_A=qbs_asc(_FUNC_SYMBOLTYPE_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23121);}while(r); do{ *_FUNC_SYMBOLTYPE_LONG_L=_FUNC_SYMBOLTYPE_STRING_S->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23122);}while(r); S_25328:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 37 ))||new_error){ if(qbevent){evnt(23123);if(r)goto S_25328;} S_25329:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(23124);if(r)goto S_25329;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 16 ; if(!qbevent)break;evnt(23124);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23124);}while(r); } S_25333:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 2 ))||new_error){ if(qbevent){evnt(23125);if(r)goto S_25333;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23125);}while(r); } S_25336:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 37 )))||new_error){ if(qbevent){evnt(23126);if(r)goto S_25336;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 8 ; if(!qbevent)break;evnt(23126);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23126);}while(r); } S_25340:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 38 )))||new_error){ if(qbevent){evnt(23127);if(r)goto S_25340;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23127);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23127);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23128);}while(r); } S_25346:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 38 ))||new_error){ if(qbevent){evnt(23130);if(r)goto S_25346;} S_25347:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(23131);if(r)goto S_25347;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 32 ; if(!qbevent)break;evnt(23131);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23131);}while(r); } S_25351:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 2 ))||new_error){ if(qbevent){evnt(23132);if(r)goto S_25351;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23132);}while(r); } S_25354:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 38 )))||new_error){ if(qbevent){evnt(23133);if(r)goto S_25354;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 ; if(!qbevent)break;evnt(23133);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23133);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23134);}while(r); } S_25360:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 33 ))||new_error){ if(qbevent){evnt(23136);if(r)goto S_25360;} S_25361:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(23137);if(r)goto S_25361;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 32 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(23137);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23137);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23138);}while(r); } S_25367:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 35 ))||new_error){ if(qbevent){evnt(23140);if(r)goto S_25367;} S_25368:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(23141);if(r)goto S_25368;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(23141);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23141);}while(r); } S_25372:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 2 ))||new_error){ if(qbevent){evnt(23142);if(r)goto S_25372;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23142);}while(r); } S_25375:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 35 )))||new_error){ if(qbevent){evnt(23143);if(r)goto S_25375;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(23143);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23143);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23144);}while(r); } S_25381:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 36 ))||new_error){ if(qbevent){evnt(23146);if(r)goto S_25381;} S_25382:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(23147);if(r)goto S_25382;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_ISSTRING; if(!qbevent)break;evnt(23147);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23147);}while(r); } S_25386:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 1 ))))||new_error){ if(qbevent){evnt(23148);if(r)goto S_25386;} S_25387:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L>=( 1 + 10 )))||new_error){ if(qbevent){evnt(23149);if(r)goto S_25387;} S_25388:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L>( 1 + 10 )))||new_error){ if(qbevent){evnt(23150);if(r)goto S_25388;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23150);}while(r); } S_25391:; if ((qbs_cleanup(qbs_tmp_base,qbs_greaterthan(_FUNC_SYMBOLTYPE_STRING_S,qbs_new_txt_len("$2147483647",11))))||new_error){ if(qbevent){evnt(23151);if(r)goto S_25391;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23151);}while(r); } } do{ *__LONG_SYMBOLTYPE_SIZE=qbr(func_val(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23153);}while(r); do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(23154);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23155);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23157);}while(r); } S_25401:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 96 ))||new_error){ if(qbevent){evnt(23159);if(r)goto S_25401;} S_25402:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(23160);if(r)goto S_25402;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 1 +*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(23160);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23160);}while(r); } S_25406:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 1 ))))||new_error){ if(qbevent){evnt(23161);if(r)goto S_25406;} S_25407:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 3 ))||new_error){ if(qbevent){evnt(23162);if(r)goto S_25407;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23162);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_N=qbr(func_val(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23163);}while(r); S_25411:; if ((-(*_FUNC_SYMBOLTYPE_LONG_N> 56 ))||new_error){ if(qbevent){evnt(23164);if(r)goto S_25411;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23164);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*_FUNC_SYMBOLTYPE_LONG_N+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(23165);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23165);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23167);}while(r); } S_25419:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 126 ))||new_error){ if(qbevent){evnt(23169);if(r)goto S_25419;} S_25420:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(23170);if(r)goto S_25420;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23170);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_A=qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23171);}while(r); S_25424:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 37 ))||new_error){ if(qbevent){evnt(23172);if(r)goto S_25424;} S_25425:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 2 ))||new_error){ if(qbevent){evnt(23173);if(r)goto S_25425;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 16 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(23173);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23173);}while(r); } S_25429:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 3 ))||new_error){ if(qbevent){evnt(23174);if(r)goto S_25429;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23174);}while(r); } S_25432:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 3 )== 37 )))||new_error){ if(qbevent){evnt(23175);if(r)goto S_25432;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 8 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(23175);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23175);}while(r); } S_25436:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 3 )== 38 )))||new_error){ if(qbevent){evnt(23176);if(r)goto S_25436;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23176);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23176);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23177);}while(r); } S_25442:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 38 ))||new_error){ if(qbevent){evnt(23179);if(r)goto S_25442;} S_25443:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 2 ))||new_error){ if(qbevent){evnt(23180);if(r)goto S_25443;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 32 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(23180);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23180);}while(r); } S_25447:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 3 ))||new_error){ if(qbevent){evnt(23181);if(r)goto S_25447;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23181);}while(r); } S_25450:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 3 )== 38 )))||new_error){ if(qbevent){evnt(23182);if(r)goto S_25450;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(23182);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23182);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23183);}while(r); } S_25456:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 96 ))||new_error){ if(qbevent){evnt(23185);if(r)goto S_25456;} S_25457:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 2 ))||new_error){ if(qbevent){evnt(23186);if(r)goto S_25457;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 1 +*__LONG_ISOFFSETINBITS+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(23186);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23186);}while(r); } S_25461:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 2 ))))||new_error){ if(qbevent){evnt(23187);if(r)goto S_25461;} S_25462:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 4 ))||new_error){ if(qbevent){evnt(23188);if(r)goto S_25462;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23188);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_N=qbr(func_val(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23189);}while(r); S_25466:; if ((-(*_FUNC_SYMBOLTYPE_LONG_N> 56 ))||new_error){ if(qbevent){evnt(23190);if(r)goto S_25466;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23190);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*_FUNC_SYMBOLTYPE_LONG_N+*__LONG_ISOFFSETINBITS+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(23191);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23191);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23193);}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free52.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE; } qbs* FUNC_REMOVESYMBOL(qbs*_FUNC_REMOVESYMBOL_STRING_VARNAME){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data53.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_REMOVESYMBOL_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_new_txt_len("~",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23199);}while(r); S_25476:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(23199);if(r)goto S_25476;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(23199);}while(r); } do{ *_FUNC_REMOVESYMBOL_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_new_txt_len("`",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23200);}while(r); S_25480:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(23200);if(r)goto S_25480;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(23200);}while(r); } do{ *_FUNC_REMOVESYMBOL_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_new_txt_len("%",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23201);}while(r); S_25484:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(23201);if(r)goto S_25484;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(23201);}while(r); } do{ *_FUNC_REMOVESYMBOL_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_new_txt_len("&",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23202);}while(r); S_25488:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(23202);if(r)goto S_25488;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(23202);}while(r); } do{ *_FUNC_REMOVESYMBOL_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_new_txt_len("!",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23203);}while(r); S_25492:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(23203);if(r)goto S_25492;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(23203);}while(r); } do{ *_FUNC_REMOVESYMBOL_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23204);}while(r); S_25496:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(23204);if(r)goto S_25496;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(23204);}while(r); } do{ *_FUNC_REMOVESYMBOL_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_new_txt_len("$",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23205);}while(r); S_25500:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(23205);if(r)goto S_25500;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(23205);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(23206);}while(r); LABEL_FOUNDSYMBOL:; if(qbevent){evnt(23207);r=0;} S_25504:; if ((-(*_FUNC_REMOVESYMBOL_LONG_I== 1 ))||new_error){ if(qbevent){evnt(23208);if(r)goto S_25504;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name before symbol",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23208);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23208);}while(r); } do{ qbs_set(_FUNC_REMOVESYMBOL_STRING_SYMBOL,qbs_right(_FUNC_REMOVESYMBOL_STRING_VARNAME,_FUNC_REMOVESYMBOL_STRING_VARNAME->len-*_FUNC_REMOVESYMBOL_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23209);}while(r); S_25509:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_SYMBOLTYPE(_FUNC_REMOVESYMBOL_STRING_SYMBOL)== 0 )))||new_error){ if(qbevent){evnt(23210);if(r)goto S_25509;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid symbol",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23210);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23210);}while(r); } do{ qbs_set(_FUNC_REMOVESYMBOL_STRING_REMOVESYMBOL,_FUNC_REMOVESYMBOL_STRING_SYMBOL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23211);}while(r); do{ qbs_set(_FUNC_REMOVESYMBOL_STRING_VARNAME,qbs_left(_FUNC_REMOVESYMBOL_STRING_VARNAME,*_FUNC_REMOVESYMBOL_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23212);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free53.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_REMOVESYMBOL_STRING_REMOVESYMBOL);return _FUNC_REMOVESYMBOL_STRING_REMOVESYMBOL; } qbs* FUNC_SCOPE(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data54.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_25515:; if ((*(int16*)(((char*)__UDT_ID)+(2642)))||new_error){ if(qbevent){evnt(23216);if(r)goto S_25515;} do{ qbs_set(_FUNC_SCOPE_STRING_SCOPE,qbs_add(__STRING_MODULE,qbs_new_txt_len("__",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23216);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23216);}while(r); } do{ qbs_set(_FUNC_SCOPE_STRING_SCOPE,qbs_add(qbs_add(qbs_add(__STRING_MODULE,qbs_new_txt_len("_",1)),__STRING_SUBFUNC),qbs_new_txt_len("_",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23217);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free54.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_SCOPE_STRING_SCOPE);return _FUNC_SCOPE_STRING_SCOPE; } int32 FUNC_SEPERATEARGS(qbs*_FUNC_SEPERATEARGS_STRING_A,qbs*_FUNC_SEPERATEARGS_STRING_CA,int32*_FUNC_SEPERATEARGS_LONG_PASS){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data55.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_SEPERATEARGS_LONG_PASS= 0 ; if(!qbevent)break;evnt(23221);}while(r); S_25521:; fornext_value2826= 1 ; fornext_finalvalue2826=*__LONG_OPTMAX; fornext_step2826= 1 ; if (fornext_step2826<0) fornext_step_negative2826=1; else fornext_step_negative2826=0; if (new_error) goto fornext_error2826; goto fornext_entrylabel2826; while(1){ fornext_value2826=fornext_step2826+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2826: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2826; if (fornext_step_negative2826){ if (fornext_value2826fornext_finalvalue2826) break; } fornext_error2826:; if(qbevent){evnt(23223);if(r)goto S_25521;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(23223);}while(r); } fornext_exit_2825:; S_25524:; fornext_value2828= 1 ; fornext_finalvalue2828=*__LONG_OPTMAX+ 1 ; fornext_step2828= 1 ; if (fornext_step2828<0) fornext_step_negative2828=1; else fornext_step_negative2828=0; if (new_error) goto fornext_error2828; goto fornext_entrylabel2828; while(1){ fornext_value2828=fornext_step2828+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2828: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2828; if (fornext_step_negative2828){ if (fornext_value2828fornext_finalvalue2828) break; } fornext_error2828:; if(qbevent){evnt(23224);if(r)goto S_25524;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(23224);}while(r); } fornext_exit_2827:; S_25527:; fornext_value2830= 1 ; fornext_finalvalue2830=*__LONG_OPTMAX; fornext_step2830= 1 ; if (fornext_step2830<0) fornext_step_negative2830=1; else fornext_step_negative2830=0; if (new_error) goto fornext_error2830; goto fornext_entrylabel2830; while(1){ fornext_value2830=fornext_step2830+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2830: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2830; if (fornext_step_negative2830){ if (fornext_value2830fornext_finalvalue2830) break; } fornext_error2830:; if(qbevent){evnt(23225);if(r)goto S_25527;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_LEV[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23226);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23227);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_DITCHLEV[4],__ARRAY_INTEGER_DITCHLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DITCHLEV[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23228);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23229);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23230);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23231);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23232);}while(r); } fornext_exit_2829:; do{ if(!qbevent)break;evnt(23235);}while(r); do{ memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)),(((char*)__UDT_ID)+(0)),2860); if(!qbevent)break;evnt(23237);}while(r); S_25538:; if ((-(*(int16*)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(808))== 0 ))||new_error){ if(qbevent){evnt(23239);if(r)goto S_25538;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23239);}while(r); } do{ qbs_set(_FUNC_SEPERATEARGS_STRING_S,qbs_new_fixed((((uint8*)_FUNC_SEPERATEARGS_UDT_ID2)+(1610)),256,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23242);}while(r); do{ qbs_set(_FUNC_SEPERATEARGS_STRING_S,qbs_rtrim(_FUNC_SEPERATEARGS_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23243);}while(r); S_25543:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23246);if(r)goto S_25543;} S_25544:; fornext_value2832= 1 ; fornext_finalvalue2832=*(int16*)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(808)); fornext_step2832= 1 ; if (fornext_step2832<0) fornext_step_negative2832=1; else fornext_step_negative2832=0; if (new_error) goto fornext_error2832; goto fornext_entrylabel2832; while(1){ fornext_value2832=fornext_step2832+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2832: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2832; if (fornext_step_negative2832){ if (fornext_value2832fornext_finalvalue2832) break; } fornext_error2832:; if(qbevent){evnt(23247);if(r)goto S_25544;} S_25545:; if ((-(*_FUNC_SEPERATEARGS_LONG_I!= 1 ))||new_error){ if(qbevent){evnt(23248);if(r)goto S_25545;} do{ qbs_set(_FUNC_SEPERATEARGS_STRING_S,qbs_add(_FUNC_SEPERATEARGS_STRING_S,qbs_new_txt_len(",?",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23248);}while(r); }else{ do{ qbs_set(_FUNC_SEPERATEARGS_STRING_S,qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23248);}while(r); } } fornext_exit_2831:; } do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG= 1 ; if(!qbevent)break;evnt(23254);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_NEXTENTRYLEVEL= 0 ; if(!qbevent)break;evnt(23255);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_NEXTENTRYLEVELSET= 1 ; if(!qbevent)break;evnt(23256);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL= 0 ; if(!qbevent)break;evnt(23257);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LASTT= 0 ; if(!qbevent)break;evnt(23258);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL= 0 ; if(!qbevent)break;evnt(23259);}while(r); S_25558:; fornext_value2834= 1 ; fornext_finalvalue2834=_FUNC_SEPERATEARGS_STRING_S->len; fornext_step2834= 1 ; if (fornext_step2834<0) fornext_step_negative2834=1; else fornext_step_negative2834=0; if (new_error) goto fornext_error2834; goto fornext_entrylabel2834; while(1){ fornext_value2834=fornext_step2834+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2834: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2834; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2834){ if (fornext_value2834fornext_finalvalue2834) break; } fornext_error2834:; if(qbevent){evnt(23260);if(r)goto S_25558;} do{ qbs_set(_FUNC_SEPERATEARGS_STRING_S2,func_mid(_FUNC_SEPERATEARGS_STRING_S,*_FUNC_SEPERATEARGS_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23261);}while(r); S_25560:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("[",1))))||new_error){ if(qbevent){evnt(23263);if(r)goto S_25560;} do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL+ 1 ; if(!qbevent)break;evnt(23264);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LEVEL)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23265);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(23266);}while(r); } S_25565:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("]",1))))||new_error){ if(qbevent){evnt(23269);if(r)goto S_25565;} do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; if(!qbevent)break;evnt(23270);}while(r); S_25567:; if ((-(*_FUNC_SEPERATEARGS_LONG_LEVEL<*_FUNC_SEPERATEARGS_LONG_DITCHLEVEL))||new_error){ if(qbevent){evnt(23271);if(r)goto S_25567;} do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23271);}while(r); } do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(23272);}while(r); } S_25572:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("{",1))))||new_error){ if(qbevent){evnt(23275);if(r)goto S_25572;} do{ *_FUNC_SEPERATEARGS_LONG_LASTT=*_FUNC_SEPERATEARGS_LONG_LASTT+ 1 ; if(!qbevent)break;evnt(23276);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_LEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23276);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23276);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_DITCHLEV[4],__ARRAY_INTEGER_DITCHLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DITCHLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_DITCHLEVEL; if(!qbevent)break;evnt(23277);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23277);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_I+ 1 ; if(!qbevent)break;evnt(23278);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I2=func_instr(*_FUNC_SEPERATEARGS_LONG_I,_FUNC_SEPERATEARGS_STRING_S,qbs_new_txt_len("}",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23279);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_NUMOPTS= 0 ; if(!qbevent)break;evnt(23280);}while(r); LABEL_NEXTOPT:; if(qbevent){evnt(23281);r=0;} do{ *_FUNC_SEPERATEARGS_LONG_NUMOPTS=*_FUNC_SEPERATEARGS_LONG_NUMOPTS+ 1 ; if(!qbevent)break;evnt(23282);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I3=func_instr(*_FUNC_SEPERATEARGS_LONG_I+ 1 ,_FUNC_SEPERATEARGS_STRING_S,qbs_new_txt_len("|",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23283);}while(r); S_25583:; if (((-(*_FUNC_SEPERATEARGS_LONG_I3!= 0 ))&(-(*_FUNC_SEPERATEARGS_LONG_I3<*_FUNC_SEPERATEARGS_LONG_I2)))||new_error){ if(qbevent){evnt(23284);if(r)goto S_25583;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check((*_FUNC_SEPERATEARGS_LONG_NUMOPTS)-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6]; if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[tmp_long*256],256,1),func_mid(_FUNC_SEPERATEARGS_STRING_S,*_FUNC_SEPERATEARGS_LONG_I,*_FUNC_SEPERATEARGS_LONG_I3-*_FUNC_SEPERATEARGS_LONG_I,1)); if(!qbevent)break;evnt(23285);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_I3+ 1 ; if(!qbevent)break;evnt(23286);}while(r); do{ goto LABEL_NEXTOPT; if(!qbevent)break;evnt(23286);}while(r); } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check((*_FUNC_SEPERATEARGS_LONG_NUMOPTS)-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6]; if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[tmp_long*256],256,1),func_mid(_FUNC_SEPERATEARGS_STRING_S,*_FUNC_SEPERATEARGS_LONG_I,*_FUNC_SEPERATEARGS_LONG_I2-*_FUNC_SEPERATEARGS_LONG_I,1)); if(!qbevent)break;evnt(23288);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_T[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_NUMOPTS; if(!qbevent)break;evnt(23289);}while(r); S_25590:; fornext_value2837= 1 ; fornext_finalvalue2837=((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]; fornext_step2837= 1 ; if (fornext_step2837<0) fornext_step_negative2837=1; else fornext_step_negative2837=0; if (new_error) goto fornext_error2837; goto fornext_entrylabel2837; while(1){ fornext_value2837=fornext_step2837+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel2837: *_FUNC_SEPERATEARGS_LONG_X=fornext_value2837; if (fornext_step_negative2837){ if (fornext_value2837fornext_finalvalue2837) break; } fornext_error2837:; if(qbevent){evnt(23291);if(r)goto S_25590;} do{ *_FUNC_SEPERATEARGS_LONG_W= 1 ; if(!qbevent)break;evnt(23292);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_X2= 1 ; if(!qbevent)break;evnt(23293);}while(r); LABEL_NEWWORD:; if(qbevent){evnt(23294);r=0;} S_25593:; if ((qbs_cleanup(qbs_tmp_base,func_instr(*_FUNC_SEPERATEARGS_LONG_X2,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1)),qbs_new_txt_len(" ",1),1)))||new_error){ if(qbevent){evnt(23295);if(r)goto S_25593;} do{ *_FUNC_SEPERATEARGS_LONG_W=*_FUNC_SEPERATEARGS_LONG_W+ 1 ; if(!qbevent)break;evnt(23295);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_X2=func_instr(*_FUNC_SEPERATEARGS_LONG_X2,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1)),qbs_new_txt_len(" ",1),1)+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23295);}while(r); do{ goto LABEL_NEWWORD; if(!qbevent)break;evnt(23295);}while(r); } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_OPTWORDS[8],__ARRAY_INTEGER_OPTWORDS[9])+array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_OPTWORDS[4],__ARRAY_INTEGER_OPTWORDS[5])*__ARRAY_INTEGER_OPTWORDS[6]; if (!new_error) ((int16*)(__ARRAY_INTEGER_OPTWORDS[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_W; if(!qbevent)break;evnt(23296);}while(r); } fornext_exit_2836:; do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_I2; if(!qbevent)break;evnt(23298);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23301);}while(r); S_25602:; if ((-(((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_LEVEL)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5])]== 0 ))||new_error){ if(qbevent){evnt(23302);if(r)goto S_25602;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23303);}while(r); S_25604:; fornext_value2839= 1 ; fornext_finalvalue2839=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; fornext_step2839= 1 ; if (fornext_step2839<0) fornext_step_negative2839=1; else fornext_step_negative2839=0; if (new_error) goto fornext_error2839; goto fornext_entrylabel2839; while(1){ fornext_value2839=fornext_step2839+(*_FUNC_SEPERATEARGS_LONG_I2); fornext_entrylabel2839: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value2839; if (fornext_step_negative2839){ if (fornext_value2839fornext_finalvalue2839) break; } fornext_error2839:; if(qbevent){evnt(23304);if(r)goto S_25604;} S_25605:; if ((-(((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I2)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5])]== 1 ))||new_error){ if(qbevent){evnt(23305);if(r)goto S_25605;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_I2; if(!qbevent)break;evnt(23305);}while(r); } } fornext_exit_2838:; } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LEVEL)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23308);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(23310);}while(r); } S_25613:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(23313);if(r)goto S_25613;} do{ *_FUNC_SEPERATEARGS_LONG_LASTT=*_FUNC_SEPERATEARGS_LONG_LASTT+ 1 ; if(!qbevent)break;evnt(23314);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_LEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23314);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23314);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_DITCHLEV[4],__ARRAY_INTEGER_DITCHLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DITCHLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_DITCHLEVEL; if(!qbevent)break;evnt(23315);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23315);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_T[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23316);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23318);}while(r); S_25621:; if ((-(((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_LEVEL)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5])]== 0 ))||new_error){ if(qbevent){evnt(23319);if(r)goto S_25621;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23320);}while(r); S_25623:; fornext_value2841= 1 ; fornext_finalvalue2841=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; fornext_step2841= 1 ; if (fornext_step2841<0) fornext_step_negative2841=1; else fornext_step_negative2841=0; if (new_error) goto fornext_error2841; goto fornext_entrylabel2841; while(1){ fornext_value2841=fornext_step2841+(*_FUNC_SEPERATEARGS_LONG_I2); fornext_entrylabel2841: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value2841; if (fornext_step_negative2841){ if (fornext_value2841fornext_finalvalue2841) break; } fornext_error2841:; if(qbevent){evnt(23321);if(r)goto S_25623;} S_25624:; if ((-(((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I2)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5])]== 1 ))||new_error){ if(qbevent){evnt(23322);if(r)goto S_25624;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_I2; if(!qbevent)break;evnt(23322);}while(r); } } fornext_exit_2840:; } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LEVEL)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23325);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(23327);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_LASTT=*_FUNC_SEPERATEARGS_LONG_LASTT+ 1 ; if(!qbevent)break;evnt(23331);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_LEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23331);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23331);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_DITCHLEV[4],__ARRAY_INTEGER_DITCHLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DITCHLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_DITCHLEVEL; if(!qbevent)break;evnt(23332);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23332);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_T[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23333);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check(( 1 )-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6]; if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[tmp_long*256],256,1),_FUNC_SEPERATEARGS_STRING_S2); if(!qbevent)break;evnt(23333);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_OPTWORDS[8],__ARRAY_INTEGER_OPTWORDS[9])+array_check(( 1 )-__ARRAY_INTEGER_OPTWORDS[4],__ARRAY_INTEGER_OPTWORDS[5])*__ARRAY_INTEGER_OPTWORDS[6]; if (!new_error) ((int16*)(__ARRAY_INTEGER_OPTWORDS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23333);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23333);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23336);}while(r); S_25642:; if ((-(((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_LEVEL)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5])]== 0 ))||new_error){ if(qbevent){evnt(23337);if(r)goto S_25642;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23338);}while(r); S_25644:; fornext_value2843= 1 ; fornext_finalvalue2843=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; fornext_step2843= 1 ; if (fornext_step2843<0) fornext_step_negative2843=1; else fornext_step_negative2843=0; if (new_error) goto fornext_error2843; goto fornext_entrylabel2843; while(1){ fornext_value2843=fornext_step2843+(*_FUNC_SEPERATEARGS_LONG_I2); fornext_entrylabel2843: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value2843; if (fornext_step_negative2843){ if (fornext_value2843fornext_finalvalue2843) break; } fornext_error2843:; if(qbevent){evnt(23339);if(r)goto S_25644;} S_25645:; if ((-(((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I2)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5])]== 1 ))||new_error){ if(qbevent){evnt(23340);if(r)goto S_25645;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_I2; if(!qbevent)break;evnt(23340);}while(r); } } fornext_exit_2842:; } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_LEVEL)-__ARRAY_LONG_LEVELENTERED[4],__ARRAY_LONG_LEVELENTERED[5]); if (!new_error) ((int32*)(__ARRAY_LONG_LEVELENTERED[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23343);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(23345);}while(r); LABEL_NEXTSYMBOL:; if(qbevent){evnt(23347);r=0;} } fornext_exit_2833:; S_25653:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(23351);if(r)goto S_25653;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2844; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #1:1--------",46), 0 , 0 , 1 ); if (new_error) goto skip2844; skip2844: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23352);}while(r); S_25655:; fornext_value2846= 1 ; fornext_finalvalue2846=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2846= 1 ; if (fornext_step2846<0) fornext_step_negative2846=1; else fornext_step_negative2846=0; if (new_error) goto fornext_error2846; goto fornext_entrylabel2846; while(1){ fornext_value2846=fornext_step2846+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2846: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2846; if (fornext_step_negative2846){ if (fornext_value2846fornext_finalvalue2846) break; } fornext_error2846:; if(qbevent){evnt(23353);if(r)goto S_25655;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2847; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2847; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("OPT=",4),func_chr( 34 )),qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check(( 1 )-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1))),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip2847; skip2847: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23354);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2848; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2848; sub_file_print(tmp_fileno,qbs_new_txt_len("OPTWORDS=",9), 0 , 0 , 0 ); if (new_error) goto skip2848; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_OPTWORDS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_OPTWORDS[8],__ARRAY_INTEGER_OPTWORDS[9])+array_check(( 1 )-__ARRAY_INTEGER_OPTWORDS[4],__ARRAY_INTEGER_OPTWORDS[5])*__ARRAY_INTEGER_OPTWORDS[6]])), 1 , 0 , 1 ); if (new_error) goto skip2848; skip2848: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23355);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2849; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2849; sub_file_print(tmp_fileno,qbs_new_txt_len("T=",2), 0 , 0 , 0 ); if (new_error) goto skip2849; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])])), 1 , 0 , 1 ); if (new_error) goto skip2849; skip2849: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23356);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2850; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2850; sub_file_print(tmp_fileno,qbs_new_txt_len("DONTPASS=",9), 0 , 0 , 0 ); if (new_error) goto skip2850; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5])])), 1 , 0 , 1 ); if (new_error) goto skip2850; skip2850: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23357);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2851; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2851; sub_file_print(tmp_fileno,qbs_new_txt_len("PASSRULE=",9), 0 , 0 , 0 ); if (new_error) goto skip2851; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_PASSRULE[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5])])), 1 , 0 , 1 ); if (new_error) goto skip2851; skip2851: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23358);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2852; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2852; sub_file_print(tmp_fileno,qbs_new_txt_len("LEV=",4), 0 , 0 , 0 ); if (new_error) goto skip2852; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])])), 1 , 0 , 1 ); if (new_error) goto skip2852; skip2852: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23359);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2853; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2853; sub_file_print(tmp_fileno,qbs_new_txt_len("ENTRYLEV=",9), 0 , 0 , 0 ); if (new_error) goto skip2853; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])])), 1 , 0 , 1 ); if (new_error) goto skip2853; skip2853: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23360);}while(r); } fornext_exit_2845:; } S_25665:; fornext_value2855= 1 ; fornext_finalvalue2855=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2855= 1 ; if (fornext_step2855<0) fornext_step_negative2855=1; else fornext_step_negative2855=0; if (new_error) goto fornext_error2855; goto fornext_entrylabel2855; while(1){ fornext_value2855=fornext_step2855+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel2855: *_FUNC_SEPERATEARGS_LONG_X=fornext_value2855; if (fornext_step_negative2855){ if (fornext_value2855fornext_finalvalue2855) break; } fornext_error2855:; if(qbevent){evnt(23368);if(r)goto S_25665;} S_25666:; if ((-(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]== 0 ))||new_error){ if(qbevent){evnt(23369);if(r)goto S_25666;} S_25667:; if ((-(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]== 1 ))||new_error){ if(qbevent){evnt(23370);if(r)goto S_25667;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23370);}while(r); } } } fornext_exit_2854:; S_25672:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(23374);if(r)goto S_25672;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2856; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #1:2--------",46), 0 , 0 , 1 ); if (new_error) goto skip2856; skip2856: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23375);}while(r); S_25674:; fornext_value2858= 1 ; fornext_finalvalue2858=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2858= 1 ; if (fornext_step2858<0) fornext_step_negative2858=1; else fornext_step_negative2858=0; if (new_error) goto fornext_error2858; goto fornext_entrylabel2858; while(1){ fornext_value2858=fornext_step2858+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2858: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2858; if (fornext_step_negative2858){ if (fornext_value2858fornext_finalvalue2858) break; } fornext_error2858:; if(qbevent){evnt(23376);if(r)goto S_25674;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2859; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2859; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("OPT=",4),func_chr( 34 )),qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check(( 1 )-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1))),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip2859; skip2859: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23377);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2860; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2860; sub_file_print(tmp_fileno,qbs_new_txt_len("OPTWORDS=",9), 0 , 0 , 0 ); if (new_error) goto skip2860; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_OPTWORDS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_OPTWORDS[8],__ARRAY_INTEGER_OPTWORDS[9])+array_check(( 1 )-__ARRAY_INTEGER_OPTWORDS[4],__ARRAY_INTEGER_OPTWORDS[5])*__ARRAY_INTEGER_OPTWORDS[6]])), 1 , 0 , 1 ); if (new_error) goto skip2860; skip2860: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23378);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2861; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2861; sub_file_print(tmp_fileno,qbs_new_txt_len("T=",2), 0 , 0 , 0 ); if (new_error) goto skip2861; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])])), 1 , 0 , 1 ); if (new_error) goto skip2861; skip2861: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23379);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2862; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2862; sub_file_print(tmp_fileno,qbs_new_txt_len("DONTPASS=",9), 0 , 0 , 0 ); if (new_error) goto skip2862; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5])])), 1 , 0 , 1 ); if (new_error) goto skip2862; skip2862: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23380);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2863; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2863; sub_file_print(tmp_fileno,qbs_new_txt_len("PASSRULE=",9), 0 , 0 , 0 ); if (new_error) goto skip2863; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_PASSRULE[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5])])), 1 , 0 , 1 ); if (new_error) goto skip2863; skip2863: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23381);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2864; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2864; sub_file_print(tmp_fileno,qbs_new_txt_len("LEV=",4), 0 , 0 , 0 ); if (new_error) goto skip2864; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])])), 1 , 0 , 1 ); if (new_error) goto skip2864; skip2864: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23382);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2865; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2865; sub_file_print(tmp_fileno,qbs_new_txt_len("ENTRYLEV=",9), 0 , 0 , 0 ); if (new_error) goto skip2865; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])])), 1 , 0 , 1 ); if (new_error) goto skip2865; skip2865: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23383);}while(r); } fornext_exit_2857:; } do{ *_FUNC_SEPERATEARGS_LONG_X1= 0 ; if(!qbevent)break;evnt(23390);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT= 0 ; if(!qbevent)break;evnt(23391);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 0 ; if(!qbevent)break;evnt(23392);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN= 0 ; if(!qbevent)break;evnt(23397);}while(r); S_25688:; fornext_value2867= 1 ; fornext_finalvalue2867= 32767 ; fornext_step2867= 1 ; if (fornext_step2867<0) fornext_step_negative2867=1; else fornext_step_negative2867=0; if (new_error) goto fornext_error2867; goto fornext_entrylabel2867; while(1){ fornext_value2867=fornext_step2867+(*_FUNC_SEPERATEARGS_LONG_L); fornext_entrylabel2867: *_FUNC_SEPERATEARGS_LONG_L=fornext_value2867; if (fornext_step_negative2867){ if (fornext_value2867fornext_finalvalue2867) break; } fornext_error2867:; if(qbevent){evnt(23398);if(r)goto S_25688;} do{ *_FUNC_SEPERATEARGS_LONG_SCANNEXTLEVEL= 0 ; if(!qbevent)break;evnt(23399);}while(r); S_25690:; fornext_value2869= 1 ; fornext_finalvalue2869=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2869= 1 ; if (fornext_step2869<0) fornext_step_negative2869=1; else fornext_step_negative2869=0; if (new_error) goto fornext_error2869; goto fornext_entrylabel2869; while(1){ fornext_value2869=fornext_step2869+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel2869: *_FUNC_SEPERATEARGS_LONG_X=fornext_value2869; if (fornext_step_negative2869){ if (fornext_value2869fornext_finalvalue2869) break; } fornext_error2869:; if(qbevent){evnt(23400);if(r)goto S_25690;} S_25691:; if ((-(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]>*_FUNC_SEPERATEARGS_LONG_L))||new_error){ if(qbevent){evnt(23401);if(r)goto S_25691;} do{ *_FUNC_SEPERATEARGS_LONG_SCANNEXTLEVEL= 1 ; if(!qbevent)break;evnt(23401);}while(r); } S_25694:; if ((*_FUNC_SEPERATEARGS_LONG_X1)||new_error){ if(qbevent){evnt(23403);if(r)goto S_25694;} S_25695:; if ((-(((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])]<*_FUNC_SEPERATEARGS_LONG_L))||new_error){ if(qbevent){evnt(23404);if(r)goto S_25695;} S_25696:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT)||new_error){ if(qbevent){evnt(23405);if(r)goto S_25696;} S_25697:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG)||new_error){ if(qbevent){evnt(23408);if(r)goto S_25697;} S_25698:; fornext_value2871= 1 ; fornext_finalvalue2871=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step2871= 1 ; if (fornext_step2871<0) fornext_step_negative2871=1; else fornext_step_negative2871=0; if (new_error) goto fornext_error2871; goto fornext_entrylabel2871; while(1){ fornext_value2871=fornext_step2871+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel2871: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value2871; if (fornext_step_negative2871){ if (fornext_value2871fornext_finalvalue2871) break; } fornext_error2871:; if(qbevent){evnt(23410);if(r)goto S_25698;} do{ tmp_long=array_check((((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])])-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_PASSFLAG; if(!qbevent)break;evnt(23411);}while(r); } fornext_exit_2870:; do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(23413);}while(r); }else{ S_25703:; fornext_value2873= 1 ; fornext_finalvalue2873=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step2873= 1 ; if (fornext_step2873<0) fornext_step_negative2873=1; else fornext_step_negative2873=0; if (new_error) goto fornext_error2873; goto fornext_entrylabel2873; while(1){ fornext_value2873=fornext_step2873+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel2873: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value2873; if (fornext_step_negative2873){ if (fornext_value2873fornext_finalvalue2873) break; } fornext_error2873:; if(qbevent){evnt(23417);if(r)goto S_25703;} S_25704:; if ((-(((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])]!=*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT))||new_error){ if(qbevent){evnt(23418);if(r)goto S_25704;} do{ tmp_long=array_check((((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])])-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]=-(*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT); if(!qbevent)break;evnt(23418);}while(r); } } fornext_exit_2872:; } }else{ S_25710:; fornext_value2875= 1 ; fornext_finalvalue2875=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step2875= 1 ; if (fornext_step2875<0) fornext_step_negative2875=1; else fornext_step_negative2875=0; if (new_error) goto fornext_error2875; goto fornext_entrylabel2875; while(1){ fornext_value2875=fornext_step2875+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel2875: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value2875; if (fornext_step_negative2875){ if (fornext_value2875fornext_finalvalue2875) break; } fornext_error2875:; if(qbevent){evnt(23423);if(r)goto S_25710;} do{ tmp_long=array_check((((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])])-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_PASSFLAG; if(!qbevent)break;evnt(23423);}while(r); } fornext_exit_2874:; S_25713:; if ((-(*_FUNC_SEPERATEARGS_LONG_TEMPLISTN!= 0 ))||new_error){ if(qbevent){evnt(23424);if(r)goto S_25713;} do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(23424);}while(r); } } do{ *_FUNC_SEPERATEARGS_LONG_X1= 0 ; if(!qbevent)break;evnt(23426);}while(r); } } S_25720:; if ((-(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]==*_FUNC_SEPERATEARGS_LONG_L))||new_error){ if(qbevent){evnt(23431);if(r)goto S_25720;} S_25721:; if ((-(((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])]<*_FUNC_SEPERATEARGS_LONG_L))||new_error){ if(qbevent){evnt(23432);if(r)goto S_25721;} do{ *_FUNC_SEPERATEARGS_LONG_X1=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23433);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT= 0 ; if(!qbevent)break;evnt(23434);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN= 0 ; if(!qbevent)break;evnt(23435);}while(r); } } S_25727:; if ((*_FUNC_SEPERATEARGS_LONG_X1)||new_error){ if(qbevent){evnt(23439);if(r)goto S_25727;} S_25728:; if ((-(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]==*_FUNC_SEPERATEARGS_LONG_L))||new_error){ if(qbevent){evnt(23440);if(r)goto S_25728;} S_25729:; if ((-(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]!= 1 ))||new_error){ if(qbevent){evnt(23442);if(r)goto S_25729;} S_25730:; if ((-(*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT== 0 ))||new_error){ if(qbevent){evnt(23444);if(r)goto S_25730;} do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23445);}while(r); S_25732:; if ((-(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]== 0 ))||new_error){ if(qbevent){evnt(23446);if(r)goto S_25732;} do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 1 ; if(!qbevent)break;evnt(23446);}while(r); }else{ do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 0 ; if(!qbevent)break;evnt(23446);}while(r); } }else{ S_25738:; if ((-(*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG== 1 ))||new_error){ if(qbevent){evnt(23450);if(r)goto S_25738;} S_25739:; if ((-(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]> 1 ))||new_error){ if(qbevent){evnt(23451);if(r)goto S_25739;} do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23452);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 0 ; if(!qbevent)break;evnt(23452);}while(r); } } } do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN+ 1 ; if(!qbevent)break;evnt(23457);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_TEMPLISTN)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23457);}while(r); } S_25748:; if ((-(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]== 1 ))||new_error){ if(qbevent){evnt(23460);if(r)goto S_25748;} S_25749:; if ((-(((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5])]== 0 ))||new_error){ if(qbevent){evnt(23466);if(r)goto S_25749;} do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN+ 1 ; if(!qbevent)break;evnt(23466);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_TEMPLISTN)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23466);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23466);}while(r); } } } } } fornext_exit_2868:; S_25758:; if ((*_FUNC_SEPERATEARGS_LONG_X1)||new_error){ if(qbevent){evnt(23475);if(r)goto S_25758;} S_25759:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT)||new_error){ if(qbevent){evnt(23476);if(r)goto S_25759;} S_25760:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG)||new_error){ if(qbevent){evnt(23479);if(r)goto S_25760;} S_25761:; fornext_value2877= 1 ; fornext_finalvalue2877=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step2877= 1 ; if (fornext_step2877<0) fornext_step_negative2877=1; else fornext_step_negative2877=0; if (new_error) goto fornext_error2877; goto fornext_entrylabel2877; while(1){ fornext_value2877=fornext_step2877+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel2877: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value2877; if (fornext_step_negative2877){ if (fornext_value2877fornext_finalvalue2877) break; } fornext_error2877:; if(qbevent){evnt(23481);if(r)goto S_25761;} do{ tmp_long=array_check((((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])])-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_PASSFLAG; if(!qbevent)break;evnt(23482);}while(r); } fornext_exit_2876:; do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(23484);}while(r); }else{ S_25766:; fornext_value2879= 1 ; fornext_finalvalue2879=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step2879= 1 ; if (fornext_step2879<0) fornext_step_negative2879=1; else fornext_step_negative2879=0; if (new_error) goto fornext_error2879; goto fornext_entrylabel2879; while(1){ fornext_value2879=fornext_step2879+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel2879: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value2879; if (fornext_step_negative2879){ if (fornext_value2879fornext_finalvalue2879) break; } fornext_error2879:; if(qbevent){evnt(23488);if(r)goto S_25766;} S_25767:; if ((-(((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])]!=*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT))||new_error){ if(qbevent){evnt(23489);if(r)goto S_25767;} do{ tmp_long=array_check((((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])])-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]=-(*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT); if(!qbevent)break;evnt(23489);}while(r); } } fornext_exit_2878:; } }else{ S_25773:; fornext_value2881= 1 ; fornext_finalvalue2881=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step2881= 1 ; if (fornext_step2881<0) fornext_step_negative2881=1; else fornext_step_negative2881=0; if (new_error) goto fornext_error2881; goto fornext_entrylabel2881; while(1){ fornext_value2881=fornext_step2881+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel2881: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value2881; if (fornext_step_negative2881){ if (fornext_value2881fornext_finalvalue2881) break; } fornext_error2881:; if(qbevent){evnt(23494);if(r)goto S_25773;} do{ tmp_long=array_check((((int16*)(__ARRAY_INTEGER_TEMPLIST[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_INTEGER_TEMPLIST[4],__ARRAY_INTEGER_TEMPLIST[5])])-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_PASSRULE[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_PASSFLAG; if(!qbevent)break;evnt(23494);}while(r); } fornext_exit_2880:; S_25776:; if ((-(*_FUNC_SEPERATEARGS_LONG_TEMPLISTN!= 0 ))||new_error){ if(qbevent){evnt(23495);if(r)goto S_25776;} do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(23495);}while(r); } } do{ *_FUNC_SEPERATEARGS_LONG_X1= 0 ; if(!qbevent)break;evnt(23497);}while(r); } S_25782:; if ((-(*_FUNC_SEPERATEARGS_LONG_SCANNEXTLEVEL== 0 ))||new_error){ if(qbevent){evnt(23500);if(r)goto S_25782;} do{ goto fornext_exit_2866; if(!qbevent)break;evnt(23500);}while(r); } } fornext_exit_2866:; S_25786:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(23503);if(r)goto S_25786;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2882; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #1:3--------",46), 0 , 0 , 1 ); if (new_error) goto skip2882; skip2882: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23504);}while(r); S_25788:; fornext_value2884= 1 ; fornext_finalvalue2884=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2884= 1 ; if (fornext_step2884<0) fornext_step_negative2884=1; else fornext_step_negative2884=0; if (new_error) goto fornext_error2884; goto fornext_entrylabel2884; while(1){ fornext_value2884=fornext_step2884+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2884: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2884; if (fornext_step_negative2884){ if (fornext_value2884fornext_finalvalue2884) break; } fornext_error2884:; if(qbevent){evnt(23505);if(r)goto S_25788;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2885; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2885; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("OPT=",4),func_chr( 34 )),qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check(( 1 )-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1))),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip2885; skip2885: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23506);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2886; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2886; sub_file_print(tmp_fileno,qbs_new_txt_len("OPTWORDS=",9), 0 , 0 , 0 ); if (new_error) goto skip2886; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_OPTWORDS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_OPTWORDS[8],__ARRAY_INTEGER_OPTWORDS[9])+array_check(( 1 )-__ARRAY_INTEGER_OPTWORDS[4],__ARRAY_INTEGER_OPTWORDS[5])*__ARRAY_INTEGER_OPTWORDS[6]])), 1 , 0 , 1 ); if (new_error) goto skip2886; skip2886: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23507);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2887; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2887; sub_file_print(tmp_fileno,qbs_new_txt_len("T=",2), 0 , 0 , 0 ); if (new_error) goto skip2887; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])])), 1 , 0 , 1 ); if (new_error) goto skip2887; skip2887: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23508);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2888; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2888; sub_file_print(tmp_fileno,qbs_new_txt_len("DONTPASS=",9), 0 , 0 , 0 ); if (new_error) goto skip2888; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5])])), 1 , 0 , 1 ); if (new_error) goto skip2888; skip2888: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23509);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2889; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2889; sub_file_print(tmp_fileno,qbs_new_txt_len("PASSRULE=",9), 0 , 0 , 0 ); if (new_error) goto skip2889; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_PASSRULE[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5])])), 1 , 0 , 1 ); if (new_error) goto skip2889; skip2889: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23510);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2890; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2890; sub_file_print(tmp_fileno,qbs_new_txt_len("LEV=",4), 0 , 0 , 0 ); if (new_error) goto skip2890; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])])), 1 , 0 , 1 ); if (new_error) goto skip2890; skip2890: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23511);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2891; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2891; sub_file_print(tmp_fileno,qbs_new_txt_len("ENTRYLEV=",9), 0 , 0 , 0 ); if (new_error) goto skip2891; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])])), 1 , 0 , 1 ); if (new_error) goto skip2891; skip2891: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23512);}while(r); } fornext_exit_2883:; } S_25798:; fornext_value2893= 1 ; fornext_finalvalue2893=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2893= 1 ; if (fornext_step2893<0) fornext_step_negative2893=1; else fornext_step_negative2893=0; if (new_error) goto fornext_error2893; goto fornext_entrylabel2893; while(1){ fornext_value2893=fornext_step2893+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2893: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2893; if (fornext_step_negative2893){ if (fornext_value2893fornext_finalvalue2893) break; } fornext_error2893:; if(qbevent){evnt(23518);if(r)goto S_25798;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),qbs_new_txt_len("null",4)); if(!qbevent)break;evnt(23518);}while(r); } fornext_exit_2892:; do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES= 0 ; if(!qbevent)break;evnt(23536);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&1){ error(10); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[4]= 1 ; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[5]=( 100 )-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[4]+1; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[6]=1; if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&4){ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[5]*4); memset((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]),0,_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[5]*4); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]=(ptrszint)calloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[5]*4,1); if (!_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]) error(257); } _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]|=1; } } if(!qbevent)break;evnt(23537);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]&1){ error(10); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[4]= 1 ; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]=( 100 )-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[4]+1; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[6]=1; if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]&4){ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]*4); memset((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]),0,_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]*4); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]=(ptrszint)calloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]*4,1); if (!_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]) error(257); } _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]|=1; } } if(!qbevent)break;evnt(23538);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]&1){ error(10); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[4]= 1 ; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[5]=( 100 )-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[4]+1; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[6]=1; if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]&4){ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[5]*4); memset((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]),0,_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[5]*4); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]=(ptrszint)calloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[5]*4,1); if (!_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]) error(257); } _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]|=1; } } if(!qbevent)break;evnt(23541);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]&1){ error(10); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[4]= 1 ; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[5]=( 100 )-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[4]+1; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[6]=1; if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]&4){ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[5]*4); memset((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]),0,_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[5]*4); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]=(ptrszint)calloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[5]*4,1); if (!_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]) error(257); } _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]|=1; } } if(!qbevent)break;evnt(23542);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]&1){ error(10); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[4]= 1 ; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[5]=( 100 )-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[4]+1; _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[6]=1; if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]&4){ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[5]*4); memset((void*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]),0,_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[5]*4); }else{ _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]=(ptrszint)calloc(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[5]*4,1); if (!_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]) error(257); } _FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]|=1; } } if(!qbevent)break;evnt(23545);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_N=FUNC_NUMELEMENTS(_FUNC_SEPERATEARGS_STRING_CA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23547);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I= 1 ; if(!qbevent)break;evnt(23548);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL= 0 ; if(!qbevent)break;evnt(23550);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_EXPRESSION= 0 ; if(!qbevent)break;evnt(23551);}while(r); S_25811:; fornext_value2895= 1 ; fornext_finalvalue2895=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2895= 1 ; if (fornext_step2895<0) fornext_step_negative2895=1; else fornext_step_negative2895=0; if (new_error) goto fornext_error2895; goto fornext_entrylabel2895; while(1){ fornext_value2895=fornext_step2895+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel2895: *_FUNC_SEPERATEARGS_LONG_X=fornext_value2895; if (fornext_step_negative2895){ if (fornext_value2895fornext_finalvalue2895) break; } fornext_error2895:; if(qbevent){evnt(23552);if(r)goto S_25811;} LABEL_CONTINUESCAN:; if(qbevent){evnt(23554);r=0;} S_25812:; if ((-(((int16*)(__ARRAY_INTEGER_DITCHLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_DITCHLEV[4],__ARRAY_INTEGER_DITCHLEV[5])]<*_FUNC_SEPERATEARGS_LONG_LEVEL))||new_error){ if(qbevent){evnt(23556);if(r)goto S_25812;} do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=((int16*)(__ARRAY_INTEGER_DITCHLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_DITCHLEV[4],__ARRAY_INTEGER_DITCHLEV[5])]; if(!qbevent)break;evnt(23558);}while(r); } S_25815:; if ((-(((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])]<=*_FUNC_SEPERATEARGS_LONG_LEVEL))||new_error){ if(qbevent){evnt(23561);if(r)goto S_25815;} S_25816:; if ((-(((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])]<((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]))||new_error){ if(qbevent){evnt(23564);if(r)goto S_25816;} do{ *_FUNC_SEPERATEARGS_LONG_OPTIONAL= 1 ; if(!qbevent)break;evnt(23565);}while(r); S_25818:; if ((-(*_FUNC_SEPERATEARGS_LONG_LEVEL>((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])]))||new_error){ if(qbevent){evnt(23566);if(r)goto S_25818;} do{ *_FUNC_SEPERATEARGS_LONG_OPTIONAL= 0 ; if(!qbevent)break;evnt(23566);}while(r); } }else{ do{ *_FUNC_SEPERATEARGS_LONG_OPTIONAL= 0 ; if(!qbevent)break;evnt(23569);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_T=((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]; if(!qbevent)break;evnt(23572);}while(r); S_25825:; if ((-(*_FUNC_SEPERATEARGS_LONG_T== 0 ))||new_error){ if(qbevent){evnt(23574);if(r)goto S_25825;} S_25826:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(23575);if(r)goto S_25826;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(23578);}while(r); } S_25829:; if ((*_FUNC_SEPERATEARGS_LONG_OPTIONAL)||new_error){ if(qbevent){evnt(23581);if(r)goto S_25829;} do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES=*_FUNC_SEPERATEARGS_LONG_BRANCHES+ 1 ; if(!qbevent)break;evnt(23582);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23583);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23584);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_I; if(!qbevent)break;evnt(23585);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23586);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23587);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]; if(!qbevent)break;evnt(23588);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_EXPRESSION=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23590);}while(r); } S_25840:; if ((*_FUNC_SEPERATEARGS_LONG_T)||new_error){ if(qbevent){evnt(23593);if(r)goto S_25840;} do{ *_FUNC_SEPERATEARGS_LONG_CURRENTLEV=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23595);}while(r); S_25842:; if ((*_FUNC_SEPERATEARGS_LONG_OPTIONAL)||new_error){ if(qbevent){evnt(23598);if(r)goto S_25842;} do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES=*_FUNC_SEPERATEARGS_LONG_BRANCHES+ 1 ; if(!qbevent)break;evnt(23599);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(23600);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(23601);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_I; if(!qbevent)break;evnt(23602);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_EXPRESSION; if(!qbevent)break;evnt(23603);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]))[tmp_long]=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(23604);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_I1=*_FUNC_SEPERATEARGS_LONG_I; if(!qbevent)break;evnt(23608);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I2=*_FUNC_SEPERATEARGS_LONG_I; if(!qbevent)break;evnt(23608);}while(r); S_25852:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(23609);if(r)goto S_25852;} do{ *_FUNC_SEPERATEARGS_LONG_I2=*_FUNC_SEPERATEARGS_LONG_N; if(!qbevent)break;evnt(23609);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_OUTOFRANGE= 2147483647 ; if(!qbevent)break;evnt(23613);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_POSITION=*_FUNC_SEPERATEARGS_LONG_OUTOFRANGE; if(!qbevent)break;evnt(23614);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_WHICH= 0 ; if(!qbevent)break;evnt(23615);}while(r); S_25858:; if ((-(*_FUNC_SEPERATEARGS_LONG_I<=*_FUNC_SEPERATEARGS_LONG_N))||new_error){ if(qbevent){evnt(23616);if(r)goto S_25858;} S_25859:; fornext_value2897= 1 ; fornext_finalvalue2897=*_FUNC_SEPERATEARGS_LONG_T; fornext_step2897= 1 ; if (fornext_step2897<0) fornext_step_negative2897=1; else fornext_step_negative2897=0; if (new_error) goto fornext_error2897; goto fornext_entrylabel2897; while(1){ fornext_value2897=fornext_step2897+(*_FUNC_SEPERATEARGS_LONG_O); fornext_entrylabel2897: *_FUNC_SEPERATEARGS_LONG_O=fornext_value2897; if (fornext_step_negative2897){ if (fornext_value2897fornext_finalvalue2897) break; } fornext_error2897:; if(qbevent){evnt(23617);if(r)goto S_25859;} do{ *_FUNC_SEPERATEARGS_LONG_WORDS=((int16*)(__ARRAY_INTEGER_OPTWORDS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_OPTWORDS[8],__ARRAY_INTEGER_OPTWORDS[9])+array_check((*_FUNC_SEPERATEARGS_LONG_O)-__ARRAY_INTEGER_OPTWORDS[4],__ARRAY_INTEGER_OPTWORDS[5])*__ARRAY_INTEGER_OPTWORDS[6]]; if(!qbevent)break;evnt(23618);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_B= 0 ; if(!qbevent)break;evnt(23619);}while(r); S_25862:; fornext_value2899=*_FUNC_SEPERATEARGS_LONG_I1; fornext_finalvalue2899=*_FUNC_SEPERATEARGS_LONG_I2; fornext_step2899= 1 ; if (fornext_step2899<0) fornext_step_negative2899=1; else fornext_step_negative2899=0; if (new_error) goto fornext_error2899; goto fornext_entrylabel2899; while(1){ fornext_value2899=fornext_step2899+(*_FUNC_SEPERATEARGS_LONG_I3); fornext_entrylabel2899: *_FUNC_SEPERATEARGS_LONG_I3=fornext_value2899; if (fornext_step_negative2899){ if (fornext_value2899fornext_finalvalue2899) break; } fornext_error2899:; if(qbevent){evnt(23620);if(r)goto S_25862;} S_25863:; if ((-((*_FUNC_SEPERATEARGS_LONG_I3+*_FUNC_SEPERATEARGS_LONG_WORDS- 1 )<=*_FUNC_SEPERATEARGS_LONG_N))||new_error){ if(qbevent){evnt(23621);if(r)goto S_25863;} do{ qbs_set(_FUNC_SEPERATEARGS_STRING_C,FUNC_GETELEMENT(_FUNC_SEPERATEARGS_STRING_A,_FUNC_SEPERATEARGS_LONG_I3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23622);}while(r); S_25865:; if ((-(*_FUNC_SEPERATEARGS_LONG_B== 0 ))||new_error){ if(qbevent){evnt(23623);if(r)goto S_25865;} S_25866:; fornext_value2901= 2 ; fornext_finalvalue2901=*_FUNC_SEPERATEARGS_LONG_WORDS; fornext_step2901= 1 ; if (fornext_step2901<0) fornext_step_negative2901=1; else fornext_step_negative2901=0; if (new_error) goto fornext_error2901; goto fornext_entrylabel2901; while(1){ fornext_value2901=fornext_step2901+(*_FUNC_SEPERATEARGS_LONG_W); fornext_entrylabel2901: *_FUNC_SEPERATEARGS_LONG_W=fornext_value2901; if (fornext_step_negative2901){ if (fornext_value2901fornext_finalvalue2901) break; } fornext_error2901:; if(qbevent){evnt(23625);if(r)goto S_25866;} do{ qbs_set(_FUNC_SEPERATEARGS_STRING_C,qbs_add(qbs_add(_FUNC_SEPERATEARGS_STRING_C,qbs_new_txt_len(" ",1)),FUNC_GETELEMENT(_FUNC_SEPERATEARGS_STRING_A,&(pass2902=*_FUNC_SEPERATEARGS_LONG_I3+*_FUNC_SEPERATEARGS_LONG_W- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23626);}while(r); } fornext_exit_2900:; S_25869:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_C,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check((*_FUNC_SEPERATEARGS_LONG_O)-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1)))))||new_error){ if(qbevent){evnt(23629);if(r)goto S_25869;} S_25870:; if ((-(*_FUNC_SEPERATEARGS_LONG_I3<*_FUNC_SEPERATEARGS_LONG_POSITION))||new_error){ if(qbevent){evnt(23631);if(r)goto S_25870;} do{ *_FUNC_SEPERATEARGS_LONG_POSITION=*_FUNC_SEPERATEARGS_LONG_I3; if(!qbevent)break;evnt(23632);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_WHICH=*_FUNC_SEPERATEARGS_LONG_O; if(!qbevent)break;evnt(23633);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_BVALUE=*_FUNC_SEPERATEARGS_LONG_B; if(!qbevent)break;evnt(23634);}while(r); do{ goto fornext_exit_2898; if(!qbevent)break;evnt(23635);}while(r); } } } S_25878:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 44 ))&(-(*_FUNC_SEPERATEARGS_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(23640);if(r)goto S_25878;} do{ goto fornext_exit_2898; if(!qbevent)break;evnt(23641);}while(r); } S_25881:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 40 )))||new_error){ if(qbevent){evnt(23644);if(r)goto S_25881;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B+ 1 ; if(!qbevent)break;evnt(23645);}while(r); } S_25884:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 41 )))||new_error){ if(qbevent){evnt(23647);if(r)goto S_25884;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B- 1 ; if(!qbevent)break;evnt(23648);}while(r); S_25886:; if ((-(*_FUNC_SEPERATEARGS_LONG_B== -1 ))||new_error){ if(qbevent){evnt(23649);if(r)goto S_25886;} do{ goto fornext_exit_2898; if(!qbevent)break;evnt(23649);}while(r); } } } } fornext_exit_2898:; } fornext_exit_2896:; } S_25894:; if ((-(*_FUNC_SEPERATEARGS_LONG_POSITION!=*_FUNC_SEPERATEARGS_LONG_OUTOFRANGE))||new_error){ if(qbevent){evnt(23657);if(r)goto S_25894;} do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]; if(!qbevent)break;evnt(23659);}while(r); S_25896:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(23660);if(r)goto S_25896;} S_25897:; if (((-(*_FUNC_SEPERATEARGS_LONG_POSITION>*_FUNC_SEPERATEARGS_LONG_I))&(-(*_FUNC_SEPERATEARGS_LONG_BVALUE== 0 )))||new_error){ if(qbevent){evnt(23663);if(r)goto S_25897;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),FUNC_GETELEMENTS(_FUNC_SEPERATEARGS_STRING_CA,_FUNC_SEPERATEARGS_LONG_I,&(pass2903=*_FUNC_SEPERATEARGS_LONG_POSITION- 1 ))); if(!qbevent)break;evnt(23665);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_EXPRESSION= 0 ; if(!qbevent)break;evnt(23666);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_POSITION; if(!qbevent)break;evnt(23667);}while(r); }else{ do{ goto LABEL_OPTCHECKBACKTRACK; if(!qbevent)break;evnt(23671);}while(r); } } do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_I+((int16*)(__ARRAY_INTEGER_OPTWORDS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_OPTWORDS[8],__ARRAY_INTEGER_OPTWORDS[9])+array_check((*_FUNC_SEPERATEARGS_LONG_WHICH)-__ARRAY_INTEGER_OPTWORDS[4],__ARRAY_INTEGER_OPTWORDS[5])*__ARRAY_INTEGER_OPTWORDS[6]]; if(!qbevent)break;evnt(23675);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long])),qbs_add(func_chr(((int32)(qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check((*_FUNC_SEPERATEARGS_LONG_WHICH)-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1)))->len)),qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_OPT[0]))[(array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING256_OPT[8],__ARRAY_STRING256_OPT[9])+array_check((*_FUNC_SEPERATEARGS_LONG_WHICH)-__ARRAY_STRING256_OPT[4],__ARRAY_STRING256_OPT[5])*__ARRAY_STRING256_OPT[6])*256],256,1)))); if(!qbevent)break;evnt(23676);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),qbs_add(func_chr( 0 ),FUNC_STR2(_FUNC_SEPERATEARGS_LONG_WHICH))); if(!qbevent)break;evnt(23677);}while(r); }else{ LABEL_OPTCHECKBACKTRACK:; if(qbevent){evnt(23681);r=0;} S_25909:; if ((-(((int16*)(__ARRAY_INTEGER_LEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_LEV[4],__ARRAY_INTEGER_LEV[5])]>((int16*)(__ARRAY_INTEGER_ENTRYLEV[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_INTEGER_ENTRYLEV[4],__ARRAY_INTEGER_ENTRYLEV[5])]))||new_error){ if(qbevent){evnt(23683);if(r)goto S_25909;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23686);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=*_FUNC_SEPERATEARGS_LONG_CURRENTLEV; if(!qbevent)break;evnt(23687);}while(r); }else{ LABEL_BACKTRACK:; if(qbevent){evnt(23689);r=0;} S_25913:; fornext_value2905=*_FUNC_SEPERATEARGS_LONG_BRANCHES; fornext_finalvalue2905= 1 ; fornext_step2905= -1 ; if (fornext_step2905<0) fornext_step_negative2905=1; else fornext_step_negative2905=0; if (new_error) goto fornext_error2905; goto fornext_entrylabel2905; while(1){ fornext_value2905=fornext_step2905+(*_FUNC_SEPERATEARGS_LONG_BRANCH); fornext_entrylabel2905: *_FUNC_SEPERATEARGS_LONG_BRANCH=fornext_value2905; if (fornext_step_negative2905){ if (fornext_value2905fornext_finalvalue2905) break; } fornext_error2905:; if(qbevent){evnt(23692);if(r)goto S_25913;} S_25914:; if ((((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_BRANCH)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5])])||new_error){ if(qbevent){evnt(23693);if(r)goto S_25914;} do{ goto fornext_exit_2904; if(!qbevent)break;evnt(23693);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES=*_FUNC_SEPERATEARGS_LONG_BRANCHES- 1 ; if(!qbevent)break;evnt(23694);}while(r); } fornext_exit_2904:; S_25919:; if ((-(*_FUNC_SEPERATEARGS_LONG_BRANCHES== 0 ))||new_error){ if(qbevent){evnt(23696);if(r)goto S_25919;} do{ *__LONG_SEPERATEARGS_ERROR= 1 ; if(!qbevent)break;evnt(23697);}while(r); do{ qbs_set(__STRING_SEPERATEARGS_ERROR_MESSAGE,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23698);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23699);}while(r); } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[5]); if (!new_error) ((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(23702);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_EXPRESSION=((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[5])]; if(!qbevent)break;evnt(23703);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I=((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[5])]; if(!qbevent)break;evnt(23704);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_X=((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[5])]; if(!qbevent)break;evnt(23705);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=((int32*)(_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_BRANCHES)-_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[4],_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[5])]; if(!qbevent)break;evnt(23706);}while(r); S_25929:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(23708);if(r)goto S_25929;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),qbs_new_txt_len("null",4)); if(!qbevent)break;evnt(23708);}while(r); } S_25932:; fornext_value2907=*_FUNC_SEPERATEARGS_LONG_X; fornext_finalvalue2907=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2907= 1 ; if (fornext_step2907<0) fornext_step_negative2907=1; else fornext_step_negative2907=0; if (new_error) goto fornext_error2907; goto fornext_entrylabel2907; while(1){ fornext_value2907=fornext_step2907+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel2907: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value2907; if (fornext_step_negative2907){ if (fornext_value2907fornext_finalvalue2907) break; } fornext_error2907:; if(qbevent){evnt(23709);if(r)goto S_25932;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),qbs_new_txt_len("null",4)); if(!qbevent)break;evnt(23710);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X2)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(23711);}while(r); } fornext_exit_2906:; } } } } } fornext_exit_2894:; S_25941:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(23725);if(r)goto S_25941;} S_25942:; if ((-(*_FUNC_SEPERATEARGS_LONG_I<=*_FUNC_SEPERATEARGS_LONG_N))||new_error){ if(qbevent){evnt(23726);if(r)goto S_25942;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),FUNC_GETELEMENTS(_FUNC_SEPERATEARGS_STRING_CA,_FUNC_SEPERATEARGS_LONG_I,_FUNC_SEPERATEARGS_LONG_N)); if(!qbevent)break;evnt(23727);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_B= 0 ; if(!qbevent)break;evnt(23731);}while(r); S_25945:; fornext_value2909=*_FUNC_SEPERATEARGS_LONG_I; fornext_finalvalue2909=*_FUNC_SEPERATEARGS_LONG_N; fornext_step2909= 1 ; if (fornext_step2909<0) fornext_step_negative2909=1; else fornext_step_negative2909=0; if (new_error) goto fornext_error2909; goto fornext_entrylabel2909; while(1){ fornext_value2909=fornext_step2909+(*_FUNC_SEPERATEARGS_LONG_I2); fornext_entrylabel2909: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value2909; if (fornext_step_negative2909){ if (fornext_value2909fornext_finalvalue2909) break; } fornext_error2909:; if(qbevent){evnt(23732);if(r)goto S_25945;} do{ qbs_set(_FUNC_SEPERATEARGS_STRING_C,FUNC_GETELEMENT(_FUNC_SEPERATEARGS_STRING_A,_FUNC_SEPERATEARGS_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23733);}while(r); S_25947:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 44 ))&(-(*_FUNC_SEPERATEARGS_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(23734);if(r)goto S_25947;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(23735);}while(r); } S_25950:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 40 )))||new_error){ if(qbevent){evnt(23737);if(r)goto S_25950;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B+ 1 ; if(!qbevent)break;evnt(23738);}while(r); } S_25953:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 41 )))||new_error){ if(qbevent){evnt(23740);if(r)goto S_25953;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B- 1 ; if(!qbevent)break;evnt(23741);}while(r); S_25955:; if ((-(*_FUNC_SEPERATEARGS_LONG_B== -1 ))||new_error){ if(qbevent){evnt(23742);if(r)goto S_25955;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(23742);}while(r); } } } fornext_exit_2908:; S_25960:; if ((-(*_FUNC_SEPERATEARGS_LONG_B!= 0 ))||new_error){ if(qbevent){evnt(23745);if(r)goto S_25960;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(23745);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_N+ 1 ; if(!qbevent)break;evnt(23747);}while(r); }else{ do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(23749);}while(r); } } S_25968:; if ((-(*_FUNC_SEPERATEARGS_LONG_I!=(*_FUNC_SEPERATEARGS_LONG_N+ 1 )))||new_error){ if(qbevent){evnt(23753);if(r)goto S_25968;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(23753);}while(r); } S_25971:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(23755);if(r)goto S_25971;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2910; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #2--------",44), 0 , 0 , 1 ); if (new_error) goto skip2910; skip2910: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23756);}while(r); S_25973:; fornext_value2912= 1 ; fornext_finalvalue2912=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2912= 1 ; if (fornext_step2912<0) fornext_step_negative2912=1; else fornext_step_negative2912=0; if (new_error) goto fornext_error2912; goto fornext_entrylabel2912; while(1){ fornext_value2912=fornext_step2912+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2912: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2912; if (fornext_step_negative2912){ if (fornext_value2912fornext_finalvalue2912) break; } fornext_error2912:; if(qbevent){evnt(23757);if(r)goto S_25973;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2913; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1 , 1 , 0 ); if (new_error) goto skip2913; sub_file_print(tmp_fileno,((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])])), 0 , 0 , 1 ); if (new_error) goto skip2913; skip2913: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23758);}while(r); } fornext_exit_2911:; } S_25977:; if ((-(*_FUNC_SEPERATEARGS_LONG_PASSFLAG!= 1 ))||new_error){ if(qbevent){evnt(23769);if(r)goto S_25977;} do{ *_FUNC_SEPERATEARGS_LONG_SEPERATEARGS= 1 ; if(!qbevent)break;evnt(23769);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_PASS= 0 ; if(!qbevent)break;evnt(23770);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_X= 1 ; if(!qbevent)break;evnt(23773);}while(r); S_25982:; fornext_value2915= 1 ; fornext_finalvalue2915=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step2915= 1 ; if (fornext_step2915<0) fornext_step_negative2915=1; else fornext_step_negative2915=0; if (new_error) goto fornext_error2915; goto fornext_entrylabel2915; while(1){ fornext_value2915=fornext_step2915+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel2915: *_FUNC_SEPERATEARGS_LONG_I=fornext_value2915; if (fornext_step_negative2915){ if (fornext_value2915fornext_finalvalue2915) break; } fornext_error2915:; if(qbevent){evnt(23775);if(r)goto S_25982;} S_25983:; if ((-(((int16*)(__ARRAY_INTEGER_DONTPASS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_INTEGER_DONTPASS[4],__ARRAY_INTEGER_DONTPASS[5])]== 0 ))||new_error){ if(qbevent){evnt(23777);if(r)goto S_25983;} S_25984:; if ((-(((int32*)(__ARRAY_LONG_PASSRULE[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5])]> 0 ))||new_error){ if(qbevent){evnt(23779);if(r)goto S_25984;} S_25985:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])])),qbs_new_txt_len("null",4))))||new_error){ if(qbevent){evnt(23780);if(r)goto S_25985;} do{ *_FUNC_SEPERATEARGS_LONG_PASS=*_FUNC_SEPERATEARGS_LONG_PASS|((int32*)(__ARRAY_LONG_PASSRULE[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5])]; if(!qbevent)break;evnt(23780);}while(r); } } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])]))); if(!qbevent)break;evnt(23783);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5])]))); if(!qbevent)break;evnt(23784);}while(r); S_25991:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])]))->len))||new_error){ if(qbevent){evnt(23786);if(r)goto S_25991;} S_25992:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])])))== 0 )))||new_error){ if(qbevent){evnt(23787);if(r)goto S_25992;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),qbs_right(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])]))->len- 1 )); if(!qbevent)break;evnt(23789);}while(r); do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long])),qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5])])),func_chr( 0 ))); if(!qbevent)break;evnt(23790);}while(r); } } S_25997:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])])),qbs_new_txt_len("null",4))))||new_error){ if(qbevent){evnt(23794);if(r)goto S_25997;} do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[tmp_long])),qbs_new_txt_len("NULL",4)); if(!qbevent)break;evnt(23794);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_X=*_FUNC_SEPERATEARGS_LONG_X+ 1 ; if(!qbevent)break;evnt(23795);}while(r); }else{ S_26002:; if ((-(((int32*)(__ARRAY_LONG_PASSRULE[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5])]> 0 ))||new_error){ if(qbevent){evnt(23802);if(r)goto S_26002;} S_26003:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGS[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGS[4],__ARRAY_STRING_SEPARGS[5])])),qbs_new_txt_len("null",4))))||new_error){ if(qbevent){evnt(23803);if(r)goto S_26003;} do{ *_FUNC_SEPERATEARGS_LONG_PASS=*_FUNC_SEPERATEARGS_LONG_PASS|((int32*)(__ARRAY_LONG_PASSRULE[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_LONG_PASSRULE[4],__ARRAY_LONG_PASSRULE[5])]; if(!qbevent)break;evnt(23803);}while(r); } } do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_I+ 1 )-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long])),qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I+ 1 )-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5])])))); if(!qbevent)break;evnt(23806);}while(r); } } fornext_exit_2914:; do{ tmp_long=array_check((*_FUNC_SEPERATEARGS_LONG_X)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_SEPARGSLAYOUT[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_I)-__ARRAY_STRING_SEPARGSLAYOUT[4],__ARRAY_STRING_SEPARGSLAYOUT[5])]))); if(!qbevent)break;evnt(23810);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free55.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_SEPERATEARGS_LONG_SEPERATEARGS; } void SUB_SETREFER(qbs*_SUB_SETREFER_STRING_A2,int32*_SUB_SETREFER_LONG_TYP2,qbs*_SUB_SETREFER_STRING_E2,int32*_SUB_SETREFER_LONG_METHOD){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data56.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_SETREFER_STRING_A,_SUB_SETREFER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23820);}while(r); do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP2; if(!qbevent)break;evnt(23820);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_E,_SUB_SETREFER_STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23820);}while(r); S_26014:; if ((-(*_SUB_SETREFER_LONG_METHOD!= 1 ))||new_error){ if(qbevent){evnt(23821);if(r)goto S_26014;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23821);}while(r); } S_26017:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23822);if(r)goto S_26017;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23822);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_TL,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23823);}while(r); do{ *_SUB_SETREFER_LONG_I=func_instr(NULL,_SUB_SETREFER_STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23831);}while(r); S_26022:; if ((*_SUB_SETREFER_LONG_I)||new_error){ if(qbevent){evnt(23832);if(r)goto S_26022;} do{ *_SUB_SETREFER_LONG_IDNUMBER=qbr(func_val(qbs_left(_SUB_SETREFER_STRING_A,*_SUB_SETREFER_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23833);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_A,qbs_right(_SUB_SETREFER_STRING_A,_SUB_SETREFER_STRING_A->len-*_SUB_SETREFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23833);}while(r); }else{ do{ *_SUB_SETREFER_LONG_IDNUMBER=qbr(func_val(_SUB_SETREFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23835);}while(r); } do{ SUB_GETID(_SUB_SETREFER_LONG_IDNUMBER); if(!qbevent)break;evnt(23837);}while(r); S_26029:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23838);if(r)goto S_26029;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23838);}while(r); } S_26032:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(23842);if(r)goto S_26032;} do{ *_SUB_SETREFER_LONG_U=qbr(func_val(_SUB_SETREFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23845);}while(r); do{ *_SUB_SETREFER_LONG_I=func_instr(NULL,_SUB_SETREFER_STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23846);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_A,qbs_right(_SUB_SETREFER_STRING_A,_SUB_SETREFER_STRING_A->len-*_SUB_SETREFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23846);}while(r); do{ *__LONG_E=qbr(func_val(_SUB_SETREFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23846);}while(r); do{ *_SUB_SETREFER_LONG_I=func_instr(NULL,_SUB_SETREFER_STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23847);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_O,qbs_right(_SUB_SETREFER_STRING_A,_SUB_SETREFER_STRING_A->len-*_SUB_SETREFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23847);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23848);}while(r); S_26040:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(23848);if(r)goto S_26040;} do{ qbs_set(_SUB_SETREFER_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_SUB_SETREFER_STRING_N),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23848);}while(r); } S_26043:; if (((-(*__LONG_E!= 0 ))&(-(*_SUB_SETREFER_LONG_U== 1 )))||new_error){ if(qbevent){evnt(23850);if(r)goto S_26043;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot set read-only element of _MEM TYPE",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23851);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23851);}while(r); } S_26047:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(23854);if(r)goto S_26047;} S_26048:; if ((-(*_SUB_SETREFER_LONG_METHOD!= 0 ))||new_error){ if(qbevent){evnt(23857);if(r)goto S_26048;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unexpected internal code reference to UDT",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23857);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23857);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_LHSSCOPE,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23858);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATE(_SUB_SETREFER_STRING_E,_SUB_SETREFER_LONG_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23859);}while(r); S_26054:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23860);if(r)goto S_26054;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23860);}while(r); } S_26057:; if ((-((*_SUB_SETREFER_LONG_T2&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(23861);if(r)goto S_26057;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected = similar user defined type",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23861);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23861);}while(r); } S_26061:; if ((-((*_SUB_SETREFER_LONG_T2&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(23863);if(r)goto S_26061;} S_26062:; if ((*_SUB_SETREFER_LONG_T2&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(23864);if(r)goto S_26062;} do{ qbs_set(_SUB_SETREFER_STRING_SRC,qbs_add(qbs_add(qbs_new_txt_len("((char*)",8),_SUB_SETREFER_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23865);}while(r); do{ *_SUB_SETREFER_LONG_E2= 0 ; if(!qbevent)break;evnt(23866);}while(r); do{ *_SUB_SETREFER_LONG_U2=*_SUB_SETREFER_LONG_T2& 511 ; if(!qbevent)break;evnt(23866);}while(r); }else{ do{ qbs_set(_SUB_SETREFER_STRING_SRC,qbs_add(qbs_add(qbs_new_txt_len("((char*)&",9),_SUB_SETREFER_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23868);}while(r); do{ *_SUB_SETREFER_LONG_E2= 0 ; if(!qbevent)break;evnt(23869);}while(r); do{ *_SUB_SETREFER_LONG_U2=*_SUB_SETREFER_LONG_T2& 511 ; if(!qbevent)break;evnt(23869);}while(r); } do{ goto LABEL_DIRECTUDT; if(!qbevent)break;evnt(23871);}while(r); } do{ *_SUB_SETREFER_LONG_IDNUMBER2=qbr(func_val(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23875);}while(r); do{ SUB_GETID(_SUB_SETREFER_LONG_IDNUMBER2); if(!qbevent)break;evnt(23876);}while(r); S_26075:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23879);if(r)goto S_26075;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23879);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_N2,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23880);}while(r); S_26079:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(23880);if(r)goto S_26079;} do{ qbs_set(_SUB_SETREFER_STRING_N2,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_SUB_SETREFER_STRING_N2),qbs_new_txt_len("[0]",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23880);}while(r); } do{ *_SUB_SETREFER_LONG_I=func_instr(NULL,_SUB_SETREFER_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23881);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_E,qbs_right(_SUB_SETREFER_STRING_E,_SUB_SETREFER_STRING_E->len-*_SUB_SETREFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23881);}while(r); do{ *_SUB_SETREFER_LONG_U2=qbr(func_val(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23881);}while(r); do{ *_SUB_SETREFER_LONG_I=func_instr(NULL,_SUB_SETREFER_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23882);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_E,qbs_right(_SUB_SETREFER_STRING_E,_SUB_SETREFER_STRING_E->len-*_SUB_SETREFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23882);}while(r); do{ *_SUB_SETREFER_LONG_E2=qbr(func_val(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23882);}while(r); do{ *_SUB_SETREFER_LONG_I=func_instr(NULL,_SUB_SETREFER_STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23883);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_O2,qbs_right(_SUB_SETREFER_STRING_E,_SUB_SETREFER_STRING_E->len-*_SUB_SETREFER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23883);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_SRC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_SUB_SETREFER_STRING_N2),qbs_new_txt_len(")+(",3)),_SUB_SETREFER_STRING_O2),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23888);}while(r); LABEL_DIRECTUDT:; if(qbevent){evnt(23889);r=0;} S_26091:; if (((-(*_SUB_SETREFER_LONG_U!=*_SUB_SETREFER_LONG_U2))|(-(*_SUB_SETREFER_LONG_E2!= 0 )))||new_error){ if(qbevent){evnt(23890);if(r)goto S_26091;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected = similar user defined type",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23890);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23890);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),_SUB_SETREFER_STRING_LHSSCOPE),_SUB_SETREFER_STRING_N),qbs_new_txt_len(")+(",3)),_SUB_SETREFER_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23892);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_SIZ,FUNC_STR2(&(pass2926=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_SUB_SETREFER_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23893);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2927; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memcpy(",7),_SUB_SETREFER_STRING_DST),qbs_new_txt_len(",",1)),_SUB_SETREFER_STRING_SRC),qbs_new_txt_len(",",1)),_SUB_SETREFER_STRING_SIZ),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2927; skip2927: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23895);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23899);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23900);}while(r); } S_26101:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(23904);if(r)goto S_26101;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot resolve bit-length variables inside user defined types yet",65)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23904);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23904);}while(r); } S_26105:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(23905);if(r)goto S_26105;} do{ qbs_set(_SUB_SETREFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((uint8*)",10),FUNC_SCOPE()),_SUB_SETREFER_STRING_N),qbs_new_txt_len(")+(",3)),_SUB_SETREFER_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23906);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_new_fixed(",14),_SUB_SETREFER_STRING_O2),qbs_new_txt_len(",",1)),FUNC_STR2((&(((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])])))),qbs_new_txt_len(",1)",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23907);}while(r); S_26108:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(23908);if(r)goto S_26108;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,&(pass2928=*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23908);}while(r); } S_26111:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23909);if(r)goto S_26111;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23909);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2929; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(",8),_SUB_SETREFER_STRING_R),qbs_new_txt_len(",",1)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2929; skip2929: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23910);}while(r); }else{ do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP-*__LONG_ISUDT-*__LONG_ISREFERENCE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23912);}while(r); S_26117:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(23913);if(r)goto S_26117;} do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP-*__LONG_ISARRAY; if(!qbevent)break;evnt(23913);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_T,FUNC_TYP2CTYP(_SUB_SETREFER_LONG_TYP,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23914);}while(r); S_26121:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23915);if(r)goto S_26121;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23915);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_SUB_SETREFER_STRING_N),qbs_new_txt_len(")+(",3)),_SUB_SETREFER_STRING_O),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23916);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),qbs_new_txt_len("(",1)),_SUB_SETREFER_STRING_T),qbs_new_txt_len("*)",2)),_SUB_SETREFER_STRING_O2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23917);}while(r); S_26126:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(23918);if(r)goto S_26126;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,_SUB_SETREFER_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23918);}while(r); } S_26129:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23919);if(r)goto S_26129;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23919);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2930; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(_SUB_SETREFER_STRING_R,qbs_new_txt_len("=",1)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2930; skip2930: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23920);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23924);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23925);}while(r); } S_26137:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(23930);if(r)goto S_26137;} do{ qbs_set(_SUB_SETREFER_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23931);}while(r); do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP-*__LONG_ISPOINTER-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(23932);}while(r); S_26140:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(23934);if(r)goto S_26140;} S_26141:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(23935);if(r)goto S_26141;} do{ qbs_set(_SUB_SETREFER_STRING_OFFSET,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("&((uint8*)(",11),_SUB_SETREFER_STRING_N),qbs_new_txt_len("[0]))[tmp_long*",15)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23936);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_new_fixed(",14),_SUB_SETREFER_STRING_OFFSET),qbs_new_txt_len(",",1)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))),qbs_new_txt_len(",1)",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23937);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2931; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2931; skip2931: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23938);}while(r); S_26145:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(23939);if(r)goto S_26145;} do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) qbs_set(",24),_SUB_SETREFER_STRING_R),qbs_new_txt_len(",",1)),FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,_SUB_SETREFER_LONG_TYP)),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23940);}while(r); S_26147:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23941);if(r)goto S_26147;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23941);}while(r); } }else{ do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) qbs_set(",24),_SUB_SETREFER_STRING_R),qbs_new_txt_len(",",1)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23943);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2932; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2932; skip2932: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23945);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2933; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2933; skip2933: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23947);}while(r); S_26156:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(23948);if(r)goto S_26156;} do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) qbs_set( ((qbs*)(((uint64*)(",44),_SUB_SETREFER_STRING_N),qbs_new_txt_len("[0]))[tmp_long])),",18)),FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,_SUB_SETREFER_LONG_TYP)),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23949);}while(r); S_26158:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23950);if(r)goto S_26158;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23950);}while(r); } }else{ do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) qbs_set( ((qbs*)(((uint64*)(",44),_SUB_SETREFER_STRING_N),qbs_new_txt_len("[0]))[tmp_long])),",18)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23952);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2934; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2934; skip2934: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23954);}while(r); } do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(23956);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23957);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23958);}while(r); } S_26170:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(23961);if(r)goto S_26170;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("setbits(",8),FUNC_STR2(&(pass2935=*_SUB_SETREFER_LONG_TYP& 511 ))),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23963);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_SETREFER_STRING_R,qbs_new_txt_len("(uint8*)(",9)),_SUB_SETREFER_STRING_N),qbs_new_txt_len("[0])",4)),qbs_new_txt_len(",tmp_long,",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23964);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2936; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2936; skip2936: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23965);}while(r); S_26174:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(23966);if(r)goto S_26174;} do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) ",16),_SUB_SETREFER_STRING_R),FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,_SUB_SETREFER_LONG_TYP)),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23967);}while(r); S_26176:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23968);if(r)goto S_26176;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23968);}while(r); } }else{ do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) ",16),_SUB_SETREFER_STRING_R),_SUB_SETREFER_STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23970);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2937; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2937; skip2937: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23972);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23973);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23974);}while(r); }else{ do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23976);}while(r); S_26187:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(23977);if(r)goto S_26187;} S_26188:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(23978);if(r)goto S_26188;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23978);}while(r); } S_26191:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(23979);if(r)goto S_26191;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23979);}while(r); } S_26194:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 256 ))||new_error){ if(qbevent){evnt(23980);if(r)goto S_26194;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23980);}while(r); } }else{ S_26198:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(23982);if(r)goto S_26198;} S_26199:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(23983);if(r)goto S_26199;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint8",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23983);}while(r); } S_26202:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(23984);if(r)goto S_26202;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint16",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23984);}while(r); } S_26205:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(23985);if(r)goto S_26205;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23985);}while(r); } S_26208:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(23986);if(r)goto S_26208;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint64",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23986);}while(r); } S_26211:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(23987);if(r)goto S_26211;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23987);}while(r); } }else{ S_26215:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(23989);if(r)goto S_26215;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23989);}while(r); } S_26218:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(23990);if(r)goto S_26218;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23990);}while(r); } S_26221:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(23991);if(r)goto S_26221;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23991);}while(r); } S_26224:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(23992);if(r)goto S_26224;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23992);}while(r); } S_26227:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(23993);if(r)goto S_26227;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23993);}while(r); } } } } S_26233:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_SETREFER_STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23997);if(r)goto S_26233;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot find C type to return array data",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23997);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23997);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2938; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip2938; skip2938: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23998);}while(r); S_26238:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(23999);if(r)goto S_26238;} do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) ((",18),_SUB_SETREFER_STRING_T),qbs_new_txt_len("*)(",3)),_SUB_SETREFER_STRING_N),qbs_new_txt_len("[0]))[tmp_long]=",16)),FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,_SUB_SETREFER_LONG_TYP)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24000);}while(r); S_26240:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24001);if(r)goto S_26240;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24001);}while(r); } }else{ do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (!new_error) ((",18),_SUB_SETREFER_STRING_T),qbs_new_txt_len("*)(",3)),_SUB_SETREFER_STRING_N),qbs_new_txt_len("[0]))[tmp_long]=",16)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24003);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2939; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2939; skip2939: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24006);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24007);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24008);}while(r); } S_26250:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(24012);if(r)goto S_26250;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24013);}while(r); do{ *_SUB_SETREFER_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(24014);}while(r); S_26253:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(24016);if(r)goto S_26253;} do{ *_SUB_SETREFER_LONG_T=*_SUB_SETREFER_LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(24016);}while(r); } do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_T; if(!qbevent)break;evnt(24017);}while(r); S_26257:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(24020);if(r)goto S_26257;} S_26258:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(24021);if(r)goto S_26258;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING",6)),FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))),qbs_new_txt_len("_",1)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24022);}while(r); }else{ do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING_",7)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24024);}while(r); } S_26263:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(24026);if(r)goto S_26263;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24026);}while(r); } S_26266:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24027);if(r)goto S_26266;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24027);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2940; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(",8),_SUB_SETREFER_STRING_R),qbs_new_txt_len(",",1)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip2940; skip2940: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24028);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2941; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip2941; skip2941: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24029);}while(r); S_26271:; if ((*__INTEGER_ARRAYPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(24030);if(r)goto S_26271;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(24030);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24031);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24032);}while(r); } S_26277:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(24036);if(r)goto S_26277;} do{ *_SUB_SETREFER_LONG_B=*_SUB_SETREFER_LONG_T& 511 ; if(!qbevent)break;evnt(24037);}while(r); S_26279:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(24038);if(r)goto S_26279;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UBIT",4)),FUNC_STR2(&(pass2942=*_SUB_SETREFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24039);}while(r); S_26281:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(24040);if(r)goto S_26281;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,&(pass2943= 64 +*__LONG_ISUNSIGNED))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24040);}while(r); } S_26284:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24041);if(r)goto S_26284;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24041);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_SETREFER_STRING_R,qbs_new_txt_len("=(",2)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(")&",2)),FUNC_STR2(&(pass2944=((int64*)(__ARRAY_INTEGER64_BITMASK[0]))[array_check((*_SUB_SETREFER_LONG_B)-__ARRAY_INTEGER64_BITMASK[4],__ARRAY_INTEGER64_BITMASK[5])]))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24042);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2945; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2945; skip2945: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24043);}while(r); }else{ do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("BIT",3)),FUNC_STR2(&(pass2946=*_SUB_SETREFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24045);}while(r); S_26291:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(24046);if(r)goto S_26291;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,&(pass2947= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24046);}while(r); } S_26294:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24047);if(r)goto S_26294;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24047);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if ((",5),_SUB_SETREFER_STRING_R),qbs_new_txt_len("=",1)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(")&",2)),FUNC_STR2(&(pass2948=qbr(pow2( 2 ,(*_SUB_SETREFER_LONG_B- 1 )))))),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24048);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2949; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2949; skip2949: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24049);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(_SUB_SETREFER_STRING_R,qbs_new_txt_len("|=",2)),FUNC_STR2(&(pass2950=((int64*)(__ARRAY_INTEGER64_BITMASKINV[0]))[array_check((*_SUB_SETREFER_LONG_B)-__ARRAY_INTEGER64_BITMASKINV[4],__ARRAY_INTEGER64_BITMASKINV[5])]))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24051);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2951; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2951; skip2951: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24052);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2952; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip2952; skip2952: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24053);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(_SUB_SETREFER_STRING_R,qbs_new_txt_len("&=",2)),FUNC_STR2(&(pass2953=((int64*)(__ARRAY_INTEGER64_BITMASK[0]))[array_check((*_SUB_SETREFER_LONG_B)-__ARRAY_INTEGER64_BITMASK[4],__ARRAY_INTEGER64_BITMASK[5])]))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24055);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2954; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2954; skip2954: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24056);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2955; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip2955; skip2955: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24057);}while(r); } S_26306:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(24059);if(r)goto S_26306;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2956; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip2956; skip2956: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24059);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(24059);}while(r); } S_26310:; if ((*__INTEGER_ARRAYPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(24060);if(r)goto S_26310;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(24060);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24061);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24062);}while(r); } S_26316:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_BYTETYPE))||new_error){ if(qbevent){evnt(24066);if(r)goto S_26316;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("BYTE_",5)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24066);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24066);}while(r); } S_26320:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UBYTETYPE))||new_error){ if(qbevent){evnt(24067);if(r)goto S_26320;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UBYTE_",6)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24067);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24067);}while(r); } S_26324:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_INTEGERTYPE))||new_error){ if(qbevent){evnt(24068);if(r)goto S_26324;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("INTEGER_",8)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24068);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24068);}while(r); } S_26328:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UINTEGERTYPE))||new_error){ if(qbevent){evnt(24069);if(r)goto S_26328;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UINTEGER_",9)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24069);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24069);}while(r); } S_26332:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_LONGTYPE))||new_error){ if(qbevent){evnt(24070);if(r)goto S_26332;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("LONG_",5)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24070);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24070);}while(r); } S_26336:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_ULONGTYPE))||new_error){ if(qbevent){evnt(24071);if(r)goto S_26336;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("ULONG_",6)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24071);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24071);}while(r); } S_26340:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_INTEGER64TYPE))||new_error){ if(qbevent){evnt(24072);if(r)goto S_26340;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("INTEGER64_",10)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24072);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24072);}while(r); } S_26344:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UINTEGER64TYPE))||new_error){ if(qbevent){evnt(24073);if(r)goto S_26344;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UINTEGER64_",11)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24073);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24073);}while(r); } S_26348:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_SINGLETYPE))||new_error){ if(qbevent){evnt(24074);if(r)goto S_26348;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("SINGLE_",7)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24074);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24074);}while(r); } S_26352:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_DOUBLETYPE))||new_error){ if(qbevent){evnt(24075);if(r)goto S_26352;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("DOUBLE_",7)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24075);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24075);}while(r); } S_26356:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_FLOATTYPE))||new_error){ if(qbevent){evnt(24076);if(r)goto S_26356;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("FLOAT_",6)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24076);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24076);}while(r); } S_26360:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_OFFSETTYPE))||new_error){ if(qbevent){evnt(24077);if(r)goto S_26360;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("OFFSET_",7)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24077);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24077);}while(r); } S_26364:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UOFFSETTYPE))||new_error){ if(qbevent){evnt(24078);if(r)goto S_26364;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UOFFSET_",8)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24078);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(24078);}while(r); } LABEL_SREF:; if(qbevent){evnt(24079);r=0;} do{ *_SUB_SETREFER_LONG_T2=*_SUB_SETREFER_LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(24080);}while(r); S_26369:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(24081);if(r)goto S_26369;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,_SUB_SETREFER_LONG_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24081);}while(r); } S_26372:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24082);if(r)goto S_26372;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24082);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_L,qbs_add(qbs_add(qbs_add(_SUB_SETREFER_STRING_R,qbs_new_txt_len("=",1)),_SUB_SETREFER_STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24083);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2957; sub_file_print(tmp_fileno,_SUB_SETREFER_STRING_L, 0 , 0 , 1 ); if (new_error) goto skip2957; skip2957: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24084);}while(r); S_26377:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(24085);if(r)goto S_26377;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip2958; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip2958; skip2958: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24085);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(24085);}while(r); } S_26381:; if ((*__INTEGER_ARRAYPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(24086);if(r)goto S_26381;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(24086);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24087);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24088);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24091);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free56.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_STR2(int32*_FUNC_STR2_LONG_V){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data57.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_STR2_STRING_STR2,qbs_ltrim(qbs_rtrim(qbs_str((int32)(*_FUNC_STR2_LONG_V))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24095);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free57.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_STR2_STRING_STR2);return _FUNC_STR2_STRING_STR2; } qbs* FUNC_STR2U64(uint64*_FUNC_STR2U64_UINTEGER64_V){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data58.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_STR2U64_STRING_STR2U64,qbs_ltrim(qbs_rtrim(qbs_str((uint64)(*_FUNC_STR2U64_UINTEGER64_V))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24099);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free58.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_STR2U64_STRING_STR2U64);return _FUNC_STR2U64_STRING_STR2U64; } qbs* FUNC_STR2I64(int64*_FUNC_STR2I64_INTEGER64_V){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data59.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_STR2I64_STRING_STR2I64,qbs_ltrim(qbs_rtrim(qbs_str((int64)(*_FUNC_STR2I64_INTEGER64_V))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24103);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free59.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_STR2I64_STRING_STR2I64);return _FUNC_STR2I64_STRING_STR2I64; } qbs* FUNC_TYP2CTYP(int32*_FUNC_TYP2CTYP_LONG_T,qbs*_FUNC_TYP2CTYP_STRING_TSTR){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data60.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24107);}while(r); S_26392:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TSTR,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24112);if(r)goto S_26392;} S_26393:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(24113);if(r)goto S_26393;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24113);}while(r); } S_26396:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(24114);if(r)goto S_26396;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("qbs",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24114);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24114);}while(r); } do{ *_FUNC_TYP2CTYP_LONG_B=*_FUNC_TYP2CTYP_LONG_T& 511 ; if(!qbevent)break;evnt(24115);}while(r); S_26401:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(24116);if(r)goto S_26401;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("void",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24116);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24116);}while(r); } S_26405:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(24117);if(r)goto S_26405;} S_26406:; if ((-(*_FUNC_TYP2CTYP_LONG_B<= 32 ))||new_error){ if(qbevent){evnt(24118);if(r)goto S_26406;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24118);}while(r); }else{ do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24118);}while(r); } S_26411:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(24119);if(r)goto S_26411;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYP2CTYP_STRING_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24119);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24120);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24120);}while(r); } S_26417:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(24122);if(r)goto S_26417;} S_26418:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 32 ))||new_error){ if(qbevent){evnt(24123);if(r)goto S_26418;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24123);}while(r); } S_26421:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 64 ))||new_error){ if(qbevent){evnt(24124);if(r)goto S_26421;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24124);}while(r); } S_26424:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 256 ))||new_error){ if(qbevent){evnt(24125);if(r)goto S_26424;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24125);}while(r); } }else{ S_26428:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 8 ))||new_error){ if(qbevent){evnt(24127);if(r)goto S_26428;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24127);}while(r); } S_26431:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 16 ))||new_error){ if(qbevent){evnt(24128);if(r)goto S_26431;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24128);}while(r); } S_26434:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 32 ))||new_error){ if(qbevent){evnt(24129);if(r)goto S_26434;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24129);}while(r); } S_26437:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 64 ))||new_error){ if(qbevent){evnt(24130);if(r)goto S_26437;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24130);}while(r); } S_26440:; if ((*_FUNC_TYP2CTYP_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(24131);if(r)goto S_26440;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24131);}while(r); } S_26443:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(24132);if(r)goto S_26443;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYP2CTYP_STRING_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24132);}while(r); } } S_26447:; if ((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(24134);if(r)goto S_26447;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24135);}while(r); S_26449:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(24135);if(r)goto S_26449;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24135);}while(r); } } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24137);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24137);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TS,_FUNC_TYP2CTYP_STRING_TSTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24140);}while(r); S_26457:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(24142);if(r)goto S_26457;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("qbs",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24142);}while(r); } S_26460:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(24143);if(r)goto S_26460;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24143);}while(r); } S_26463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(24144);if(r)goto S_26463;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24144);}while(r); } S_26466:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(24145);if(r)goto S_26466;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24145);}while(r); } S_26469:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYP2CTYP_STRING_TS, 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(24146);if(r)goto S_26469;} do{ *_FUNC_TYP2CTYP_LONG_UNSGN= 1 ; if(!qbevent)break;evnt(24146);}while(r); do{ qbs_set(_FUNC_TYP2CTYP_STRING_TS,qbs_right(_FUNC_TYP2CTYP_STRING_TS,_FUNC_TYP2CTYP_STRING_TS->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24146);}while(r); } S_26473:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYP2CTYP_STRING_TS, 1 ),qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(24147);if(r)goto S_26473;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_N,qbs_right(_FUNC_TYP2CTYP_STRING_TS,_FUNC_TYP2CTYP_STRING_TS->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24148);}while(r); do{ *_FUNC_TYP2CTYP_LONG_B= 1 ; if(!qbevent)break;evnt(24149);}while(r); S_26476:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_TYP2CTYP_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24150);if(r)goto S_26476;} S_26477:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYP2CTYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(24151);if(r)goto S_26477;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24151);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24151);}while(r); } do{ *_FUNC_TYP2CTYP_LONG_B=qbr(func_val(_FUNC_TYP2CTYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24152);}while(r); S_26482:; if ((-(*_FUNC_TYP2CTYP_LONG_B> 57 ))||new_error){ if(qbevent){evnt(24153);if(r)goto S_26482;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24153);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24153);}while(r); } } S_26487:; if ((-(*_FUNC_TYP2CTYP_LONG_B<= 32 ))||new_error){ if(qbevent){evnt(24155);if(r)goto S_26487;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24155);}while(r); }else{ do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24155);}while(r); } S_26492:; if ((*_FUNC_TYP2CTYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(24156);if(r)goto S_26492;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYP2CTYP_STRING_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24156);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24157);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24157);}while(r); } S_26498:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(24159);if(r)goto S_26498;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24160);}while(r); S_26500:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(24160);if(r)goto S_26500;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24160);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(24161);}while(r); } S_26505:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(24163);if(r)goto S_26505;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24163);}while(r); } S_26508:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(24164);if(r)goto S_26508;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24164);}while(r); } S_26511:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(24165);if(r)goto S_26511;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24165);}while(r); } S_26514:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(24166);if(r)goto S_26514;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24166);}while(r); } S_26517:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24167);if(r)goto S_26517;} S_26518:; if ((*_FUNC_TYP2CTYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(24168);if(r)goto S_26518;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYP2CTYP_STRING_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24168);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24169);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24169);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_S,FUNC_TYPE2SYMBOL(_FUNC_TYP2CTYP_STRING_TSTR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24172);}while(r); S_26525:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24173);if(r)goto S_26525;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24173);}while(r); } S_26528:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_TYP2CTYP_STRING_S->len))||new_error){ if(qbevent){evnt(24174);if(r)goto S_26528;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,FUNC_TYP2CTYP(&(pass2963= 0 ),_FUNC_TYP2CTYP_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24175);}while(r); S_26530:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24176);if(r)goto S_26530;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24176);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(24177);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid type",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24180);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24180);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free60.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_TYP2CTYP_STRING_TYP2CTYP);return _FUNC_TYP2CTYP_STRING_TYP2CTYP; } qbs* FUNC_TYPE2SYMBOL(qbs*_FUNC_TYPE2SYMBOL_STRING_TYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data61.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24185);}while(r); S_26538:; fornext_value2966= 1 ; fornext_finalvalue2966=_FUNC_TYPE2SYMBOL_STRING_T->len; fornext_step2966= 1 ; if (fornext_step2966<0) fornext_step_negative2966=1; else fornext_step_negative2966=0; if (new_error) goto fornext_error2966; goto fornext_entrylabel2966; while(1){ fornext_value2966=fornext_step2966+(*_FUNC_TYPE2SYMBOL_LONG_I); fornext_entrylabel2966: *_FUNC_TYPE2SYMBOL_LONG_I=fornext_value2966; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2966){ if (fornext_value2966fornext_finalvalue2966) break; } fornext_error2966:; if(qbevent){evnt(24186);if(r)goto S_26538;} S_26539:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_TYPE2SYMBOL_STRING_T,*_FUNC_TYPE2SYMBOL_LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(24187);if(r)goto S_26539;} do{ sub_mid(_FUNC_TYPE2SYMBOL_STRING_T,*_FUNC_TYPE2SYMBOL_LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(24187);}while(r); } } fornext_exit_2965:; do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("Cannot convert type (",21),_FUNC_TYPE2SYMBOL_STRING_TYP),qbs_new_txt_len(") to symbol",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24189);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED _BIT",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24190);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~`1",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24190);}while(r); S_26546:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24190);if(r)goto S_26546;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24190);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED _BYTE",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24191);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24191);}while(r); S_26551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24191);if(r)goto S_26551;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24191);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED INTEGER",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24192);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24192);}while(r); S_26556:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24192);if(r)goto S_26556;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24192);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED LONG",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24193);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24193);}while(r); S_26561:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24193);if(r)goto S_26561;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24193);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED _INTEGER64",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24194);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24194);}while(r); S_26566:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24194);if(r)goto S_26566;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24194);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED _OFFSET",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24195);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24195);}while(r); S_26571:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24195);if(r)goto S_26571;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24195);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24196);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("`1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24196);}while(r); S_26576:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24196);if(r)goto S_26576;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24196);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_BYTE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24197);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24197);}while(r); S_26581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24197);if(r)goto S_26581;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24197);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("INTEGER",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24198);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24198);}while(r); S_26586:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24198);if(r)goto S_26586;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24198);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24199);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24199);}while(r); S_26591:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24199);if(r)goto S_26591;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24199);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_INTEGER64",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24200);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24200);}while(r); S_26596:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24200);if(r)goto S_26596;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24200);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_OFFSET",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24201);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24201);}while(r); S_26601:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24201);if(r)goto S_26601;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24201);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24202);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24202);}while(r); S_26606:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24202);if(r)goto S_26606;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24202);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24203);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24203);}while(r); S_26611:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24203);if(r)goto S_26611;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24203);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_FLOAT",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24204);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24204);}while(r); S_26616:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24204);if(r)goto S_26616;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24204);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24205);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24205);}while(r); S_26621:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2->len),_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(24205);if(r)goto S_26621;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(24205);}while(r); } do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24206);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24206);}while(r); LABEL_T2SFOUND:; if(qbevent){evnt(24207);r=0;} do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_TYPE2SYMBOL,_FUNC_TYPE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24208);}while(r); S_26627:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_TYPE2SYMBOL_STRING_T2->len!=_FUNC_TYPE2SYMBOL_STRING_T->len)))||new_error){ if(qbevent){evnt(24209);if(r)goto S_26627;} S_26628:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("$",1)))&(qbs_notequal(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~`1",3)))&(qbs_notequal(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("`1",2)))))||new_error){ if(qbevent){evnt(24210);if(r)goto S_26628;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24210);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24210);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T,qbs_right(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T->len-_FUNC_TYPE2SYMBOL_STRING_T2->len)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24211);}while(r); S_26633:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_TYPE2SYMBOL_STRING_T, 3 ),qbs_new_txt_len(" * ",3))))||new_error){ if(qbevent){evnt(24212);if(r)goto S_26633;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24212);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24212);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T,qbs_right(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T->len- 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24213);}while(r); S_26638:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPE2SYMBOL_STRING_T)== 0 )))||new_error){ if(qbevent){evnt(24214);if(r)goto S_26638;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24214);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24214);}while(r); } do{ *_FUNC_TYPE2SYMBOL_LONG_V=qbr(func_val(_FUNC_TYPE2SYMBOL_STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24215);}while(r); S_26643:; if ((-(*_FUNC_TYPE2SYMBOL_LONG_V== 0 ))||new_error){ if(qbevent){evnt(24216);if(r)goto S_26643;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24216);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24216);}while(r); } S_26647:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("$",1)))&(-(*_FUNC_TYPE2SYMBOL_LONG_V> 56 ))))||new_error){ if(qbevent){evnt(24217);if(r)goto S_26647;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24217);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24217);}while(r); } S_26651:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(24218);if(r)goto S_26651;} do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_add(_FUNC_TYPE2SYMBOL_STRING_S,FUNC_STR2(_FUNC_TYPE2SYMBOL_LONG_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24219);}while(r); }else{ do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_add(qbs_left(_FUNC_TYPE2SYMBOL_STRING_S,_FUNC_TYPE2SYMBOL_STRING_S->len- 1 ),FUNC_STR2(_FUNC_TYPE2SYMBOL_LONG_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24221);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_TYPE2SYMBOL,_FUNC_TYPE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24223);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free61.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_TYPE2SYMBOL_STRING_TYPE2SYMBOL);return _FUNC_TYPE2SYMBOL_STRING_TYPE2SYMBOL; } int32 FUNC_TYPECOMP(int32*_FUNC_TYPECOMP_LONG_TYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data62.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_TYPECOMP_LONG_TYP2=*_FUNC_TYPECOMP_LONG_TYP; if(!qbevent)break;evnt(24229);}while(r); S_26659:; if (((*_FUNC_TYPECOMP_LONG_TYP2&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(24230);if(r)goto S_26659;} do{ *_FUNC_TYPECOMP_LONG_TYP2=*_FUNC_TYPECOMP_LONG_TYP2-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(24230);}while(r); } do{ *_FUNC_TYPECOMP_LONG_TYPECOMP=*_FUNC_TYPECOMP_LONG_TYP2; if(!qbevent)break;evnt(24231);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free62.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_TYPECOMP_LONG_TYPECOMP; } int32 FUNC_TYPNAME2TYP(qbs*_FUNC_TYPNAME2TYP_STRING_T2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data63.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_TYPNAME2TYPSIZE= 0 ; if(!qbevent)break;evnt(24235);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_T,_FUNC_TYPNAME2TYP_STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24237);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_TS,_FUNC_TYPNAME2TYP_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24240);}while(r); S_26666:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(24241);if(r)goto S_26666;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(24241);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24241);}while(r); } S_26670:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(24242);if(r)goto S_26670;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(24242);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24242);}while(r); } S_26674:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(24243);if(r)goto S_26674;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(24243);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24243);}while(r); } S_26678:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(24244);if(r)goto S_26678;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(24244);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24244);}while(r); } S_26682:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_TS, 1 ),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(24247);if(r)goto S_26682;} do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_N,qbs_right(_FUNC_TYPNAME2TYP_STRING_TS,_FUNC_TYPNAME2TYP_STRING_TS->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24248);}while(r); S_26684:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(24249);if(r)goto S_26684;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after STRING * type",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24249);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24249);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24250);}while(r); S_26689:; if ((-(*_FUNC_TYPNAME2TYP_LONG_B== 0 ))||new_error){ if(qbevent){evnt(24251);if(r)goto S_26689;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after STRING * type",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24251);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24251);}while(r); } do{ *__LONG_TYPNAME2TYPSIZE=*_FUNC_TYPNAME2TYP_LONG_B; if(!qbevent)break;evnt(24252);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(24253);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24254);}while(r); } S_26697:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_TS, 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(24258);if(r)goto S_26697;} do{ *_FUNC_TYPNAME2TYP_LONG_UNSGN= 1 ; if(!qbevent)break;evnt(24258);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_TS,qbs_right(_FUNC_TYPNAME2TYP_STRING_TS,_FUNC_TYPNAME2TYP_STRING_TS->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24258);}while(r); } S_26701:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_TS, 1 ),qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(24261);if(r)goto S_26701;} do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_N,qbs_right(_FUNC_TYPNAME2TYP_STRING_TS,_FUNC_TYPNAME2TYP_STRING_TS->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24262);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_B= 1 ; if(!qbevent)break;evnt(24263);}while(r); S_26704:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_TYPNAME2TYP_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24264);if(r)goto S_26704;} S_26705:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(24265);if(r)goto S_26705;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24265);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24265);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24266);}while(r); S_26710:; if ((-(*_FUNC_TYPNAME2TYP_LONG_B> 56 ))||new_error){ if(qbevent){evnt(24267);if(r)goto S_26710;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24267);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24267);}while(r); } } S_26715:; if ((*_FUNC_TYPNAME2TYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(24269);if(r)goto S_26715;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_UBITTYPE+(*_FUNC_TYPNAME2TYP_LONG_B- 1 ); if(!qbevent)break;evnt(24269);}while(r); }else{ do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_BITTYPE+(*_FUNC_TYPNAME2TYP_LONG_B- 1 ); if(!qbevent)break;evnt(24269);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(24270);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_T= 0 ; if(!qbevent)break;evnt(24273);}while(r); S_26723:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(24274);if(r)goto S_26723;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_BYTETYPE; if(!qbevent)break;evnt(24274);}while(r); } S_26726:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(24275);if(r)goto S_26726;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(24275);}while(r); } S_26729:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(24276);if(r)goto S_26729;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_LONGTYPE; if(!qbevent)break;evnt(24276);}while(r); } S_26732:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(24277);if(r)goto S_26732;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(24277);}while(r); } S_26735:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(24278);if(r)goto S_26735;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(24278);}while(r); } S_26738:; if ((*_FUNC_TYPNAME2TYP_LONG_T)||new_error){ if(qbevent){evnt(24280);if(r)goto S_26738;} S_26739:; if ((*_FUNC_TYPNAME2TYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(24281);if(r)goto S_26739;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*_FUNC_TYPNAME2TYP_LONG_T+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(24281);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*_FUNC_TYPNAME2TYP_LONG_T; if(!qbevent)break;evnt(24282);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24282);}while(r); } S_26745:; fornext_value2995= 1 ; fornext_finalvalue2995=_FUNC_TYPNAME2TYP_STRING_T->len; fornext_step2995= 1 ; if (fornext_step2995<0) fornext_step_negative2995=1; else fornext_step_negative2995=0; if (new_error) goto fornext_error2995; goto fornext_entrylabel2995; while(1){ fornext_value2995=fornext_step2995+(*_FUNC_TYPNAME2TYP_LONG_I); fornext_entrylabel2995: *_FUNC_TYPNAME2TYP_LONG_I=fornext_value2995; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2995){ if (fornext_value2995fornext_finalvalue2995) break; } fornext_error2995:; if(qbevent){evnt(24287);if(r)goto S_26745;} S_26746:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_TYPNAME2TYP_STRING_T,*_FUNC_TYPNAME2TYP_LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(24288);if(r)goto S_26746;} do{ sub_mid(_FUNC_TYPNAME2TYP_STRING_T,*_FUNC_TYPNAME2TYP_LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(24288);}while(r); } } fornext_exit_2994:; S_26750:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(24290);if(r)goto S_26750;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(24290);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24290);}while(r); } S_26754:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 9 ),qbs_new_txt_len("STRING * ",9))))||new_error){ if(qbevent){evnt(24292);if(r)goto S_26754;} do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_N,qbs_right(_FUNC_TYPNAME2TYP_STRING_T,_FUNC_TYPNAME2TYP_STRING_T->len- 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24294);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_HASHFOUND= 0 ; if(!qbevent)break;evnt(24297);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_HASHNAME,_FUNC_TYPNAME2TYP_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24298);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(24299);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_HASHRES=FUNC_HASHFINDREV(_FUNC_TYPNAME2TYP_STRING_HASHNAME,_FUNC_TYPNAME2TYP_LONG_HASHCHKFLAGS,_FUNC_TYPNAME2TYP_LONG_HASHRESFLAGS,_FUNC_TYPNAME2TYP_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24300);}while(r); S_26760:; while((*_FUNC_TYPNAME2TYP_LONG_HASHRES)||new_error){ if(qbevent){evnt(24301);if(r)goto S_26760;} S_26761:; if (((-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_TYPNAME2TYP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]==*__LONG_SUBFUNCN))|(-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_TYPNAME2TYP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]== 0 )))||new_error){ if(qbevent){evnt(24302);if(r)goto S_26761;} S_26762:; if ((((int32*)(__ARRAY_LONG_CONSTDEFINED[0]))[array_check((*_FUNC_TYPNAME2TYP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTDEFINED[4],__ARRAY_LONG_CONSTDEFINED[5])])||new_error){ if(qbevent){evnt(24303);if(r)goto S_26762;} do{ *_FUNC_TYPNAME2TYP_LONG_HASHFOUND= 1 ; if(!qbevent)break;evnt(24304);}while(r); do{ goto dl_exit_2998; if(!qbevent)break;evnt(24305);}while(r); } } S_26767:; if ((-(*_FUNC_TYPNAME2TYP_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(24308);if(r)goto S_26767;} do{ *_FUNC_TYPNAME2TYP_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_TYPNAME2TYP_LONG_HASHRESFLAGS,_FUNC_TYPNAME2TYP_LONG_HASHRESREF); if(!qbevent)break;evnt(24308);}while(r); }else{ do{ *_FUNC_TYPNAME2TYP_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(24308);}while(r); } } dl_exit_2998:; S_26773:; if ((*_FUNC_TYPNAME2TYP_LONG_HASHFOUND)||new_error){ if(qbevent){evnt(24310);if(r)goto S_26773;} do{ *_FUNC_TYPNAME2TYP_LONG_I2=*_FUNC_TYPNAME2TYP_LONG_HASHRESREF; if(!qbevent)break;evnt(24311);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_T=((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_TYPNAME2TYP_LONG_I2)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]; if(!qbevent)break;evnt(24312);}while(r); S_26776:; if ((*_FUNC_TYPNAME2TYP_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(24313);if(r)goto S_26776;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * numeric-constant",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24313);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24313);}while(r); } S_26780:; if ((*_FUNC_TYPNAME2TYP_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(24315);if(r)goto S_26780;} do{ *_FUNC_TYPNAME2TYP_FLOAT_V=((long double*)(__ARRAY_FLOAT_CONSTFLOAT[0]))[array_check((*_FUNC_TYPNAME2TYP_LONG_I2)-__ARRAY_FLOAT_CONSTFLOAT[4],__ARRAY_FLOAT_CONSTFLOAT[5])]; if(!qbevent)break;evnt(24316);}while(r); do{ *_FUNC_TYPNAME2TYP_INTEGER64_V=qbr(*_FUNC_TYPNAME2TYP_FLOAT_V); if(!qbevent)break;evnt(24317);}while(r); do{ *_FUNC_TYPNAME2TYP_UINTEGER64_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(24318);}while(r); }else{ S_26785:; if ((*_FUNC_TYPNAME2TYP_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(24320);if(r)goto S_26785;} do{ *_FUNC_TYPNAME2TYP_UINTEGER64_V=((uint64*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]))[array_check((*_FUNC_TYPNAME2TYP_LONG_I2)-__ARRAY_UINTEGER64_CONSTUINTEGER[4],__ARRAY_UINTEGER64_CONSTUINTEGER[5])]; if(!qbevent)break;evnt(24321);}while(r); do{ *_FUNC_TYPNAME2TYP_INTEGER64_V=*_FUNC_TYPNAME2TYP_UINTEGER64_V; if(!qbevent)break;evnt(24322);}while(r); do{ *_FUNC_TYPNAME2TYP_FLOAT_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(24323);}while(r); }else{ do{ *_FUNC_TYPNAME2TYP_INTEGER64_V=((int64*)(__ARRAY_INTEGER64_CONSTINTEGER[0]))[array_check((*_FUNC_TYPNAME2TYP_LONG_I2)-__ARRAY_INTEGER64_CONSTINTEGER[4],__ARRAY_INTEGER64_CONSTINTEGER[5])]; if(!qbevent)break;evnt(24325);}while(r); do{ *_FUNC_TYPNAME2TYP_FLOAT_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(24326);}while(r); do{ *_FUNC_TYPNAME2TYP_UINTEGER64_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(24327);}while(r); } } S_26795:; if (((-(*_FUNC_TYPNAME2TYP_INTEGER64_V< 1 ))|(-(*_FUNC_TYPNAME2TYP_INTEGER64_V> 9999999999ll )))||new_error){ if(qbevent){evnt(24330);if(r)goto S_26795;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("STRING * out-of-range constant",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24330);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24330);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(24331);}while(r); do{ goto LABEL_CONSTANTLENSTR; if(!qbevent)break;evnt(24332);}while(r); } S_26802:; if ((qbs_cleanup(qbs_tmp_base,(-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 ))|(-(_FUNC_TYPNAME2TYP_STRING_N->len> 10 ))))||new_error){ if(qbevent){evnt(24335);if(r)goto S_26802;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid number/constant after STRING * type",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24335);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24335);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24336);}while(r); S_26807:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_TYPNAME2TYP_LONG_B== 0 ))|(-(_FUNC_TYPNAME2TYP_STRING_N->len> 10 ))))||new_error){ if(qbevent){evnt(24337);if(r)goto S_26807;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid number after STRING * type",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24337);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24337);}while(r); } LABEL_CONSTANTLENSTR:; if(qbevent){evnt(24338);r=0;} do{ *__LONG_TYPNAME2TYPSIZE=*_FUNC_TYPNAME2TYP_LONG_B; if(!qbevent)break;evnt(24339);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(24340);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24341);}while(r); } S_26815:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("SINGLE",6))))||new_error){ if(qbevent){evnt(24344);if(r)goto S_26815;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(24344);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24344);}while(r); } S_26819:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("DOUBLE",6))))||new_error){ if(qbevent){evnt(24345);if(r)goto S_26819;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(24345);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24345);}while(r); } S_26823:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_FLOAT",6))))||new_error){ if(qbevent){evnt(24346);if(r)goto S_26823;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(24346);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24346);}while(r); } S_26827:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 10 ),qbs_new_txt_len("_UNSIGNED ",10))))||new_error){ if(qbevent){evnt(24347);if(r)goto S_26827;} do{ *_FUNC_TYPNAME2TYP_LONG_U= 1 ; if(!qbevent)break;evnt(24347);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_T,qbs_right(_FUNC_TYPNAME2TYP_STRING_T,_FUNC_TYPNAME2TYP_STRING_T->len- 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24347);}while(r); } S_26831:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 4 ),qbs_new_txt_len("_BIT",4))))||new_error){ if(qbevent){evnt(24348);if(r)goto S_26831;} S_26832:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_BIT",4))))||new_error){ if(qbevent){evnt(24349);if(r)goto S_26832;} S_26833:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(24350);if(r)goto S_26833;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_UBITTYPE; if(!qbevent)break;evnt(24350);}while(r); }else{ do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_BITTYPE; if(!qbevent)break;evnt(24350);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(24351);}while(r); } S_26840:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 7 ),qbs_new_txt_len("_BIT * ",7))))||new_error){ if(qbevent){evnt(24353);if(r)goto S_26840;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected _BIT * number",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24353);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24353);}while(r); } do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_N,qbs_right(_FUNC_TYPNAME2TYP_STRING_T,_FUNC_TYPNAME2TYP_STRING_T->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24355);}while(r); S_26845:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(24356);if(r)goto S_26845;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid size after _BIT *",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24356);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24356);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24357);}while(r); S_26850:; if (((-(*_FUNC_TYPNAME2TYP_LONG_B== 0 ))|(-(*_FUNC_TYPNAME2TYP_LONG_B> 56 )))||new_error){ if(qbevent){evnt(24358);if(r)goto S_26850;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid size after _BIT *",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24358);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24358);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_BITTYPE- 1 +*_FUNC_TYPNAME2TYP_LONG_B; if(!qbevent)break;evnt(24359);}while(r); S_26855:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(24359);if(r)goto S_26855;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*_FUNC_TYPNAME2TYP_LONG_T+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(24359);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*_FUNC_TYPNAME2TYP_LONG_T; if(!qbevent)break;evnt(24360);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24361);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_T= 0 ; if(!qbevent)break;evnt(24364);}while(r); S_26862:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_BYTE",5))))||new_error){ if(qbevent){evnt(24365);if(r)goto S_26862;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_BYTETYPE; if(!qbevent)break;evnt(24365);}while(r); } S_26865:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("INTEGER",7))))||new_error){ if(qbevent){evnt(24366);if(r)goto S_26865;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(24366);}while(r); } S_26868:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("LONG",4))))||new_error){ if(qbevent){evnt(24367);if(r)goto S_26868;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_LONGTYPE; if(!qbevent)break;evnt(24367);}while(r); } S_26871:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_INTEGER64",10))))||new_error){ if(qbevent){evnt(24368);if(r)goto S_26871;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(24368);}while(r); } S_26874:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_OFFSET",7))))||new_error){ if(qbevent){evnt(24369);if(r)goto S_26874;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(24369);}while(r); } S_26877:; if ((*_FUNC_TYPNAME2TYP_LONG_T)||new_error){ if(qbevent){evnt(24370);if(r)goto S_26877;} S_26878:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(24371);if(r)goto S_26878;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*_FUNC_TYPNAME2TYP_LONG_T+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(24371);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*_FUNC_TYPNAME2TYP_LONG_T; if(!qbevent)break;evnt(24372);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24373);}while(r); } S_26884:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(24375);if(r)goto S_26884;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24375);}while(r); } S_26887:; fornext_value3004= 1 ; fornext_finalvalue3004=*__LONG_LASTTYPE; fornext_step3004= 1 ; if (fornext_step3004<0) fornext_step_negative3004=1; else fornext_step_negative3004=0; if (new_error) goto fornext_error3004; goto fornext_entrylabel3004; while(1){ fornext_value3004=fornext_step3004+(*_FUNC_TYPNAME2TYP_LONG_I); fornext_entrylabel3004: *_FUNC_TYPNAME2TYP_LONG_I=fornext_value3004; if (fornext_step_negative3004){ if (fornext_value3004fornext_finalvalue3004) break; } fornext_error3004:; if(qbevent){evnt(24378);if(r)goto S_26887;} S_26888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[(array_check((*_FUNC_TYPNAME2TYP_LONG_I)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]))*256],256,1)))))||new_error){ if(qbevent){evnt(24379);if(r)goto S_26888;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_ISUDT+*__LONG_ISPOINTER+*_FUNC_TYPNAME2TYP_LONG_I; if(!qbevent)break;evnt(24380);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24381);}while(r); } } fornext_exit_3003:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free63.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP; } int32 FUNC_UNIQUENUMBER(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data64.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_UNIQUENUMBERN=*__LONG_UNIQUENUMBERN+ 1 ; if(!qbevent)break;evnt(24389);}while(r); do{ *_FUNC_UNIQUENUMBER_LONG_UNIQUENUMBER=*__LONG_UNIQUENUMBERN; if(!qbevent)break;evnt(24390);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free64.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_UNIQUENUMBER_LONG_UNIQUENUMBER; } int32 FUNC_VALIDLABEL(qbs*_FUNC_VALIDLABEL_STRING_LABEL2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data65.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_VALIDLABEL_LONG_CREATE=*__LONG_CREATINGLABEL; if(!qbevent)break;evnt(24394);}while(r); do{ *__LONG_CREATINGLABEL= 0 ; if(!qbevent)break;evnt(24394);}while(r); do{ *_FUNC_VALIDLABEL_LONG_VALIDLABEL= 0 ; if(!qbevent)break;evnt(24395);}while(r); S_26898:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_VALIDLABEL_STRING_LABEL2->len== 0 )))||new_error){ if(qbevent){evnt(24396);if(r)goto S_26898;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24396);}while(r); } do{ qbs_set(_FUNC_VALIDLABEL_STRING_CLABEL,_FUNC_VALIDLABEL_STRING_LABEL2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24397);}while(r); do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL,qbs_ucase(_FUNC_VALIDLABEL_STRING_LABEL2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24398);}while(r); do{ *_FUNC_VALIDLABEL_LONG_N=FUNC_NUMELEMENTS(_FUNC_VALIDLABEL_STRING_LABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24400);}while(r); S_26904:; if ((-(*_FUNC_VALIDLABEL_LONG_N== 1 ))||new_error){ if(qbevent){evnt(24402);if(r)goto S_26904;} do{ *_FUNC_VALIDLABEL_LONG_HASHRES=FUNC_HASHFIND(_FUNC_VALIDLABEL_STRING_LABEL,&(pass3007= 8 + 64 + 128 ),_FUNC_VALIDLABEL_LONG_HASHRESFLAGS,_FUNC_VALIDLABEL_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24405);}while(r); S_26906:; while((*_FUNC_VALIDLABEL_LONG_HASHRES)||new_error){ if(qbevent){evnt(24406);if(r)goto S_26906;} S_26907:; if ((*_FUNC_VALIDLABEL_LONG_HASHRESFLAGS&( 64 + 128 ))||new_error){ if(qbevent){evnt(24407);if(r)goto S_26907;} S_26908:; if ((*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_VALIDLABEL_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+548)))||new_error){ if(qbevent){evnt(24408);if(r)goto S_26908;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24408);}while(r); } S_26911:; if ((*_FUNC_VALIDLABEL_LONG_HASHRESFLAGS& 64 )||new_error){ if(qbevent){evnt(24410);if(r)goto S_26911;} S_26912:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_VALIDLABEL_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+1610)),256,1))== 32 )))||new_error){ if(qbevent){evnt(24413);if(r)goto S_26912;} S_26913:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_VALIDLABEL_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+808))== 0 ))||new_error){ if(qbevent){evnt(24414);if(r)goto S_26913;} do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 1 ; if(!qbevent)break;evnt(24414);}while(r); }else{ do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 0 ; if(!qbevent)break;evnt(24414);}while(r); } }else{ S_26919:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_VALIDLABEL_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+1610)),256,1))!= 91 )))||new_error){ if(qbevent){evnt(24416);if(r)goto S_26919;} do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 0 ; if(!qbevent)break;evnt(24417);}while(r); }else{ do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 1 ; if(!qbevent)break;evnt(24419);}while(r); do{ qbs_set(_FUNC_VALIDLABEL_STRING_A,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_VALIDLABEL_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2860+1610)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24420);}while(r); do{ *_FUNC_VALIDLABEL_LONG_B= 1 ; if(!qbevent)break;evnt(24421);}while(r); S_26925:; fornext_value3010= 2 ; fornext_finalvalue3010=_FUNC_VALIDLABEL_STRING_A->len; fornext_step3010= 1 ; if (fornext_step3010<0) fornext_step_negative3010=1; else fornext_step_negative3010=0; if (new_error) goto fornext_error3010; goto fornext_entrylabel3010; while(1){ fornext_value3010=fornext_step3010+(*_FUNC_VALIDLABEL_LONG_X); fornext_entrylabel3010: *_FUNC_VALIDLABEL_LONG_X=fornext_value3010; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3010){ if (fornext_value3010fornext_finalvalue3010) break; } fornext_error3010:; if(qbevent){evnt(24422);if(r)goto S_26925;} do{ *_FUNC_VALIDLABEL_LONG_A=qbs_asc(_FUNC_VALIDLABEL_STRING_A,*_FUNC_VALIDLABEL_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24423);}while(r); S_26927:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 91 ))||new_error){ if(qbevent){evnt(24424);if(r)goto S_26927;} do{ *_FUNC_VALIDLABEL_LONG_B=*_FUNC_VALIDLABEL_LONG_B+ 1 ; if(!qbevent)break;evnt(24424);}while(r); } S_26930:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 93 ))||new_error){ if(qbevent){evnt(24425);if(r)goto S_26930;} do{ *_FUNC_VALIDLABEL_LONG_B=*_FUNC_VALIDLABEL_LONG_B- 1 ; if(!qbevent)break;evnt(24425);}while(r); } S_26933:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_VALIDLABEL_LONG_B== 0 ))&(-(*_FUNC_VALIDLABEL_LONG_X!=_FUNC_VALIDLABEL_STRING_A->len))))||new_error){ if(qbevent){evnt(24426);if(r)goto S_26933;} do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 0 ; if(!qbevent)break;evnt(24426);}while(r); do{ goto fornext_exit_3009; if(!qbevent)break;evnt(24426);}while(r); } } fornext_exit_3009:; } } S_26940:; if (((-(*_FUNC_VALIDLABEL_LONG_CREATE!= 0 ))&(-(*_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB== 1 )))||new_error){ if(qbevent){evnt(24430);if(r)goto S_26940;} S_26941:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_SUBNAMELABELS,qbs_add(qbs_add(__STRING1_SP,qbs_ucase(_FUNC_VALIDLABEL_STRING_LABEL)),__STRING1_SP),0)== 0 )))||new_error){ if(qbevent){evnt(24431);if(r)goto S_26941;} do{ qbs_set(__STRING_POSSIBLESUBNAMELABELS,qbs_add(qbs_add(__STRING_POSSIBLESUBNAMELABELS,qbs_ucase(_FUNC_VALIDLABEL_STRING_LABEL)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24431);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24431);}while(r); } } } }else{ do{ goto exit_subfunc; if(!qbevent)break;evnt(24438);}while(r); } S_26950:; if ((-(*_FUNC_VALIDLABEL_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(24440);if(r)goto S_26950;} do{ *_FUNC_VALIDLABEL_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_VALIDLABEL_LONG_HASHRESFLAGS,_FUNC_VALIDLABEL_LONG_HASHRESREF); if(!qbevent)break;evnt(24440);}while(r); }else{ do{ *_FUNC_VALIDLABEL_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(24440);}while(r); } } dl_exit_3008:; do{ qbs_set(_FUNC_VALIDLABEL_STRING_T,_FUNC_VALIDLABEL_STRING_LABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24447);}while(r); do{ *_FUNC_VALIDLABEL_LONG_A=qbs_asc(_FUNC_VALIDLABEL_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24449);}while(r); S_26958:; if (((((-(*_FUNC_VALIDLABEL_LONG_A>= 48 ))&(-(*_FUNC_VALIDLABEL_LONG_A<= 57 ))))|(-(*_FUNC_VALIDLABEL_LONG_A== 46 )))||new_error){ if(qbevent){evnt(24450);if(r)goto S_26958;} do{ *_FUNC_VALIDLABEL_LONG_X=func_instr(NULL,_FUNC_VALIDLABEL_STRING_T,func_chr( 44 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24453);}while(r); S_26960:; if ((*_FUNC_VALIDLABEL_LONG_X)||new_error){ if(qbevent){evnt(24454);if(r)goto S_26960;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_T,qbs_right(_FUNC_VALIDLABEL_STRING_T,_FUNC_VALIDLABEL_STRING_T->len-*_FUNC_VALIDLABEL_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24455);}while(r); } do{ qbs_set(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,FUNC_REMOVESYMBOL(_FUNC_VALIDLABEL_STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24460);}while(r); S_26964:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24461);if(r)goto S_26964;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24461);}while(r); } S_26967:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_VALIDLABEL_STRING_ADDSYMBOL->len))||new_error){ if(qbevent){evnt(24462);if(r)goto S_26967;} S_26968:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(24463);if(r)goto S_26968;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24463);}while(r); } S_26971:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("#",1)))&(qbs_notequal(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("!",1)))))||new_error){ if(qbevent){evnt(24464);if(r)goto S_26971;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24464);}while(r); } } S_26975:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 46 ))||new_error){ if(qbevent){evnt(24467);if(r)goto S_26975;} do{ *_FUNC_VALIDLABEL_LONG_DP= 1 ; if(!qbevent)break;evnt(24467);}while(r); } S_26978:; fornext_value3016= 2 ; fornext_finalvalue3016=_FUNC_VALIDLABEL_STRING_T->len; fornext_step3016= 1 ; if (fornext_step3016<0) fornext_step_negative3016=1; else fornext_step_negative3016=0; if (new_error) goto fornext_error3016; goto fornext_entrylabel3016; while(1){ fornext_value3016=fornext_step3016+(*_FUNC_VALIDLABEL_LONG_X); fornext_entrylabel3016: *_FUNC_VALIDLABEL_LONG_X=fornext_value3016; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3016){ if (fornext_value3016fornext_finalvalue3016) break; } fornext_error3016:; if(qbevent){evnt(24468);if(r)goto S_26978;} do{ *_FUNC_VALIDLABEL_LONG_A=qbs_asc(func_mid(_FUNC_VALIDLABEL_STRING_T,*_FUNC_VALIDLABEL_LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24469);}while(r); S_26980:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 46 ))||new_error){ if(qbevent){evnt(24470);if(r)goto S_26980;} do{ *_FUNC_VALIDLABEL_LONG_DP=*_FUNC_VALIDLABEL_LONG_DP+ 1 ; if(!qbevent)break;evnt(24470);}while(r); } S_26983:; if (((((-(*_FUNC_VALIDLABEL_LONG_A< 48 ))|(-(*_FUNC_VALIDLABEL_LONG_A> 57 ))))&(-(*_FUNC_VALIDLABEL_LONG_A!= 46 )))||new_error){ if(qbevent){evnt(24471);if(r)goto S_26983;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24471);}while(r); } } fornext_exit_3015:; S_26987:; if ((-(*_FUNC_VALIDLABEL_LONG_DP> 1 ))||new_error){ if(qbevent){evnt(24473);if(r)goto S_26987;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24473);}while(r); } S_26990:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_VALIDLABEL_LONG_DP== 1 ))&(-(_FUNC_VALIDLABEL_STRING_T->len== 1 ))))||new_error){ if(qbevent){evnt(24474);if(r)goto S_26990;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24474);}while(r); } do{ qbs_set(__STRING_TLAYOUT,qbs_add(_FUNC_VALIDLABEL_STRING_T,_FUNC_VALIDLABEL_STRING_ADDSYMBOL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24476);}while(r); do{ *_FUNC_VALIDLABEL_LONG_I=func_instr(NULL,_FUNC_VALIDLABEL_STRING_T,qbs_new_txt_len(".",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24478);}while(r); S_26995:; if ((*_FUNC_VALIDLABEL_LONG_I)||new_error){ if(qbevent){evnt(24478);if(r)goto S_26995;} do{ sub_mid(_FUNC_VALIDLABEL_STRING_T,*_FUNC_VALIDLABEL_LONG_I, 1 ,qbs_new_txt_len("p",1),1); if(!qbevent)break;evnt(24478);}while(r); } S_26998:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(24479);if(r)goto S_26998;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_T,qbs_add(_FUNC_VALIDLABEL_STRING_T,qbs_new_txt_len("d",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24479);}while(r); } S_27001:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(24480);if(r)goto S_27001;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_T,qbs_add(_FUNC_VALIDLABEL_STRING_T,qbs_new_txt_len("s",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24480);}while(r); } S_27004:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_VALIDLABEL_STRING_T->len> 40 )))||new_error){ if(qbevent){evnt(24482);if(r)goto S_27004;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24482);}while(r); } do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL2,_FUNC_VALIDLABEL_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24484);}while(r); do{ *_FUNC_VALIDLABEL_LONG_VALIDLABEL= 1 ; if(!qbevent)break;evnt(24485);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24486);}while(r); } } S_27012:; if ((-((*_FUNC_VALIDLABEL_LONG_N& 1 )== 0 ))||new_error){ if(qbevent){evnt(24495);if(r)goto S_27012;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24495);}while(r); } S_27015:; fornext_value3021= 2 ; fornext_finalvalue3021=*_FUNC_VALIDLABEL_LONG_N- 1 ; fornext_step3021= 2 ; if (fornext_step3021<0) fornext_step_negative3021=1; else fornext_step_negative3021=0; if (new_error) goto fornext_error3021; goto fornext_entrylabel3021; while(1){ fornext_value3021=fornext_step3021+(*_FUNC_VALIDLABEL_LONG_NX); fornext_entrylabel3021: *_FUNC_VALIDLABEL_LONG_NX=fornext_value3021; if (fornext_step_negative3021){ if (fornext_value3021fornext_finalvalue3021) break; } fornext_error3021:; if(qbevent){evnt(24496);if(r)goto S_27015;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_A,FUNC_GETELEMENT(_FUNC_VALIDLABEL_STRING_LABEL2,_FUNC_VALIDLABEL_LONG_NX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24497);}while(r); S_27017:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_VALIDLABEL_STRING_A,qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(24498);if(r)goto S_27017;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24498);}while(r); } } fornext_exit_3020:; do{ *_FUNC_VALIDLABEL_LONG_C=qbs_asc(_FUNC_VALIDLABEL_STRING_CLABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24502);}while(r); S_27022:; if (((-(*_FUNC_VALIDLABEL_LONG_C>= 48 ))&(-(*_FUNC_VALIDLABEL_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(24502);if(r)goto S_27022;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24502);}while(r); } do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24505);}while(r); S_27026:; fornext_value3023= 1 ; fornext_finalvalue3023=*_FUNC_VALIDLABEL_LONG_N; fornext_step3023= 2 ; if (fornext_step3023<0) fornext_step_negative3023=1; else fornext_step_negative3023=0; if (new_error) goto fornext_error3023; goto fornext_entrylabel3023; while(1){ fornext_value3023=fornext_step3023+(*_FUNC_VALIDLABEL_LONG_NX); fornext_entrylabel3023: *_FUNC_VALIDLABEL_LONG_NX=fornext_value3023; if (fornext_step_negative3023){ if (fornext_value3023fornext_finalvalue3023) break; } fornext_error3023:; if(qbevent){evnt(24506);if(r)goto S_27026;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL,FUNC_GETELEMENT(_FUNC_VALIDLABEL_STRING_CLABEL,_FUNC_VALIDLABEL_LONG_NX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24507);}while(r); S_27028:; fornext_value3025= 1 ; fornext_finalvalue3025=_FUNC_VALIDLABEL_STRING_LABEL->len; fornext_step3025= 1 ; if (fornext_step3025<0) fornext_step_negative3025=1; else fornext_step_negative3025=0; if (new_error) goto fornext_error3025; goto fornext_entrylabel3025; while(1){ fornext_value3025=fornext_step3025+(*_FUNC_VALIDLABEL_LONG_X); fornext_entrylabel3025: *_FUNC_VALIDLABEL_LONG_X=fornext_value3025; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3025){ if (fornext_value3025fornext_finalvalue3025) break; } fornext_error3025:; if(qbevent){evnt(24510);if(r)goto S_27028;} S_27029:; if ((qbs_cleanup(qbs_tmp_base,-(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_VALIDLABEL_STRING_LABEL,*_FUNC_VALIDLABEL_LONG_X))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]== 0 )))||new_error){ if(qbevent){evnt(24511);if(r)goto S_27029;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24511);}while(r); } } fornext_exit_3024:; S_27033:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_VALIDLABEL_STRING_LABEL3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24515);if(r)goto S_27033;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL3,qbs_ucase(_FUNC_VALIDLABEL_STRING_LABEL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24515);}while(r); do{ qbs_set(__STRING_TLAYOUT,_FUNC_VALIDLABEL_STRING_LABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24515);}while(r); }else{ do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL3,qbs_add(qbs_add(_FUNC_VALIDLABEL_STRING_LABEL3,__STRING_FIX046),qbs_ucase(_FUNC_VALIDLABEL_STRING_LABEL))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24515);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_add(qbs_add(__STRING_TLAYOUT,qbs_new_txt_len(".",1)),_FUNC_VALIDLABEL_STRING_LABEL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24515);}while(r); } } fornext_exit_3022:; do{ *_FUNC_VALIDLABEL_LONG_VALIDLABEL= 1 ; if(!qbevent)break;evnt(24518);}while(r); do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL2,_FUNC_VALIDLABEL_STRING_LABEL3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24519);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free65.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_VALIDLABEL_LONG_VALIDLABEL; } void SUB_XEND(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data66.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3027; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_end();",10), 0 , 0 , 1 ); if (new_error) goto skip3027; skip3027: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24544);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free66.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_XFILEPRINT(qbs*_SUB_XFILEPRINT_STRING_A,qbs*_SUB_XFILEPRINT_STRING_CA,int32*_SUB_XFILEPRINT_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data67.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_XFILEPRINT_STRING_U,FUNC_STR2(&(pass3030=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24548);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3031; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_spc_cr_size=2;",18), 0 , 0 , 1 ); if (new_error) goto skip3031; skip3031: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24549);}while(r); S_27046:; if ((-(*_SUB_XFILEPRINT_LONG_N== 2 ))||new_error){ if(qbevent){evnt(24550);if(r)goto S_27046;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24550);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24550);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24551);}while(r); do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(24552);}while(r); S_27052:; fornext_value3033= 3 ; fornext_finalvalue3033=*_SUB_XFILEPRINT_LONG_N; fornext_step3033= 1 ; if (fornext_step3033<0) fornext_step_negative3033=1; else fornext_step_negative3033=0; if (new_error) goto fornext_error3033; goto fornext_entrylabel3033; while(1){ fornext_value3033=fornext_step3033+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3033: *_SUB_XFILEPRINT_LONG_I=fornext_value3033; if (fornext_step_negative3033){ if (fornext_value3033fornext_finalvalue3033) break; } fornext_error3033:; if(qbevent){evnt(24553);if(r)goto S_27052;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24554);}while(r); S_27054:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(24555);if(r)goto S_27054;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(24555);}while(r); } S_27057:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24556);if(r)goto S_27057;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(24556);}while(r); } S_27060:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))&(-(*_SUB_XFILEPRINT_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(24557);if(r)goto S_27060;} S_27061:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24558);if(r)goto S_27061;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24558);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24558);}while(r); } do{ goto LABEL_PRINTGOTFN; if(!qbevent)break;evnt(24559);}while(r); } S_27067:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24561);if(r)goto S_27067;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A3,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24561);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_A3,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_A3,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24561);}while(r); } } fornext_exit_3032:; do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... ,",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24563);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24563);}while(r); LABEL_PRINTGOTFN:; if(qbevent){evnt(24564);r=0;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24565);}while(r); S_27076:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24566);if(r)goto S_27076;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24566);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("PRINT",5),__STRING1_SP),qbs_new_txt_len("#",1)),__STRING1_SP2),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24567);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATETOTYP(_SUB_XFILEPRINT_STRING_E,&(pass3034= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24568);}while(r); S_27081:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24569);if(r)goto S_27081;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24569);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3035; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tab_fileno=tmp_fileno=",22),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3035; skip3035: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24570);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3036; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3036; skip3036: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24571);}while(r); do{ *_SUB_XFILEPRINT_LONG_I=*_SUB_XFILEPRINT_LONG_I+ 1 ; if(!qbevent)break;evnt(24572);}while(r); S_27087:; if ((-(*_SUB_XFILEPRINT_LONG_N>=*_SUB_XFILEPRINT_LONG_I))||new_error){ if(qbevent){evnt(24575);if(r)goto S_27087;} S_27088:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_A,_SUB_XFILEPRINT_LONG_I),qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(24576);if(r)goto S_27088;} LABEL_FPUJUMP:; if(qbevent){evnt(24578);r=0;} do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),qbs_new_txt_len("USING",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24579);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24580);}while(r); do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(24580);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24580);}while(r); S_27093:; fornext_value3038=*_SUB_XFILEPRINT_LONG_I+ 1 ; fornext_finalvalue3038=*_SUB_XFILEPRINT_LONG_N; fornext_step3038= 1 ; if (fornext_step3038<0) fornext_step_negative3038=1; else fornext_step_negative3038=0; if (new_error) goto fornext_error3038; goto fornext_entrylabel3038; while(1){ fornext_value3038=fornext_step3038+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3038: *_SUB_XFILEPRINT_LONG_I=fornext_value3038; if (fornext_step_negative3038){ if (fornext_value3038fornext_finalvalue3038) break; } fornext_error3038:; if(qbevent){evnt(24581);if(r)goto S_27093;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24582);}while(r); S_27095:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(24583);if(r)goto S_27095;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(24583);}while(r); } S_27098:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24584);if(r)goto S_27098;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(24584);}while(r); } S_27101:; if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(24585);if(r)goto S_27101;} S_27102:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(24586);if(r)goto S_27102;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24586);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24586);}while(r); } S_27106:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(24587);if(r)goto S_27106;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24588);}while(r); S_27108:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24589);if(r)goto S_27108;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24589);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24590);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATE(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24591);}while(r); S_27113:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24592);if(r)goto S_27113;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24592);}while(r); } S_27116:; if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(24593);if(r)goto S_27116;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3039= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24593);}while(r); } S_27119:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24594);if(r)goto S_27119;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24594);}while(r); } S_27122:; if ((-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(24595);if(r)goto S_27122;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24595);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24595);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_PUFORMAT,_SUB_XFILEPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24596);}while(r); do{ goto fornext_exit_3037; if(!qbevent)break;evnt(24597);}while(r); } } S_27130:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(24600);if(r)goto S_27130;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_E,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24600);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24600);}while(r); } } fornext_exit_3037:; S_27136:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24602);if(r)goto S_27136;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24602);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24602);}while(r); } S_27140:; if ((-(*_SUB_XFILEPRINT_LONG_I==*_SUB_XFILEPRINT_LONG_N))||new_error){ if(qbevent){evnt(24603);if(r)goto S_27140;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24603);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24603);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3041; sub_file_print(tmp_fileno,qbs_new_txt_len("tqbs=qbs_new(0,0);",18), 0 , 0 , 1 ); if (new_error) goto skip3041; skip3041: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24605);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3042; sub_file_print(tmp_fileno,qbs_new_txt_len("tmp_long=0;",11), 0 , 0 , 1 ); if (new_error) goto skip3042; skip3042: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24607);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_PUF,qbs_add(qbs_new_txt_len("print_using_format",18),_SUB_XFILEPRINT_STRING_U)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24609);}while(r); S_27147:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24610);if(r)goto S_27147;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip3043; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("static qbs *",12),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3043; skip3043: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24611);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip3044; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3044; skip3044: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24613);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3045; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_PUF,qbs_new_txt_len("=qbs_new(0,0); qbs_set(",23)),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_PUFORMAT),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3045; skip3045: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24615);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3046; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3046; skip3046: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24616);}while(r); do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(24618);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24619);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(24620);}while(r); S_27157:; fornext_value3048=*_SUB_XFILEPRINT_LONG_I+ 1 ; fornext_finalvalue3048=*_SUB_XFILEPRINT_LONG_N; fornext_step3048= 1 ; if (fornext_step3048<0) fornext_step_negative3048=1; else fornext_step_negative3048=0; if (new_error) goto fornext_error3048; goto fornext_entrylabel3048; while(1){ fornext_value3048=fornext_step3048+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3048: *_SUB_XFILEPRINT_LONG_I=fornext_value3048; if (fornext_step_negative3048){ if (fornext_value3048fornext_finalvalue3048) break; } fornext_error3048:; if(qbevent){evnt(24621);if(r)goto S_27157;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24622);}while(r); S_27159:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(24623);if(r)goto S_27159;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(24623);}while(r); } S_27162:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24624);if(r)goto S_27162;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(24624);}while(r); } S_27165:; if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(24625);if(r)goto S_27165;} S_27166:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(24626);if(r)goto S_27166;} LABEL_FPRINTULAST:; if(qbevent){evnt(24627);r=0;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24628);}while(r); S_27168:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24629);if(r)goto S_27168;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24629);}while(r); } S_27171:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(24630);if(r)goto S_27171;} do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24630);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24630);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATE(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24631);}while(r); S_27177:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24632);if(r)goto S_27177;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24632);}while(r); } S_27180:; if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(24633);if(r)goto S_27180;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3049= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24633);}while(r); } S_27183:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24634);if(r)goto S_27183;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24634);}while(r); } S_27186:; if ((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(24635);if(r)goto S_27186;} S_27187:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_SUB_XFILEPRINT_STRING_E, 9 ),qbs_new_txt_len("func_tab(",9)))|(qbs_equal(qbs_left(_SUB_XFILEPRINT_STRING_E, 9 ),qbs_new_txt_len("func_spc(",9)))))||new_error){ if(qbevent){evnt(24637);if(r)goto S_27187;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3050; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,0);",38), 0 , 0 , 1 ); if (new_error) goto skip3050; skip3050: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24642);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3051; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3051; skip3051: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24644);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3052; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3052; skip3052: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24645);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3053; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,0);",38), 0 , 0 , 1 ); if (new_error) goto skip3053; skip3053: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24646);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3054; sub_file_print(tmp_fileno,qbs_new_txt_len("tqbs->len=0;",12), 0 , 0 , 1 ); if (new_error) goto skip3054; skip3054: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24648);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3055; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using(",21),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",tmp_long,tqbs,",15)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3055; skip3055: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24653);}while(r); } }else{ S_27197:; if ((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(24658);if(r)goto S_27197;} S_27198:; if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(24659);if(r)goto S_27198;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3056; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_single(",28),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3056; skip3056: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24659);}while(r); } S_27201:; if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(24660);if(r)goto S_27201;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3057; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_double(",28),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3057; skip3057: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24660);}while(r); } S_27204:; if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )> 64 ))||new_error){ if(qbevent){evnt(24661);if(r)goto S_27204;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3058; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_float(",27),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3058; skip3058: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24661);}while(r); } }else{ S_27208:; if ((((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 64 )))&(-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISUNSIGNED)!= 0 )))||new_error){ if(qbevent){evnt(24663);if(r)goto S_27208;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3059; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_uinteger64(",32),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3059; skip3059: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24664);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3060; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_integer64(",31),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3060; skip3060: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24666);}while(r); } } } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3061; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3061; skip3061: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24670);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24671);}while(r); S_27217:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(24672);if(r)goto S_27217;} do{ goto fornext_exit_3047; if(!qbevent)break;evnt(24672);}while(r); } do{ goto LABEL_FPRINTUNEXT; if(!qbevent)break;evnt(24673);}while(r); } } S_27223:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(24676);if(r)goto S_27223;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_E,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24676);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24676);}while(r); } LABEL_FPRINTUNEXT:; if(qbevent){evnt(24677);r=0;} } fornext_exit_3047:; S_27229:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24679);if(r)goto S_27229;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24679);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(24679);}while(r); do{ goto LABEL_FPRINTULAST; if(!qbevent)break;evnt(24679);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3063; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip_pu",7),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3063; skip3063: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24680);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3064; sub_file_print(tmp_fileno,qbs_new_txt_len("if (new_error){",15), 0 , 0 , 1 ); if (new_error) goto skip3064; skip3064: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24682);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3065; sub_file_print(tmp_fileno,qbs_new_txt_len("g_tmp_long=new_error; new_error=0; sub_file_print(tmp_fileno,tqbs,0,0,0); new_error=g_tmp_long;",95), 0 , 0 , 1 ); if (new_error) goto skip3065; skip3065: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24683);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3066; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip3066; skip3066: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24684);}while(r); S_27238:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1)))))||new_error){ if(qbevent){evnt(24685);if(r)goto S_27238;} do{ *_SUB_XFILEPRINT_LONG_NL= 0 ; if(!qbevent)break;evnt(24685);}while(r); }else{ do{ *_SUB_XFILEPRINT_LONG_NL= 1 ; if(!qbevent)break;evnt(24685);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3067; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,",35),FUNC_STR2(_SUB_XFILEPRINT_LONG_NL)),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3067; skip3067: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24686);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3068; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip3068; skip3068: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24687);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3069; sub_file_print(tmp_fileno,qbs_new_txt_len("qbs_free(tqbs);",15), 0 , 0 , 1 ); if (new_error) goto skip3069; skip3069: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24688);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3070; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3070; skip3070: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24689);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3071; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3071; skip3071: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24690);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3072; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip3072; skip3072: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24691);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3073; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_spc_cr_size=1;",18), 0 , 0 , 1 ); if (new_error) goto skip3073; skip3073: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24692);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_XFILEPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24693);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24694);}while(r); } } S_27254:; if ((-(*_SUB_XFILEPRINT_LONG_I>*_SUB_XFILEPRINT_LONG_N))||new_error){ if(qbevent){evnt(24699);if(r)goto S_27254;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3074; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,0,1);",47), 0 , 0 , 1 ); if (new_error) goto skip3074; skip3074: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24700);}while(r); do{ goto LABEL_PRINTBLANKLINE; if(!qbevent)break;evnt(24701);}while(r); } do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(24703);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24704);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(24705);}while(r); S_27261:; fornext_value3076=*_SUB_XFILEPRINT_LONG_I; fornext_finalvalue3076=*_SUB_XFILEPRINT_LONG_N; fornext_step3076= 1 ; if (fornext_step3076<0) fornext_step_negative3076=1; else fornext_step_negative3076=0; if (new_error) goto fornext_error3076; goto fornext_entrylabel3076; while(1){ fornext_value3076=fornext_step3076+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3076: *_SUB_XFILEPRINT_LONG_I=fornext_value3076; if (fornext_step_negative3076){ if (fornext_value3076fornext_finalvalue3076) break; } fornext_error3076:; if(qbevent){evnt(24706);if(r)goto S_27261;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24707);}while(r); S_27263:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(24708);if(r)goto S_27263;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(24708);}while(r); } S_27266:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24709);if(r)goto S_27266;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(24709);}while(r); } S_27269:; if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(24710);if(r)goto S_27269;} S_27270:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(qbs_ucase(_SUB_XFILEPRINT_STRING_A2),qbs_new_txt_len("USING",5)))))||new_error){ if(qbevent){evnt(24711);if(r)goto S_27270;} LABEL_PRINTFILELAST:; if(qbevent){evnt(24712);r=0;} S_27271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_XFILEPRINT_STRING_A2),qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(24714);if(r)goto S_27271;} S_27272:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24715);if(r)goto S_27272;} do{ *_SUB_XFILEPRINT_LONG_GOTOFPU= 1 ; if(!qbevent)break;evnt(24715);}while(r); }else{ do{ goto LABEL_FPUJUMP; if(!qbevent)break;evnt(24715);}while(r); } } S_27278:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(24718);if(r)goto S_27278;} do{ *_SUB_XFILEPRINT_LONG_USETAB= 1 ; if(!qbevent)break;evnt(24718);}while(r); }else{ do{ *_SUB_XFILEPRINT_LONG_USETAB= 0 ; if(!qbevent)break;evnt(24718);}while(r); } S_27283:; if ((-(*_SUB_XFILEPRINT_LONG_LAST== 1 ))||new_error){ if(qbevent){evnt(24719);if(r)goto S_27283;} do{ *_SUB_XFILEPRINT_LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(24719);}while(r); }else{ do{ *_SUB_XFILEPRINT_LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(24719);}while(r); } do{ *_SUB_XFILEPRINT_LONG_EXTRASPACE= 0 ; if(!qbevent)break;evnt(24720);}while(r); S_27289:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(24722);if(r)goto S_27289;} do{ qbs_set(_SUB_XFILEPRINT_STRING_EBAK,_SUB_XFILEPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24723);}while(r); do{ *_SUB_XFILEPRINT_LONG_PNRTNUM= 0 ; if(!qbevent)break;evnt(24724);}while(r); LABEL_PRINTFILENUMBER:; if(qbevent){evnt(24725);r=0;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24726);}while(r); S_27293:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24727);if(r)goto S_27293;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24727);}while(r); } S_27296:; if ((-(*_SUB_XFILEPRINT_LONG_PNRTNUM== 0 ))||new_error){ if(qbevent){evnt(24728);if(r)goto S_27296;} S_27297:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(24729);if(r)goto S_27297;} do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24729);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24729);}while(r); } } do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATE(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24731);}while(r); S_27304:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24732);if(r)goto S_27304;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24732);}while(r); } S_27307:; if ((-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(24733);if(r)goto S_27307;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("STR$",4),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),_SUB_XFILEPRINT_STRING_EBAK),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24734);}while(r); do{ *_SUB_XFILEPRINT_LONG_EXTRASPACE= 1 ; if(!qbevent)break;evnt(24735);}while(r); do{ *_SUB_XFILEPRINT_LONG_PNRTNUM= 1 ; if(!qbevent)break;evnt(24736);}while(r); do{ goto LABEL_PRINTFILENUMBER; if(!qbevent)break;evnt(24737);}while(r); } S_27313:; if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(24739);if(r)goto S_27313;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3078= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24739);}while(r); } S_27316:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24740);if(r)goto S_27316;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24740);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3079; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_file_print(tmp_fileno,",26),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip3079; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_XFILEPRINT_LONG_EXTRASPACE)), 1 , 0 , 0 ); if (new_error) goto skip3079; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0 , 0 , 0 ); if (new_error) goto skip3079; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_XFILEPRINT_LONG_USETAB)), 1 , 0 , 0 ); if (new_error) goto skip3079; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0 , 0 , 0 ); if (new_error) goto skip3079; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_XFILEPRINT_LONG_NEWLINE)), 1 , 0 , 0 ); if (new_error) goto skip3079; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip3079; skip3079: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24742);}while(r); }else{ S_27321:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(24744);if(r)goto S_27321;} do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24744);}while(r); } S_27324:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(24745);if(r)goto S_27324;} S_27325:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_SUB_XFILEPRINT_STRING_L, 1 ),qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(24746);if(r)goto S_27325;} do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24746);}while(r); } } S_27329:; if ((*_SUB_XFILEPRINT_LONG_USETAB)||new_error){ if(qbevent){evnt(24748);if(r)goto S_27329;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3080; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,1,0);",47), 0 , 0 , 1 ); if (new_error) goto skip3080; skip3080: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24748);}while(r); } } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3081; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3081; skip3081: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24750);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24752);}while(r); S_27335:; if ((*_SUB_XFILEPRINT_LONG_GOTOFPU)||new_error){ if(qbevent){evnt(24753);if(r)goto S_27335;} do{ goto LABEL_FPUJUMP; if(!qbevent)break;evnt(24753);}while(r); } S_27338:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(24754);if(r)goto S_27338;} do{ goto fornext_exit_3075; if(!qbevent)break;evnt(24754);}while(r); } do{ goto LABEL_PRINTFILENEXT; if(!qbevent)break;evnt(24755);}while(r); } } S_27344:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24758);if(r)goto S_27344;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_E,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24758);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24758);}while(r); } LABEL_PRINTFILENEXT:; if(qbevent){evnt(24759);r=0;} } fornext_exit_3075:; S_27350:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24761);if(r)goto S_27350;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24761);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(24761);}while(r); do{ goto LABEL_PRINTFILELAST; if(!qbevent)break;evnt(24761);}while(r); } LABEL_PRINTBLANKLINE:; if(qbevent){evnt(24762);r=0;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3082; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3082; skip3082: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24763);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3083; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip3083; skip3083: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24764);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3084; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_spc_cr_size=1;",18), 0 , 0 , 1 ); if (new_error) goto skip3084; skip3084: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24765);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_XFILEPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24766);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free67.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_XFILEWRITE(qbs*_SUB_XFILEWRITE_STRING_CA,int32*_SUB_XFILEWRITE_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data68.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_XFILEWRITE_STRING_L,qbs_add(qbs_add(qbs_new_txt_len("WRITE",5),__STRING1_SP),qbs_new_txt_len("#",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24770);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_U,FUNC_STR2(&(pass3086=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24771);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3087; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_spc_cr_size=2;",18), 0 , 0 , 1 ); if (new_error) goto skip3087; skip3087: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24772);}while(r); S_27362:; if ((-(*_SUB_XFILEWRITE_LONG_N== 2 ))||new_error){ if(qbevent){evnt(24773);if(r)goto S_27362;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24773);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24773);}while(r); } do{ qbs_set(_SUB_XFILEWRITE_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24774);}while(r); do{ *_SUB_XFILEWRITE_LONG_B= 0 ; if(!qbevent)break;evnt(24775);}while(r); S_27368:; fornext_value3089= 3 ; fornext_finalvalue3089=*_SUB_XFILEWRITE_LONG_N; fornext_step3089= 1 ; if (fornext_step3089<0) fornext_step_negative3089=1; else fornext_step_negative3089=0; if (new_error) goto fornext_error3089; goto fornext_entrylabel3089; while(1){ fornext_value3089=fornext_step3089+(*_SUB_XFILEWRITE_LONG_I); fornext_entrylabel3089: *_SUB_XFILEWRITE_LONG_I=fornext_value3089; if (fornext_step_negative3089){ if (fornext_value3089fornext_finalvalue3089) break; } fornext_error3089:; if(qbevent){evnt(24776);if(r)goto S_27368;} do{ qbs_set(_SUB_XFILEWRITE_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEWRITE_STRING_CA,_SUB_XFILEWRITE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24777);}while(r); S_27370:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(24778);if(r)goto S_27370;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B+ 1 ; if(!qbevent)break;evnt(24778);}while(r); } S_27373:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24779);if(r)goto S_27373;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B- 1 ; if(!qbevent)break;evnt(24779);}while(r); } S_27376:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(",",1)))&(-(*_SUB_XFILEWRITE_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(24780);if(r)goto S_27376;} S_27377:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24781);if(r)goto S_27377;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24781);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24781);}while(r); } do{ goto LABEL_WRITEGOTFN; if(!qbevent)break;evnt(24782);}while(r); } S_27383:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24784);if(r)goto S_27383;} do{ qbs_set(_SUB_XFILEWRITE_STRING_A3,_SUB_XFILEWRITE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24784);}while(r); }else{ do{ qbs_set(_SUB_XFILEWRITE_STRING_A3,qbs_add(qbs_add(_SUB_XFILEWRITE_STRING_A3,__STRING1_SP),_SUB_XFILEWRITE_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24784);}while(r); } } fornext_exit_3088:; do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... ,",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24786);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24786);}while(r); LABEL_WRITEGOTFN:; if(qbevent){evnt(24787);r=0;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEWRITE_STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24788);}while(r); S_27392:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24789);if(r)goto S_27392;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24789);}while(r); } do{ qbs_set(_SUB_XFILEWRITE_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEWRITE_STRING_L,__STRING1_SP2),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24790);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_E,FUNC_EVALUATETOTYP(_SUB_XFILEWRITE_STRING_E,&(pass3090= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24791);}while(r); S_27397:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24792);if(r)goto S_27397;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24792);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3091; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("tab_fileno=tmp_fileno=",22),_SUB_XFILEWRITE_STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3091; skip3091: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24793);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3092; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEWRITE_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3092; skip3092: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24794);}while(r); do{ *_SUB_XFILEWRITE_LONG_I=*_SUB_XFILEWRITE_LONG_I+ 1 ; if(!qbevent)break;evnt(24795);}while(r); S_27403:; if ((-(*_SUB_XFILEWRITE_LONG_I>*_SUB_XFILEWRITE_LONG_N))||new_error){ if(qbevent){evnt(24796);if(r)goto S_27403;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3093; sub_file_print(tmp_fileno,qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,0,1);",47), 0 , 0 , 1 ); if (new_error) goto skip3093; skip3093: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24797);}while(r); do{ goto LABEL_WRITEBLANKLINE; if(!qbevent)break;evnt(24798);}while(r); } do{ *_SUB_XFILEWRITE_LONG_B= 0 ; if(!qbevent)break;evnt(24800);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24801);}while(r); do{ *_SUB_XFILEWRITE_LONG_LAST= 0 ; if(!qbevent)break;evnt(24802);}while(r); S_27410:; fornext_value3095=*_SUB_XFILEWRITE_LONG_I; fornext_finalvalue3095=*_SUB_XFILEWRITE_LONG_N; fornext_step3095= 1 ; if (fornext_step3095<0) fornext_step_negative3095=1; else fornext_step_negative3095=0; if (new_error) goto fornext_error3095; goto fornext_entrylabel3095; while(1){ fornext_value3095=fornext_step3095+(*_SUB_XFILEWRITE_LONG_I); fornext_entrylabel3095: *_SUB_XFILEWRITE_LONG_I=fornext_value3095; if (fornext_step_negative3095){ if (fornext_value3095fornext_finalvalue3095) break; } fornext_error3095:; if(qbevent){evnt(24803);if(r)goto S_27410;} do{ qbs_set(_SUB_XFILEWRITE_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEWRITE_STRING_CA,_SUB_XFILEWRITE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24804);}while(r); S_27412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(24805);if(r)goto S_27412;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B+ 1 ; if(!qbevent)break;evnt(24805);}while(r); } S_27415:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24806);if(r)goto S_27415;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B- 1 ; if(!qbevent)break;evnt(24806);}while(r); } S_27418:; if ((-(*_SUB_XFILEWRITE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(24807);if(r)goto S_27418;} S_27419:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(24808);if(r)goto S_27419;} LABEL_WRITEFILELAST:; if(qbevent){evnt(24809);r=0;} S_27420:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 1 ))||new_error){ if(qbevent){evnt(24810);if(r)goto S_27420;} do{ *_SUB_XFILEWRITE_LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(24810);}while(r); }else{ do{ *_SUB_XFILEWRITE_LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(24810);}while(r); } do{ qbs_set(_SUB_XFILEWRITE_STRING_EBAK,_SUB_XFILEWRITE_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24811);}while(r); do{ *_SUB_XFILEWRITE_LONG_REEVALED= 0 ; if(!qbevent)break;evnt(24812);}while(r); LABEL_WRITEFILENUMBER:; if(qbevent){evnt(24813);r=0;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEWRITE_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24814);}while(r); S_27428:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24815);if(r)goto S_27428;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24815);}while(r); } S_27431:; if ((-(*_SUB_XFILEWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(24816);if(r)goto S_27431;} do{ qbs_set(_SUB_XFILEWRITE_STRING_L,qbs_add(qbs_add(_SUB_XFILEWRITE_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24817);}while(r); S_27433:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(24818);if(r)goto S_27433;} do{ qbs_set(_SUB_XFILEWRITE_STRING_L,qbs_add(qbs_add(_SUB_XFILEWRITE_STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24818);}while(r); } } do{ qbs_set(_SUB_XFILEWRITE_STRING_E,FUNC_EVALUATE(_SUB_XFILEWRITE_STRING_E,_SUB_XFILEWRITE_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24820);}while(r); S_27438:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24821);if(r)goto S_27438;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24821);}while(r); } S_27441:; if ((-(*_SUB_XFILEWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(24822);if(r)goto S_27441;} S_27442:; if ((-((*_SUB_XFILEWRITE_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(24823);if(r)goto S_27442;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("LTRIM$",6),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),qbs_new_txt_len("STR$",4)),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),_SUB_XFILEWRITE_STRING_EBAK),__STRING1_SP),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24824);}while(r); S_27444:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(24825);if(r)goto S_27444;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEWRITE_STRING_E,__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len(",",1)),func_chr( 34 )),qbs_new_txt_len(",1",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24825);}while(r); } do{ *_SUB_XFILEWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(24826);}while(r); do{ goto LABEL_WRITEFILENUMBER; if(!qbevent)break;evnt(24827);}while(r); }else{ do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 34 ),qbs_new_txt_len("\\042",4)),func_chr( 34 )),qbs_new_txt_len(",1",2)),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),_SUB_XFILEWRITE_STRING_EBAK),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len("\\042",4)),func_chr( 34 )),qbs_new_txt_len(",1",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24829);}while(r); S_27451:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(24830);if(r)goto S_27451;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEWRITE_STRING_E,__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len(",",1)),func_chr( 34 )),qbs_new_txt_len(",1",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24830);}while(r); } do{ *_SUB_XFILEWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(24831);}while(r); do{ goto LABEL_WRITEFILENUMBER; if(!qbevent)break;evnt(24832);}while(r); } } S_27458:; if (((*_SUB_XFILEWRITE_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(24835);if(r)goto S_27458;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,FUNC_REFER(_SUB_XFILEWRITE_STRING_E,_SUB_XFILEWRITE_LONG_TYP,&(pass3096= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24835);}while(r); } S_27461:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24836);if(r)goto S_27461;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24836);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3097; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_file_print(tmp_fileno,",26),_SUB_XFILEWRITE_STRING_E),qbs_new_txt_len(",0,0,",5)), 0 , 0 , 0 ); if (new_error) goto skip3097; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_XFILEWRITE_LONG_NEWLINE)), 1 , 0 , 0 ); if (new_error) goto skip3097; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip3097; skip3097: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24838);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3098; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEWRITE_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3098; skip3098: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24839);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24840);}while(r); S_27467:; if ((*_SUB_XFILEWRITE_LONG_LAST)||new_error){ if(qbevent){evnt(24841);if(r)goto S_27467;} do{ goto fornext_exit_3094; if(!qbevent)break;evnt(24841);}while(r); } do{ goto LABEL_WRITEFILENEXT; if(!qbevent)break;evnt(24842);}while(r); } } S_27473:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24845);if(r)goto S_27473;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_add(qbs_add(_SUB_XFILEWRITE_STRING_E,__STRING1_SP),_SUB_XFILEWRITE_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24845);}while(r); }else{ do{ qbs_set(_SUB_XFILEWRITE_STRING_E,_SUB_XFILEWRITE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24845);}while(r); } LABEL_WRITEFILENEXT:; if(qbevent){evnt(24846);r=0;} } fornext_exit_3094:; S_27479:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24848);if(r)goto S_27479;} do{ qbs_set(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24848);}while(r); do{ *_SUB_XFILEWRITE_LONG_LAST= 1 ; if(!qbevent)break;evnt(24848);}while(r); do{ goto LABEL_WRITEFILELAST; if(!qbevent)break;evnt(24848);}while(r); } LABEL_WRITEBLANKLINE:; if(qbevent){evnt(24849);r=0;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3099; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEWRITE_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3099; skip3099: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24851);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3100; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip3100; skip3100: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24852);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3101; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_spc_cr_size=1;",18), 0 , 0 , 1 ); if (new_error) goto skip3101; skip3101: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24853);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(24854);}while(r); S_27488:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(24854);if(r)goto S_27488;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),_SUB_XFILEWRITE_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24854);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XFILEWRITE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24854);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free68.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_XGOSUB(qbs*_SUB_XGOSUB_STRING_CA,int32*_SUB_XGOSUB_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data69.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_XGOSUB_STRING_A2,FUNC_GETELEMENT(_SUB_XGOSUB_STRING_CA,&(pass3104= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24858);}while(r); S_27494:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(_SUB_XGOSUB_STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(24859);if(r)goto S_27494;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24859);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24859);}while(r); } do{ *_SUB_XGOSUB_LONG_V=FUNC_HASHFIND(_SUB_XGOSUB_STRING_A2,&(pass3105= 2 ),_SUB_XGOSUB_LONG_IGNORE,_SUB_XGOSUB_LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24861);}while(r); do{ *_SUB_XGOSUB_LONG_X= 1 ; if(!qbevent)break;evnt(24862);}while(r); LABEL_LABCHK200:; if(qbevent){evnt(24863);r=0;} S_27500:; if ((*_SUB_XGOSUB_LONG_V)||new_error){ if(qbevent){evnt(24864);if(r)goto S_27500;} do{ *_SUB_XGOSUB_LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(24865);}while(r); S_27502:; if (((-(*_SUB_XGOSUB_LONG_S==*__LONG_SUBFUNCN))|(-(*_SUB_XGOSUB_LONG_S== -1 )))||new_error){ if(qbevent){evnt(24866);if(r)goto S_27502;} S_27503:; if ((-(*_SUB_XGOSUB_LONG_S== -1 ))||new_error){ if(qbevent){evnt(24867);if(r)goto S_27503;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(24867);}while(r); } do{ *_SUB_XGOSUB_LONG_X= 0 ; if(!qbevent)break;evnt(24868);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24869);}while(r); }else{ S_27509:; if ((-(*_SUB_XGOSUB_LONG_V== 2 ))||new_error){ if(qbevent){evnt(24871);if(r)goto S_27509;} do{ *_SUB_XGOSUB_LONG_V=FUNC_HASHFINDCONT(_SUB_XGOSUB_LONG_IGNORE,_SUB_XGOSUB_LONG_R); if(!qbevent)break;evnt(24871);}while(r); do{ goto LABEL_LABCHK200; if(!qbevent)break;evnt(24871);}while(r); } } } S_27515:; if ((*_SUB_XGOSUB_LONG_X)||new_error){ if(qbevent){evnt(24874);if(r)goto S_27515;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(24876);}while(r); S_27517:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(24876);if(r)goto S_27517;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(24876);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(24887);if(r)goto S_27531;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),_SUB_XGOSUB_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24887);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XGOSUB_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24887);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3108; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("return_point[next_return_point++]=",34),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3108; skip3108: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24890);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3109; sub_file_print(tmp_fileno,qbs_new_txt_len("if (next_return_point>=return_points) more_return_points();",59), 0 , 0 , 1 ); if (new_error) goto skip3109; skip3109: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24891);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3110; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),_SUB_XGOSUB_STRING_A2),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3110; skip3110: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24892);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip3111; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3111; skip3111: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24894);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip3112; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto RETURN_",12),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3112; skip3112: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24895);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip3113; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip3113; skip3113: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24896);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3114; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("RETURN_",7),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip3114; skip3114: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24897);}while(r); do{ *__LONG_GOSUBID=*__LONG_GOSUBID+ 1 ; if(!qbevent)break;evnt(24898);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free69.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_XONGOTOGOSUB(qbs*_SUB_XONGOTOGOSUB_STRING_A,qbs*_SUB_XONGOTOGOSUB_STRING_CA,int32*_SUB_XONGOTOGOSUB_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data70.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_27544:; if ((-(*_SUB_XONGOTOGOSUB_LONG_N< 4 ))||new_error){ if(qbevent){evnt(24902);if(r)goto S_27544;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ON expression GOTO/GOSUB label,label,...",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24902);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24902);}while(r); } do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_L,qbs_new_txt_len("ON",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24903);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_B= 0 ; if(!qbevent)break;evnt(24904);}while(r); S_27550:; fornext_value3118= 2 ; fornext_finalvalue3118=*_SUB_XONGOTOGOSUB_LONG_N; fornext_step3118= 1 ; if (fornext_step3118<0) fornext_step_negative3118=1; else fornext_step_negative3118=0; if (new_error) goto fornext_error3118; goto fornext_entrylabel3118; while(1){ fornext_value3118=fornext_step3118+(*_SUB_XONGOTOGOSUB_LONG_I); fornext_entrylabel3118: *_SUB_XONGOTOGOSUB_LONG_I=fornext_value3118; if (fornext_step_negative3118){ if (fornext_value3118fornext_finalvalue3118) break; } fornext_error3118:; if(qbevent){evnt(24905);if(r)goto S_27550;} do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E2,FUNC_GETELEMENT(_SUB_XONGOTOGOSUB_STRING_A,_SUB_XONGOTOGOSUB_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24906);}while(r); S_27552:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(24907);if(r)goto S_27552;} do{ *_SUB_XONGOTOGOSUB_LONG_B=*_SUB_XONGOTOGOSUB_LONG_B+ 1 ; if(!qbevent)break;evnt(24907);}while(r); } S_27555:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24908);if(r)goto S_27555;} do{ *_SUB_XONGOTOGOSUB_LONG_B=*_SUB_XONGOTOGOSUB_LONG_B- 1 ; if(!qbevent)break;evnt(24908);}while(r); } S_27558:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len("GOTO",4)))|(qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len("GOSUB",5)))))||new_error){ if(qbevent){evnt(24909);if(r)goto S_27558;} do{ goto fornext_exit_3117; if(!qbevent)break;evnt(24909);}while(r); } } fornext_exit_3117:; S_27562:; if (((-(*_SUB_XONGOTOGOSUB_LONG_I>=*_SUB_XONGOTOGOSUB_LONG_N))|(-(*_SUB_XONGOTOGOSUB_LONG_I== 2 )))||new_error){ if(qbevent){evnt(24911);if(r)goto S_27562;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ON expression GOTO/GOSUB label,label,...",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24911);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24911);}while(r); } do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,FUNC_GETELEMENTS(_SUB_XONGOTOGOSUB_STRING_CA,&(pass3119= 2 ),&(pass3120=*_SUB_XONGOTOGOSUB_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24912);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_G= 0 ; if(!qbevent)break;evnt(24914);}while(r); S_27568:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(24914);if(r)goto S_27568;} do{ *_SUB_XONGOTOGOSUB_LONG_G= 1 ; if(!qbevent)break;evnt(24914);}while(r); } do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XONGOTOGOSUB_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24915);}while(r); S_27572:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24916);if(r)goto S_27572;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24916);}while(r); } do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_L,qbs_add(qbs_add(_SUB_XONGOTOGOSUB_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24917);}while(r); do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,FUNC_EVALUATE(_SUB_XONGOTOGOSUB_STRING_E,_SUB_XONGOTOGOSUB_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24918);}while(r); S_27577:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24919);if(r)goto S_27577;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24919);}while(r); } S_27580:; if (((*_SUB_XONGOTOGOSUB_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(24920);if(r)goto S_27580;} do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,FUNC_REFER(_SUB_XONGOTOGOSUB_STRING_E,_SUB_XONGOTOGOSUB_LONG_TYP,&(pass3121= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24920);}while(r); } S_27583:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(24921);if(r)goto S_27583;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24921);}while(r); } S_27586:; if (((*_SUB_XONGOTOGOSUB_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(24922);if(r)goto S_27586;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric expression",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24922);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24922);}while(r); } S_27590:; if (((*_SUB_XONGOTOGOSUB_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(24923);if(r)goto S_27590;} do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_float_to_long(",18),_SUB_XONGOTOGOSUB_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24924);}while(r); } do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_L,qbs_add(qbs_add(_SUB_XONGOTOGOSUB_STRING_L,__STRING1_SP),_SUB_XONGOTOGOSUB_STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24926);}while(r); do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_U,FUNC_STR2(&(pass3122=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24927);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip3123; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("static int32 ongo_",18),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("=0;",3)), 0 , 0 , 1 ); if (new_error) goto skip3123; skip3123: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24928);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3124; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ongo_",5),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("=",1)),_SUB_XONGOTOGOSUB_STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3124; skip3124: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24929);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_LN= 1 ; if(!qbevent)break;evnt(24930);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_LABELWASLAST= 0 ; if(!qbevent)break;evnt(24931);}while(r); S_27599:; fornext_value3126=*_SUB_XONGOTOGOSUB_LONG_I+ 1 ; fornext_finalvalue3126=*_SUB_XONGOTOGOSUB_LONG_N; fornext_step3126= 1 ; if (fornext_step3126<0) fornext_step_negative3126=1; else fornext_step_negative3126=0; if (new_error) goto fornext_error3126; goto fornext_entrylabel3126; while(1){ fornext_value3126=fornext_step3126+(*_SUB_XONGOTOGOSUB_LONG_I); fornext_entrylabel3126: *_SUB_XONGOTOGOSUB_LONG_I=fornext_value3126; if (fornext_step_negative3126){ if (fornext_value3126fornext_finalvalue3126) break; } fornext_error3126:; if(qbevent){evnt(24932);if(r)goto S_27599;} do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,FUNC_GETELEMENT(_SUB_XONGOTOGOSUB_STRING_CA,_SUB_XONGOTOGOSUB_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24933);}while(r); S_27601:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(24934);if(r)goto S_27601;} do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_L,qbs_add(qbs_add(_SUB_XONGOTOGOSUB_STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24935);}while(r); S_27603:; if ((-(*_SUB_XONGOTOGOSUB_LONG_I==*_SUB_XONGOTOGOSUB_LONG_N))||new_error){ if(qbevent){evnt(24936);if(r)goto S_27603;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Trailing , invalid",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24936);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24936);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_LN=*_SUB_XONGOTOGOSUB_LONG_LN+ 1 ; if(!qbevent)break;evnt(24937);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_LABELWASLAST= 0 ; if(!qbevent)break;evnt(24938);}while(r); }else{ S_27610:; if ((*_SUB_XONGOTOGOSUB_LONG_LABELWASLAST)||new_error){ if(qbevent){evnt(24940);if(r)goto S_27610;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24940);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24940);}while(r); } S_27614:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(_SUB_XONGOTOGOSUB_STRING_E)== 0 )))||new_error){ if(qbevent){evnt(24941);if(r)goto S_27614;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24941);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24941);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_V=FUNC_HASHFIND(_SUB_XONGOTOGOSUB_STRING_E,&(pass3127= 2 ),_SUB_XONGOTOGOSUB_LONG_IGNORE,_SUB_XONGOTOGOSUB_LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24943);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_X= 1 ; if(!qbevent)break;evnt(24944);}while(r); LABEL_LABCHK507:; if(qbevent){evnt(24945);r=0;} S_27620:; if ((*_SUB_XONGOTOGOSUB_LONG_V)||new_error){ if(qbevent){evnt(24946);if(r)goto S_27620;} do{ *_SUB_XONGOTOGOSUB_LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XONGOTOGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257)); if(!qbevent)break;evnt(24947);}while(r); S_27622:; if (((-(*_SUB_XONGOTOGOSUB_LONG_S==*__LONG_SUBFUNCN))|(-(*_SUB_XONGOTOGOSUB_LONG_S== -1 )))||new_error){ if(qbevent){evnt(24948);if(r)goto S_27622;} S_27623:; if ((-(*_SUB_XONGOTOGOSUB_LONG_S== -1 ))||new_error){ if(qbevent){evnt(24949);if(r)goto S_27623;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XONGOTOGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(24949);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_X= 0 ; if(!qbevent)break;evnt(24950);}while(r); do{ qbs_set(__STRING_TLAYOUT,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XONGOTOGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*278+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24951);}while(r); }else{ S_27629:; if ((-(*_SUB_XONGOTOGOSUB_LONG_V== 2 ))||new_error){ if(qbevent){evnt(24953);if(r)goto S_27629;} do{ *_SUB_XONGOTOGOSUB_LONG_V=FUNC_HASHFINDCONT(_SUB_XONGOTOGOSUB_LONG_IGNORE,_SUB_XONGOTOGOSUB_LONG_R); if(!qbevent)break;evnt(24953);}while(r); do{ goto LABEL_LABCHK507; if(!qbevent)break;evnt(24953);}while(r); } } } S_27635:; if ((*_SUB_XONGOTOGOSUB_LONG_X)||new_error){ if(qbevent){evnt(24956);if(r)goto S_27635;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(24958);}while(r); S_27637:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(24958);if(r)goto S_27637;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(24958);}while(r); do{ if (__ARRAY_UDT_LABELS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_LABELS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_LABELS[2]&1){ preserved_elements=__ARRAY_UDT_LABELS[5]; } else preserved_elements=0; __ARRAY_UDT_LABELS[4]= 1 ; __ARRAY_UDT_LABELS[5]=(*__LONG_LABELS_UBOUND)-__ARRAY_UDT_LABELS[4]+1; __ARRAY_UDT_LABELS[6]=1; if (__ARRAY_UDT_LABELS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_LABELS[0]),preserved_elements*2224/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_LABELS[0])); tmp_long=__ARRAY_UDT_LABELS[5]; __ARRAY_UDT_LABELS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2224/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2224/8+1); if (preserved_elements=return_points) more_return_points();",59), 0 , 0 , 1 ); if (new_error) goto skip3131; skip3131: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24975);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3132; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),_SUB_XONGOTOGOSUB_STRING_LB),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3132; skip3132: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24976);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip3133; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3133; skip3133: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24978);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip3134; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto RETURN_",12),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3134; skip3134: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24979);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 15 ; if (new_error) goto skip3135; sub_file_print(tmp_fileno,qbs_new_txt_len("break;",6), 0 , 0 , 1 ); if (new_error) goto skip3135; skip3135: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24980);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3136; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("RETURN_",7),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":;",2)), 0 , 0 , 1 ); if (new_error) goto skip3136; skip3136: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24981);}while(r); do{ *__LONG_GOSUBID=*__LONG_GOSUBID+ 1 ; if(!qbevent)break;evnt(24982);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3137; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("goto ongo_",10),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("_skip;",6)), 0 , 0 , 1 ); if (new_error) goto skip3137; skip3137: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24983);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3138; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip3138; skip3138: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24984);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3139; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (ongo_",9),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("==",2)),FUNC_STR2(_SUB_XONGOTOGOSUB_LONG_LN)),qbs_new_txt_len(") goto LABEL_",13)),_SUB_XONGOTOGOSUB_STRING_E),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3139; skip3139: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24986);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_LABELWASLAST= 1 ; if(!qbevent)break;evnt(24988);}while(r); } } fornext_exit_3125:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3140; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (ongo_",9),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("<0) error(5);",13)), 0 , 0 , 1 ); if (new_error) goto skip3140; skip3140: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24991);}while(r); S_27670:; if ((-(*_SUB_XONGOTOGOSUB_LONG_G== 1 ))||new_error){ if(qbevent){evnt(24992);if(r)goto S_27670;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3141; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("ongo_",5),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("_skip:;",7)), 0 , 0 , 1 ); if (new_error) goto skip3141; skip3141: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(24992);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(24993);}while(r); S_27674:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(24993);if(r)goto S_27674;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),_SUB_XONGOTOGOSUB_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24993);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XONGOTOGOSUB_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24993);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free70.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_XPRINT(qbs*_SUB_XPRINT_STRING_A,qbs*_SUB_XPRINT_STRING_CA,int32*_SUB_XPRINT_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data71.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_XPRINT_STRING_U,FUNC_STR2(&(pass3145=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24997);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_new_txt_len("PRINT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24999);}while(r); S_27681:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_XPRINT_STRING_A)== 76 )))||new_error){ if(qbevent){evnt(25000);if(r)goto S_27681;} do{ *_SUB_XPRINT_LONG_LP= 1 ; if(!qbevent)break;evnt(25000);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_LP,qbs_new_txt_len("l",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25000);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_new_txt_len("LPRINT",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25000);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3146; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_LPRINT=1;",13), 0 , 0 , 1 ); if (new_error) goto skip3146; skip3146: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25000);}while(r); } S_27687:; if ((-(*_SUB_XPRINT_LONG_N>= 2 ))||new_error){ if(qbevent){evnt(25003);if(r)goto S_27687;} S_27688:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_SUB_XPRINT_STRING_A,&(pass3147= 2 )),qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(25004);if(r)goto S_27688;} do{ *_SUB_XPRINT_LONG_I= 3 ; if(!qbevent)break;evnt(25006);}while(r); LABEL_PUJUMP:; if(qbevent){evnt(25007);r=0;} do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),qbs_new_txt_len("USING",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25008);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25009);}while(r); do{ *_SUB_XPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(25009);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25009);}while(r); S_27694:; fornext_value3149=*_SUB_XPRINT_LONG_I; fornext_finalvalue3149=*_SUB_XPRINT_LONG_N; fornext_step3149= 1 ; if (fornext_step3149<0) fornext_step_negative3149=1; else fornext_step_negative3149=0; if (new_error) goto fornext_error3149; goto fornext_entrylabel3149; while(1){ fornext_value3149=fornext_step3149+(*_SUB_XPRINT_LONG_I); fornext_entrylabel3149: *_SUB_XPRINT_LONG_I=fornext_value3149; if (fornext_step_negative3149){ if (fornext_value3149fornext_finalvalue3149) break; } fornext_error3149:; if(qbevent){evnt(25010);if(r)goto S_27694;} do{ qbs_set(_SUB_XPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XPRINT_STRING_CA,_SUB_XPRINT_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25011);}while(r); S_27696:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25012);if(r)goto S_27696;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(25012);}while(r); } S_27699:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25013);if(r)goto S_27699;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(25013);}while(r); } S_27702:; if ((-(*_SUB_XPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(25014);if(r)goto S_27702;} S_27703:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(25015);if(r)goto S_27703;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25015);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25015);}while(r); } S_27707:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(25016);if(r)goto S_27707;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25017);}while(r); S_27709:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25018);if(r)goto S_27709;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25018);}while(r); } do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25019);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_EVALUATE(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25020);}while(r); S_27714:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25021);if(r)goto S_27714;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25021);}while(r); } S_27717:; if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(25022);if(r)goto S_27717;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3150= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25022);}while(r); } S_27720:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25023);if(r)goto S_27720;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25023);}while(r); } S_27723:; if ((-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(25024);if(r)goto S_27723;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25024);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25024);}while(r); } do{ qbs_set(_SUB_XPRINT_STRING_PUFORMAT,_SUB_XPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25025);}while(r); do{ goto fornext_exit_3148; if(!qbevent)break;evnt(25026);}while(r); } } S_27731:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(25029);if(r)goto S_27731;} do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_add(qbs_add(_SUB_XPRINT_STRING_E,__STRING1_SP),_SUB_XPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25029);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25029);}while(r); } } fornext_exit_3148:; S_27737:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25031);if(r)goto S_27737;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25031);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25031);}while(r); } S_27741:; if ((-(*_SUB_XPRINT_LONG_I==*_SUB_XPRINT_LONG_N))||new_error){ if(qbevent){evnt(25032);if(r)goto S_27741;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25032);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25032);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3152; sub_file_print(tmp_fileno,qbs_new_txt_len("tqbs=qbs_new(0,0);",18), 0 , 0 , 1 ); if (new_error) goto skip3152; skip3152: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25034);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3153; sub_file_print(tmp_fileno,qbs_new_txt_len("tmp_long=0;",11), 0 , 0 , 1 ); if (new_error) goto skip3153; skip3153: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25036);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_PUF,qbs_add(qbs_new_txt_len("print_using_format",18),_SUB_XPRINT_STRING_U)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25040);}while(r); S_27748:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25041);if(r)goto S_27748;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip3154; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("static qbs *",12),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3154; skip3154: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25042);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip3155; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3155; skip3155: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25044);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3156; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_PUF,qbs_new_txt_len("=qbs_new(0,0); qbs_set(",23)),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_PUFORMAT),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3156; skip3156: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25046);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3157; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3157; skip3157: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25047);}while(r); do{ *_SUB_XPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(25050);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25051);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(25052);}while(r); S_27758:; fornext_value3159=*_SUB_XPRINT_LONG_I+ 1 ; fornext_finalvalue3159=*_SUB_XPRINT_LONG_N; fornext_step3159= 1 ; if (fornext_step3159<0) fornext_step_negative3159=1; else fornext_step_negative3159=0; if (new_error) goto fornext_error3159; goto fornext_entrylabel3159; while(1){ fornext_value3159=fornext_step3159+(*_SUB_XPRINT_LONG_I); fornext_entrylabel3159: *_SUB_XPRINT_LONG_I=fornext_value3159; if (fornext_step_negative3159){ if (fornext_value3159fornext_finalvalue3159) break; } fornext_error3159:; if(qbevent){evnt(25053);if(r)goto S_27758;} do{ qbs_set(_SUB_XPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XPRINT_STRING_CA,_SUB_XPRINT_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25054);}while(r); S_27760:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25055);if(r)goto S_27760;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(25055);}while(r); } S_27763:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25056);if(r)goto S_27763;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(25056);}while(r); } S_27766:; if ((-(*_SUB_XPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(25057);if(r)goto S_27766;} S_27767:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(25058);if(r)goto S_27767;} LABEL_PRINTULAST:; if(qbevent){evnt(25059);r=0;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25060);}while(r); S_27769:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25061);if(r)goto S_27769;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25061);}while(r); } S_27772:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(25062);if(r)goto S_27772;} do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25062);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25062);}while(r); } do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_EVALUATE(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25063);}while(r); S_27778:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25064);if(r)goto S_27778;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25064);}while(r); } S_27781:; if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(25065);if(r)goto S_27781;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3160= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25065);}while(r); } S_27784:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25066);if(r)goto S_27784;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25066);}while(r); } S_27787:; if ((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25067);if(r)goto S_27787;} S_27788:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_SUB_XPRINT_STRING_E, 9 ),qbs_new_txt_len("func_tab(",9)))|(qbs_equal(qbs_left(_SUB_XPRINT_STRING_E, 9 ),qbs_new_txt_len("func_spc(",9)))))||new_error){ if(qbevent){evnt(25069);if(r)goto S_27788;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3161; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14)), 0 , 0 , 1 ); if (new_error) goto skip3161; skip3161: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25074);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3162; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3162; skip3162: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25076);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3163; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3163; skip3163: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25077);}while(r); S_27792:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(25078);if(r)goto S_27792;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3164; sub_file_print(tmp_fileno,qbs_new_txt_len("lprint_makefit(tqbs);",21), 0 , 0 , 1 ); if (new_error) goto skip3164; skip3164: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25078);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3165; sub_file_print(tmp_fileno,qbs_new_txt_len("makefit(tqbs);",14), 0 , 0 , 1 ); if (new_error) goto skip3165; skip3165: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25078);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3166; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14)), 0 , 0 , 1 ); if (new_error) goto skip3166; skip3166: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25079);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3167; sub_file_print(tmp_fileno,qbs_new_txt_len("tqbs->len=0;",12), 0 , 0 , 1 ); if (new_error) goto skip3167; skip3167: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25081);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3168; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using(",21),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",tmp_long,tqbs,",15)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3168; skip3168: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25086);}while(r); } }else{ S_27803:; if ((*_SUB_XPRINT_LONG_TYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25093);if(r)goto S_27803;} S_27804:; if ((-((*_SUB_XPRINT_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(25094);if(r)goto S_27804;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3169; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_single(",28),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3169; skip3169: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25094);}while(r); } S_27807:; if ((-((*_SUB_XPRINT_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(25095);if(r)goto S_27807;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3170; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_double(",28),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3170; skip3170: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25095);}while(r); } S_27810:; if ((-((*_SUB_XPRINT_LONG_TYP& 511 )> 64 ))||new_error){ if(qbevent){evnt(25096);if(r)goto S_27810;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3171; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_float(",27),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3171; skip3171: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25096);}while(r); } }else{ S_27814:; if ((((-((*_SUB_XPRINT_LONG_TYP& 511 )== 64 )))&(-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISUNSIGNED)!= 0 )))||new_error){ if(qbevent){evnt(25098);if(r)goto S_27814;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3172; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_uinteger64(",32),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3172; skip3172: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25099);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3173; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_integer64(",31),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)), 0 , 0 , 1 ); if (new_error) goto skip3173; skip3173: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25101);}while(r); } } } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3174; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3174; skip3174: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25105);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25106);}while(r); S_27823:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(25107);if(r)goto S_27823;} do{ goto fornext_exit_3158; if(!qbevent)break;evnt(25107);}while(r); } do{ goto LABEL_PRINTUNEXT; if(!qbevent)break;evnt(25108);}while(r); } } S_27829:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(25111);if(r)goto S_27829;} do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_add(qbs_add(_SUB_XPRINT_STRING_E,__STRING1_SP),_SUB_XPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25111);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25111);}while(r); } LABEL_PRINTUNEXT:; if(qbevent){evnt(25112);r=0;} } fornext_exit_3158:; S_27835:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25114);if(r)goto S_27835;} do{ qbs_set(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25114);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(25114);}while(r); do{ goto LABEL_PRINTULAST; if(!qbevent)break;evnt(25114);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3176; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip_pu",7),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3176; skip3176: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25115);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3177; sub_file_print(tmp_fileno,qbs_new_txt_len("if (new_error){",15), 0 , 0 , 1 ); if (new_error) goto skip3177; skip3177: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25117);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3178; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("g_tmp_long=new_error; new_error=0; qbs_",39),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0); new_error=g_tmp_long;",36)), 0 , 0 , 1 ); if (new_error) goto skip3178; skip3178: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25118);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3179; sub_file_print(tmp_fileno,qbs_new_txt_len("}else{",6), 0 , 0 , 1 ); if (new_error) goto skip3179; skip3179: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25119);}while(r); S_27844:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1)))))||new_error){ if(qbevent){evnt(25120);if(r)goto S_27844;} do{ *_SUB_XPRINT_LONG_NL= 0 ; if(!qbevent)break;evnt(25120);}while(r); }else{ do{ *_SUB_XPRINT_LONG_NL= 1 ; if(!qbevent)break;evnt(25120);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3180; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,",11)),FUNC_STR2(_SUB_XPRINT_LONG_NL)),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3180; skip3180: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25121);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3181; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0 , 0 , 1 ); if (new_error) goto skip3181; skip3181: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25122);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3182; sub_file_print(tmp_fileno,qbs_new_txt_len("qbs_free(tqbs);",15), 0 , 0 , 1 ); if (new_error) goto skip3182; skip3182: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25123);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3183; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3183; skip3183: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25124);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3184; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3184; skip3184: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25125);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3185; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip3185; skip3185: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25126);}while(r); S_27855:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(25127);if(r)goto S_27855;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3186; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_LPRINT=0;",13), 0 , 0 , 1 ); if (new_error) goto skip3186; skip3186: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25127);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_XPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25128);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25129);}while(r); } } do{ *_SUB_XPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(25134);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25135);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(25136);}while(r); S_27865:; fornext_value3188= 2 ; fornext_finalvalue3188=*_SUB_XPRINT_LONG_N; fornext_step3188= 1 ; if (fornext_step3188<0) fornext_step_negative3188=1; else fornext_step_negative3188=0; if (new_error) goto fornext_error3188; goto fornext_entrylabel3188; while(1){ fornext_value3188=fornext_step3188+(*_SUB_XPRINT_LONG_I); fornext_entrylabel3188: *_SUB_XPRINT_LONG_I=fornext_value3188; if (fornext_step_negative3188){ if (fornext_value3188fornext_finalvalue3188) break; } fornext_error3188:; if(qbevent){evnt(25137);if(r)goto S_27865;} do{ qbs_set(_SUB_XPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XPRINT_STRING_CA,_SUB_XPRINT_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25138);}while(r); S_27867:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25139);if(r)goto S_27867;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(25139);}while(r); } S_27870:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25140);if(r)goto S_27870;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(25140);}while(r); } S_27873:; if ((-(*_SUB_XPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(25141);if(r)goto S_27873;} S_27874:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(qbs_ucase(_SUB_XPRINT_STRING_A2),qbs_new_txt_len("USING",5)))))||new_error){ if(qbevent){evnt(25142);if(r)goto S_27874;} LABEL_PRINTLAST:; if(qbevent){evnt(25143);r=0;} S_27875:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_XPRINT_STRING_A2),qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(25145);if(r)goto S_27875;} S_27876:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25146);if(r)goto S_27876;} do{ *_SUB_XPRINT_LONG_GOTOPU= 1 ; if(!qbevent)break;evnt(25146);}while(r); }else{ do{ *_SUB_XPRINT_LONG_I=*_SUB_XPRINT_LONG_I+ 1 ; if(!qbevent)break;evnt(25146);}while(r); do{ goto LABEL_PUJUMP; if(!qbevent)break;evnt(25146);}while(r); } } S_27883:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(25149);if(r)goto S_27883;} do{ qbs_set(_SUB_XPRINT_STRING_EBAK,_SUB_XPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25150);}while(r); do{ *_SUB_XPRINT_LONG_PNRTNUM= 0 ; if(!qbevent)break;evnt(25151);}while(r); LABEL_PRINTNUMBER:; if(qbevent){evnt(25152);r=0;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25153);}while(r); S_27887:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25154);if(r)goto S_27887;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25154);}while(r); } S_27890:; if ((-(*_SUB_XPRINT_LONG_PNRTNUM== 0 ))||new_error){ if(qbevent){evnt(25155);if(r)goto S_27890;} S_27891:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(25156);if(r)goto S_27891;} do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25156);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25156);}while(r); } } do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_EVALUATE(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25158);}while(r); S_27898:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25159);if(r)goto S_27898;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25159);}while(r); } S_27901:; if ((-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(25160);if(r)goto S_27901;} do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("STR$",4),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),_SUB_XPRINT_STRING_EBAK),__STRING1_SP),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len(" ",1)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25162);}while(r); do{ *_SUB_XPRINT_LONG_PNRTNUM= 1 ; if(!qbevent)break;evnt(25163);}while(r); do{ goto LABEL_PRINTNUMBER; if(!qbevent)break;evnt(25164);}while(r); } S_27906:; if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(25166);if(r)goto S_27906;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3190= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25166);}while(r); } S_27909:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25167);if(r)goto S_27909;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25167);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3191; sub_file_print(tmp_fileno,qbs_new_txt_len("tqbs=qbs_new(0,0);",18), 0 , 0 , 1 ); if (new_error) goto skip3191; skip3191: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25168);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3192; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3192; skip3192: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25169);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3193; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3193; skip3193: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25170);}while(r); S_27915:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(25171);if(r)goto S_27915;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3194; sub_file_print(tmp_fileno,qbs_new_txt_len("lprint_makefit(tqbs);",21), 0 , 0 , 1 ); if (new_error) goto skip3194; skip3194: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25171);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3195; sub_file_print(tmp_fileno,qbs_new_txt_len("makefit(tqbs);",14), 0 , 0 , 1 ); if (new_error) goto skip3195; skip3195: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25171);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3196; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14)), 0 , 0 , 1 ); if (new_error) goto skip3196; skip3196: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25172);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3197; sub_file_print(tmp_fileno,qbs_new_txt_len("qbs_free(tqbs);",15), 0 , 0 , 1 ); if (new_error) goto skip3197; skip3197: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25173);}while(r); }else{ S_27923:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(25175);if(r)goto S_27923;} do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),_SUB_XPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25175);}while(r); } S_27926:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(25176);if(r)goto S_27926;} S_27927:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_SUB_XPRINT_STRING_L, 1 ),qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(25177);if(r)goto S_27927;} do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),_SUB_XPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25177);}while(r); } } } S_27932:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(25180);if(r)goto S_27932;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3198; sub_file_print(tmp_fileno,qbs_new_txt_len("tab();",6), 0 , 0 , 1 ); if (new_error) goto skip3198; skip3198: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25180);}while(r); } do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25181);}while(r); S_27936:; if ((*_SUB_XPRINT_LONG_GOTOPU)||new_error){ if(qbevent){evnt(25183);if(r)goto S_27936;} do{ *_SUB_XPRINT_LONG_I=*_SUB_XPRINT_LONG_I+ 1 ; if(!qbevent)break;evnt(25183);}while(r); do{ goto LABEL_PUJUMP; if(!qbevent)break;evnt(25183);}while(r); } S_27940:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(25185);if(r)goto S_27940;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3199; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(nothingstring,1);",23)), 0 , 0 , 1 ); if (new_error) goto skip3199; skip3199: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25186);}while(r); do{ goto fornext_exit_3187; if(!qbevent)break;evnt(25187);}while(r); } do{ goto LABEL_PRINTNEXT; if(!qbevent)break;evnt(25190);}while(r); } } S_27947:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(25194);if(r)goto S_27947;} do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_add(qbs_add(_SUB_XPRINT_STRING_E,__STRING1_SP),_SUB_XPRINT_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25194);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25194);}while(r); } LABEL_PRINTNEXT:; if(qbevent){evnt(25195);r=0;} } fornext_exit_3187:; S_27953:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(25197);if(r)goto S_27953;} do{ qbs_set(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25197);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(25197);}while(r); do{ goto LABEL_PRINTLAST; if(!qbevent)break;evnt(25197);}while(r); } S_27958:; if ((-(*_SUB_XPRINT_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25198);if(r)goto S_27958;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3202; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(nothingstring,1);",23)), 0 , 0 , 1 ); if (new_error) goto skip3202; skip3202: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25198);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3203; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3203; skip3203: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25199);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3204; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip3204; skip3204: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25200);}while(r); S_27963:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(25201);if(r)goto S_27963;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3205; sub_file_print(tmp_fileno,qbs_new_txt_len("tab_LPRINT=0;",13), 0 , 0 , 1 ); if (new_error) goto skip3205; skip3205: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25201);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_XPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25202);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free71.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_XREAD(qbs*_SUB_XREAD_STRING_CA,int32*_SUB_XREAD_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data72.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_XREAD_STRING_L,qbs_new_txt_len("READ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25209);}while(r); S_27968:; if ((-(*_SUB_XREAD_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25210);if(r)goto S_27968;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25210);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25210);}while(r); } do{ *_SUB_XREAD_LONG_I= 2 ; if(!qbevent)break;evnt(25211);}while(r); S_27973:; if ((-(*_SUB_XREAD_LONG_I>*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(25212);if(r)goto S_27973;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25212);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25212);}while(r); } do{ qbs_set(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25213);}while(r); do{ *_SUB_XREAD_LONG_B= 0 ; if(!qbevent)break;evnt(25214);}while(r); S_27979:; fornext_value3208=*_SUB_XREAD_LONG_I; fornext_finalvalue3208=*_SUB_XREAD_LONG_N; fornext_step3208= 1 ; if (fornext_step3208<0) fornext_step_negative3208=1; else fornext_step_negative3208=0; if (new_error) goto fornext_error3208; goto fornext_entrylabel3208; while(1){ fornext_value3208=fornext_step3208+(*_SUB_XREAD_LONG_I); fornext_entrylabel3208: *_SUB_XREAD_LONG_I=fornext_value3208; if (fornext_step_negative3208){ if (fornext_value3208fornext_finalvalue3208) break; } fornext_error3208:; if(qbevent){evnt(25215);if(r)goto S_27979;} do{ qbs_set(_SUB_XREAD_STRING_A2,FUNC_GETELEMENT(_SUB_XREAD_STRING_CA,_SUB_XREAD_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25216);}while(r); S_27981:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25217);if(r)goto S_27981;} do{ *_SUB_XREAD_LONG_B=*_SUB_XREAD_LONG_B+ 1 ; if(!qbevent)break;evnt(25217);}while(r); } S_27984:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25218);if(r)goto S_27984;} do{ *_SUB_XREAD_LONG_B=*_SUB_XREAD_LONG_B- 1 ; if(!qbevent)break;evnt(25218);}while(r); } S_27987:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(_SUB_XREAD_STRING_A2,qbs_new_txt_len(",",1)))&(-(*_SUB_XREAD_LONG_B== 0 ))))|(-(*_SUB_XREAD_LONG_I==*_SUB_XREAD_LONG_N))))||new_error){ if(qbevent){evnt(25219);if(r)goto S_27987;} S_27988:; if ((-(*_SUB_XREAD_LONG_I==*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(25220);if(r)goto S_27988;} S_27989:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25221);if(r)goto S_27989;} do{ qbs_set(_SUB_XREAD_STRING_A3,_SUB_XREAD_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25221);}while(r); }else{ do{ qbs_set(_SUB_XREAD_STRING_A3,qbs_add(qbs_add(_SUB_XREAD_STRING_A3,__STRING1_SP),_SUB_XREAD_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25221);}while(r); } } S_27995:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25223);if(r)goto S_27995;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25223);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25223);}while(r); } do{ qbs_set(_SUB_XREAD_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XREAD_STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25224);}while(r); S_28000:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25225);if(r)goto S_28000;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25225);}while(r); } do{ qbs_set(_SUB_XREAD_STRING_L,qbs_add(qbs_add(_SUB_XREAD_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25226);}while(r); S_28004:; if ((-(*_SUB_XREAD_LONG_I!=*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(25226);if(r)goto S_28004;} do{ qbs_set(_SUB_XREAD_STRING_L,qbs_add(qbs_add(_SUB_XREAD_STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25226);}while(r); } do{ qbs_set(_SUB_XREAD_STRING_E,FUNC_EVALUATE(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25227);}while(r); S_28008:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25228);if(r)goto S_28008;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25228);}while(r); } S_28011:; if ((-((*_SUB_XREAD_LONG_T&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(25229);if(r)goto S_28011;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25229);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25229);}while(r); } S_28015:; if (((*_SUB_XREAD_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(25231);if(r)goto S_28015;} do{ qbs_set(_SUB_XREAD_STRING_E,FUNC_REFER(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T,&(pass3209= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25232);}while(r); S_28017:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25233);if(r)goto S_28017;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25233);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3210; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("sub_read_string(data,&data_offset,data_size,",44),_SUB_XREAD_STRING_E),qbs_new_txt_len(");",2)), 0 , 0 , 1 ); if (new_error) goto skip3210; skip3210: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25234);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(25235);}while(r); }else{ S_28023:; if (((-((*_SUB_XREAD_LONG_T&*__LONG_ISFLOAT)!= 0 ))|(-((*_SUB_XREAD_LONG_T& 511 )!= 64 )))||new_error){ if(qbevent){evnt(25238);if(r)goto S_28023;} S_28024:; if (((*_SUB_XREAD_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(25239);if(r)goto S_28024;} do{ SUB_SETREFER(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T,qbs_add(qbs_add(qbs_new_txt_len("((int64)func_read_float(data,&data_offset,data_size,",52),FUNC_STR2(_SUB_XREAD_LONG_T)),qbs_new_txt_len("))",2)),&(pass3211= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25240);}while(r); S_28026:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25241);if(r)goto S_28026;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25241);}while(r); } }else{ do{ SUB_SETREFER(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T,qbs_add(qbs_add(qbs_new_txt_len("func_read_float(data,&data_offset,data_size,",44),FUNC_STR2(_SUB_XREAD_LONG_T)),qbs_new_txt_len(")",1)),&(pass3212= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25243);}while(r); S_28031:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25244);if(r)goto S_28031;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25244);}while(r); } } }else{ S_28036:; if ((*_SUB_XREAD_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(25247);if(r)goto S_28036;} do{ SUB_SETREFER(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T,qbs_new_txt_len("func_read_uint64(data,&data_offset,data_size)",45),&(pass3213= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25248);}while(r); S_28038:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25249);if(r)goto S_28038;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25249);}while(r); } }else{ do{ SUB_SETREFER(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T,qbs_new_txt_len("func_read_int64(data,&data_offset,data_size)",44),&(pass3214= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25251);}while(r); S_28043:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25252);if(r)goto S_28043;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25252);}while(r); } } } } S_28049:; if ((-(*_SUB_XREAD_LONG_I==*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(25256);if(r)goto S_28049;} do{ goto fornext_exit_3207; if(!qbevent)break;evnt(25256);}while(r); } do{ qbs_set(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25257);}while(r); do{ qbs_set(_SUB_XREAD_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25257);}while(r); } S_28055:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25259);if(r)goto S_28055;} do{ qbs_set(_SUB_XREAD_STRING_A3,_SUB_XREAD_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25259);}while(r); }else{ do{ qbs_set(_SUB_XREAD_STRING_A3,qbs_add(qbs_add(_SUB_XREAD_STRING_A3,__STRING1_SP),_SUB_XREAD_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25259);}while(r); } } fornext_exit_3207:; S_28061:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(25261);if(r)goto S_28061;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3215; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip3215; skip3215: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25261);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(25262);}while(r); S_28065:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(25262);if(r)goto S_28065;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),_SUB_XREAD_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25262);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XREAD_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25262);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free72.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_XWRITE(qbs*_SUB_XWRITE_STRING_CA,int32*_SUB_XWRITE_LONG_N){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data73.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_XWRITE_STRING_L,qbs_new_txt_len("WRITE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25266);}while(r); do{ qbs_set(_SUB_XWRITE_STRING_U,FUNC_STR2(&(pass3218=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25267);}while(r); S_28072:; if ((-(*_SUB_XWRITE_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25268);if(r)goto S_28072;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3219; sub_file_print(tmp_fileno,qbs_new_txt_len("qbs_print(nothingstring,1);",27), 0 , 0 , 1 ); if (new_error) goto skip3219; skip3219: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25269);}while(r); do{ goto LABEL_WRITEBLANKLINE2; if(!qbevent)break;evnt(25270);}while(r); } do{ *_SUB_XWRITE_LONG_B= 0 ; if(!qbevent)break;evnt(25272);}while(r); do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25273);}while(r); do{ *_SUB_XWRITE_LONG_LAST= 0 ; if(!qbevent)break;evnt(25274);}while(r); S_28079:; fornext_value3221= 2 ; fornext_finalvalue3221=*_SUB_XWRITE_LONG_N; fornext_step3221= 1 ; if (fornext_step3221<0) fornext_step_negative3221=1; else fornext_step_negative3221=0; if (new_error) goto fornext_error3221; goto fornext_entrylabel3221; while(1){ fornext_value3221=fornext_step3221+(*_SUB_XWRITE_LONG_I); fornext_entrylabel3221: *_SUB_XWRITE_LONG_I=fornext_value3221; if (fornext_step_negative3221){ if (fornext_value3221fornext_finalvalue3221) break; } fornext_error3221:; if(qbevent){evnt(25275);if(r)goto S_28079;} do{ qbs_set(_SUB_XWRITE_STRING_A2,FUNC_GETELEMENT(_SUB_XWRITE_STRING_CA,_SUB_XWRITE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25276);}while(r); S_28081:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XWRITE_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25277);if(r)goto S_28081;} do{ *_SUB_XWRITE_LONG_B=*_SUB_XWRITE_LONG_B+ 1 ; if(!qbevent)break;evnt(25277);}while(r); } S_28084:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XWRITE_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25278);if(r)goto S_28084;} do{ *_SUB_XWRITE_LONG_B=*_SUB_XWRITE_LONG_B- 1 ; if(!qbevent)break;evnt(25278);}while(r); } S_28087:; if ((-(*_SUB_XWRITE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(25279);if(r)goto S_28087;} S_28088:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XWRITE_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(25280);if(r)goto S_28088;} LABEL_WRITELAST:; if(qbevent){evnt(25281);r=0;} S_28089:; if ((-(*_SUB_XWRITE_LONG_LAST== 1 ))||new_error){ if(qbevent){evnt(25282);if(r)goto S_28089;} do{ *_SUB_XWRITE_LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(25282);}while(r); }else{ do{ *_SUB_XWRITE_LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(25282);}while(r); } do{ qbs_set(_SUB_XWRITE_STRING_EBAK,_SUB_XWRITE_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25283);}while(r); do{ *_SUB_XWRITE_LONG_REEVALED= 0 ; if(!qbevent)break;evnt(25284);}while(r); LABEL_WRITECHECKED:; if(qbevent){evnt(25285);r=0;} do{ qbs_set(_SUB_XWRITE_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XWRITE_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25286);}while(r); S_28097:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25287);if(r)goto S_28097;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25287);}while(r); } S_28100:; if ((-(*_SUB_XWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(25288);if(r)goto S_28100;} do{ qbs_set(_SUB_XWRITE_STRING_L,qbs_add(qbs_add(_SUB_XWRITE_STRING_L,__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25289);}while(r); S_28102:; if ((-(*_SUB_XWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(25290);if(r)goto S_28102;} do{ qbs_set(_SUB_XWRITE_STRING_L,qbs_add(qbs_add(_SUB_XWRITE_STRING_L,__STRING1_SP2),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25290);}while(r); } } do{ qbs_set(_SUB_XWRITE_STRING_E,FUNC_EVALUATE(_SUB_XWRITE_STRING_E,_SUB_XWRITE_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25292);}while(r); S_28107:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25293);if(r)goto S_28107;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25293);}while(r); } S_28110:; if ((-(*_SUB_XWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(25294);if(r)goto S_28110;} S_28111:; if ((-((*_SUB_XWRITE_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(25295);if(r)goto S_28111;} do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("LTRIM$",6),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),qbs_new_txt_len("STR$",4)),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),_SUB_XWRITE_STRING_EBAK),__STRING1_SP),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25296);}while(r); S_28113:; if ((-(*_SUB_XWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(25297);if(r)goto S_28113;} do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XWRITE_STRING_E,__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len(",",1)),func_chr( 34 )),qbs_new_txt_len(",1",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25297);}while(r); } do{ *_SUB_XWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(25298);}while(r); do{ goto LABEL_WRITECHECKED; if(!qbevent)break;evnt(25299);}while(r); }else{ do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 34 ),qbs_new_txt_len("\\042",4)),func_chr( 34 )),qbs_new_txt_len(",1",2)),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),_SUB_XWRITE_STRING_EBAK),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len("\\042",4)),func_chr( 34 )),qbs_new_txt_len(",1",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25301);}while(r); S_28120:; if ((-(*_SUB_XWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(25302);if(r)goto S_28120;} do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XWRITE_STRING_E,__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len(",",1)),func_chr( 34 )),qbs_new_txt_len(",1",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25302);}while(r); } do{ *_SUB_XWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(25303);}while(r); do{ goto LABEL_WRITECHECKED; if(!qbevent)break;evnt(25304);}while(r); } } S_28127:; if (((*_SUB_XWRITE_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(25307);if(r)goto S_28127;} do{ qbs_set(_SUB_XWRITE_STRING_E,FUNC_REFER(_SUB_XWRITE_STRING_E,_SUB_XWRITE_LONG_TYP,&(pass3222= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25307);}while(r); } S_28130:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25308);if(r)goto S_28130;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25308);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3223; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("qbs_print(",10),_SUB_XWRITE_STRING_E),qbs_new_txt_len(",",1)), 0 , 0 , 0 ); if (new_error) goto skip3223; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_XWRITE_LONG_NEWLINE)), 1 , 0 , 0 ); if (new_error) goto skip3223; sub_file_print(tmp_fileno,qbs_new_txt_len(");",2), 0 , 0 , 1 ); if (new_error) goto skip3223; skip3223: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25310);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3224; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XWRITE_STRING_U),qbs_new_txt_len(";",1)), 0 , 0 , 1 ); if (new_error) goto skip3224; skip3224: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25311);}while(r); do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25312);}while(r); S_28136:; if ((*_SUB_XWRITE_LONG_LAST)||new_error){ if(qbevent){evnt(25313);if(r)goto S_28136;} do{ goto fornext_exit_3220; if(!qbevent)break;evnt(25313);}while(r); } do{ goto LABEL_WRITENEXT; if(!qbevent)break;evnt(25314);}while(r); } } S_28142:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25317);if(r)goto S_28142;} do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_add(qbs_add(_SUB_XWRITE_STRING_E,__STRING1_SP),_SUB_XWRITE_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25317);}while(r); }else{ do{ qbs_set(_SUB_XWRITE_STRING_E,_SUB_XWRITE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25317);}while(r); } LABEL_WRITENEXT:; if(qbevent){evnt(25318);r=0;} } fornext_exit_3220:; S_28148:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25320);if(r)goto S_28148;} do{ qbs_set(_SUB_XWRITE_STRING_A2,qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25320);}while(r); do{ *_SUB_XWRITE_LONG_LAST= 1 ; if(!qbevent)break;evnt(25320);}while(r); do{ goto LABEL_WRITELAST; if(!qbevent)break;evnt(25320);}while(r); } LABEL_WRITEBLANKLINE2:; if(qbevent){evnt(25321);r=0;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3225; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XWRITE_STRING_U),qbs_new_txt_len(":",1)), 0 , 0 , 1 ); if (new_error) goto skip3225; skip3225: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25322);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 12 ; if (new_error) goto skip3226; sub_file_print(tmp_fileno,qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)), 0 , 0 , 1 ); if (new_error) goto skip3226; skip3226: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25323);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(25324);}while(r); S_28156:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(25324);if(r)goto S_28156;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(__STRING_LAYOUT,__STRING1_SP),_SUB_XWRITE_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25324);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XWRITE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25324);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free73.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_EVALUATECONST(qbs*_FUNC_EVALUATECONST_STRING_A2,int32*_FUNC_EVALUATECONST_LONG_T){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data74.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_EVALUATECONST_STRING_A,_FUNC_EVALUATECONST_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25328);}while(r); S_28162:; if ((*__LONG_DEBUG)||new_error){ if(qbevent){evnt(25329);if(r)goto S_28162;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3229; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("evaluateconst:in:",17),_FUNC_EVALUATECONST_STRING_A), 0 , 0 , 1 ); if (new_error) goto skip3229; skip3229: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25329);}while(r); } do{ if (_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[2]&2){ error(10); }else{ if (_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[2]&1){ error(10); }else{ _FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4]= 0 ; _FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]=( 1000 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4]+1; _FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[6]=1; _FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]=(ptrszint)malloc(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]*8); if (!_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]) error(257); _FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[2]|=1; tmp_long=_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]; if (_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(25332);}while(r); do{ if (_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[2]&2){ error(10); }else{ if (_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[2]&1){ error(10); }else{ _FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4]= 0 ; _FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]=( 1000 )-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4]+1; _FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[6]=1; if (_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[2]&4){ _FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]*2); memset((void*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]),0,_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]*2); }else{ _FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]=(ptrszint)calloc(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]*2,1); if (!_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]) error(257); } _FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[2]|=1; } } if(!qbevent)break;evnt(25333);}while(r); do{ if (_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[2]&2){ error(10); }else{ if (_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[2]&1){ error(10); }else{ _FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4]= 0 ; _FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]=( 1000 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4]+1; _FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[6]=1; if (_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[2]&4){ _FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]*4); memset((void*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]),0,_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]*4); }else{ _FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]=(ptrszint)calloc(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]*4,1); if (!_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]) error(257); } _FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[2]|=1; } } if(!qbevent)break;evnt(25336);}while(r); do{ *_FUNC_EVALUATECONST_LONG_N=FUNC_NUMELEMENTS(_FUNC_EVALUATECONST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25339);}while(r); S_28169:; fornext_value3231= 1 ; fornext_finalvalue3231=*_FUNC_EVALUATECONST_LONG_N; fornext_step3231= 1 ; if (fornext_step3231<0) fornext_step_negative3231=1; else fornext_step_negative3231=0; if (new_error) goto fornext_error3231; goto fornext_entrylabel3231; while(1){ fornext_value3231=fornext_step3231+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3231: *_FUNC_EVALUATECONST_LONG_I=fornext_value3231; if (fornext_step_negative3231){ if (fornext_value3231fornext_finalvalue3231) break; } fornext_error3231:; if(qbevent){evnt(25340);if(r)goto S_28169;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),FUNC_GETELEMENT(_FUNC_EVALUATECONST_STRING_A,_FUNC_EVALUATECONST_LONG_I)); if(!qbevent)break;evnt(25341);}while(r); } fornext_exit_3230:; LABEL_EVALCONSTEVALBRACK:; if(qbevent){evnt(25344);r=0;} do{ *_FUNC_EVALUATECONST_LONG_L= 0 ; if(!qbevent)break;evnt(25347);}while(r); do{ *_FUNC_EVALUATECONST_LONG_B= 0 ; if(!qbevent)break;evnt(25348);}while(r); S_28174:; fornext_value3233= 1 ; fornext_finalvalue3233=*_FUNC_EVALUATECONST_LONG_N; fornext_step3233= 1 ; if (fornext_step3233<0) fornext_step_negative3233=1; else fornext_step_negative3233=0; if (new_error) goto fornext_error3233; goto fornext_entrylabel3233; while(1){ fornext_value3233=fornext_step3233+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3233: *_FUNC_EVALUATECONST_LONG_I=fornext_value3233; if (fornext_step_negative3233){ if (fornext_value3233fornext_finalvalue3233) break; } fornext_error3233:; if(qbevent){evnt(25349);if(r)goto S_28174;} S_28175:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25350);if(r)goto S_28175;} do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B+ 1 ; if(!qbevent)break;evnt(25350);}while(r); } S_28178:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25351);if(r)goto S_28178;} do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B- 1 ; if(!qbevent)break;evnt(25351);}while(r); } S_28181:; if ((-(*_FUNC_EVALUATECONST_LONG_B>*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(25352);if(r)goto S_28181;} do{ *_FUNC_EVALUATECONST_LONG_L=*_FUNC_EVALUATECONST_LONG_B; if(!qbevent)break;evnt(25352);}while(r); } } fornext_exit_3232:; S_28185:; if ((*_FUNC_EVALUATECONST_LONG_L)||new_error){ if(qbevent){evnt(25356);if(r)goto S_28185;} do{ *_FUNC_EVALUATECONST_LONG_B= 0 ; if(!qbevent)break;evnt(25358);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25359);}while(r); S_28188:; fornext_value3235= 1 ; fornext_finalvalue3235=*_FUNC_EVALUATECONST_LONG_N; fornext_step3235= 1 ; if (fornext_step3235<0) fornext_step_negative3235=1; else fornext_step_negative3235=0; if (new_error) goto fornext_error3235; goto fornext_entrylabel3235; while(1){ fornext_value3235=fornext_step3235+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3235: *_FUNC_EVALUATECONST_LONG_I=fornext_value3235; if (fornext_step_negative3235){ if (fornext_value3235fornext_finalvalue3235) break; } fornext_error3235:; if(qbevent){evnt(25360);if(r)goto S_28188;} S_28189:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25362);if(r)goto S_28189;} S_28190:; if ((-(*_FUNC_EVALUATECONST_LONG_B==*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(25363);if(r)goto S_28190;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(25363);}while(r); do{ goto fornext_exit_3234; if(!qbevent)break;evnt(25363);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B- 1 ; if(!qbevent)break;evnt(25364);}while(r); } S_28196:; if ((-(*_FUNC_EVALUATECONST_LONG_B>=*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(25367);if(r)goto S_28196;} S_28197:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_EVALUATECONST_STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(25368);if(r)goto S_28197;} do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25368);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,qbs_add(qbs_add(_FUNC_EVALUATECONST_STRING_E,__STRING1_SP),((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25368);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(25369);}while(r); } S_28204:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25372);if(r)goto S_28204;} do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B+ 1 ; if(!qbevent)break;evnt(25373);}while(r); S_28206:; if ((-(*_FUNC_EVALUATECONST_LONG_B==*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(25374);if(r)goto S_28206;} do{ *_FUNC_EVALUATECONST_LONG_I2=*_FUNC_EVALUATECONST_LONG_I; if(!qbevent)break;evnt(25374);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(25374);}while(r); } } } fornext_exit_3234:; do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25379);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),FUNC_EVALUATECONST(_FUNC_EVALUATECONST_STRING_E,(&(((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])])))); if(!qbevent)break;evnt(25380);}while(r); S_28214:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25381);if(r)goto S_28214;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25381);}while(r); } do{ goto LABEL_EVALCONSTEVALBRACK; if(!qbevent)break;evnt(25382);}while(r); } S_28219:; fornext_value3238= 1 ; fornext_finalvalue3238=*_FUNC_EVALUATECONST_LONG_N; fornext_step3238= 1 ; if (fornext_step3238<0) fornext_step_negative3238=1; else fornext_step_negative3238=0; if (new_error) goto fornext_error3238; goto fornext_entrylabel3238; while(1){ fornext_value3238=fornext_step3238+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3238: *_FUNC_EVALUATECONST_LONG_I=fornext_value3238; if (fornext_step_negative3238){ if (fornext_value3238fornext_finalvalue3238) break; } fornext_error3238:; if(qbevent){evnt(25395);if(r)goto S_28219;} S_28220:; if ((-(((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5])]== 0 ))||new_error){ if(qbevent){evnt(25396);if(r)goto S_28220;} S_28221:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len))||new_error){ if(qbevent){evnt(25397);if(r)goto S_28221;} do{ *_FUNC_EVALUATECONST_LONG_A=qbs_asc(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25399);}while(r); S_28223:; if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_EVALUATECONST_LONG_A== 45 ))&(-(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len> 1 )))|((-(*_FUNC_EVALUATECONST_LONG_A>= 48 ))&(-(*_FUNC_EVALUATECONST_LONG_A<= 57 )))))||new_error){ if(qbevent){evnt(25400);if(r)goto S_28223;} do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])), 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25403);}while(r); S_28225:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(25404);if(r)goto S_28225;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25404);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25404);}while(r); } S_28229:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(25405);if(r)goto S_28229;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25405);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25405);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])), 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25406);}while(r); S_28234:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(25407);if(r)goto S_28234;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25407);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25407);}while(r); } S_28238:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(25408);if(r)goto S_28238;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_BYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25408);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25408);}while(r); } S_28242:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(25409);if(r)goto S_28242;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25409);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25409);}while(r); } S_28246:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(25410);if(r)goto S_28246;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25410);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25410);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])), 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25411);}while(r); S_28251:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(25412);if(r)goto S_28251;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25412);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25412);}while(r); } S_28255:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(25413);if(r)goto S_28255;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25413);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(25413);}while(r); } S_28259:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("~`",2),0)))||new_error){ if(qbevent){evnt(25416);if(r)goto S_28259;} do{ *_FUNC_EVALUATECONST_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("~`",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25417);}while(r); S_28261:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_EVALUATECONST_LONG_X==(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len- 1 ))))||new_error){ if(qbevent){evnt(25418);if(r)goto S_28261;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("1",1))); if(!qbevent)break;evnt(25418);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=qbr(*__LONG_UBITTYPE-*__LONG_ISPOINTER- 1 +func_val(qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len-*_FUNC_EVALUATECONST_LONG_X- 1 ))); if(!qbevent)break;evnt(25419);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),i642string(qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),*_FUNC_EVALUATECONST_LONG_X- 1 ))))); if(!qbevent)break;evnt(25420);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25421);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(25422);}while(r); } S_28269:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("`",1),0)))||new_error){ if(qbevent){evnt(25426);if(r)goto S_28269;} do{ *_FUNC_EVALUATECONST_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("`",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25427);}while(r); S_28271:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_EVALUATECONST_LONG_X==((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len)))||new_error){ if(qbevent){evnt(25428);if(r)goto S_28271;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_add(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("1",1))); if(!qbevent)break;evnt(25428);}while(r); } do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=qbr(*__LONG_BITTYPE-*__LONG_ISPOINTER- 1 +func_val(qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len-*_FUNC_EVALUATECONST_LONG_X))); if(!qbevent)break;evnt(25429);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),i642string(qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),*_FUNC_EVALUATECONST_LONG_X- 1 ))))); if(!qbevent)break;evnt(25430);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25431);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(25432);}while(r); } S_28279:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("E",1),0)))||new_error){ if(qbevent){evnt(25436);if(r)goto S_28279;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),f2string(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))))); if(!qbevent)break;evnt(25437);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25438);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25439);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(25440);}while(r); } S_28285:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("D",1),0)))||new_error){ if(qbevent){evnt(25442);if(r)goto S_28285;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),f2string(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))))); if(!qbevent)break;evnt(25443);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25444);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25445);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(25446);}while(r); } S_28291:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("F",1),0)))||new_error){ if(qbevent){evnt(25448);if(r)goto S_28291;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),f2string(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))))); if(!qbevent)break;evnt(25449);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25450);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25451);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(25452);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.1",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25455);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25455);}while(r); LABEL_GOTCONSTBLKITYP:; if(qbevent){evnt(25457);r=0;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len-_FUNC_EVALUATECONST_STRING_E->len)); if(!qbevent)break;evnt(25458);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),i642string(qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])))))); if(!qbevent)break;evnt(25459);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25460);}while(r); LABEL_GOTCONSTBLKTYP:; if(qbevent){evnt(25461);r=0;} } S_28303:; if ((-(*_FUNC_EVALUATECONST_LONG_A== 34 ))||new_error){ if(qbevent){evnt(25465);if(r)goto S_28303;} do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25467);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(25468);}while(r); } } } } fornext_exit_3237:; do{ *_FUNC_EVALUATECONST_LONG_N2= 0 ; if(!qbevent)break;evnt(25476);}while(r); S_28311:; fornext_value3248= 1 ; fornext_finalvalue3248=*_FUNC_EVALUATECONST_LONG_N; fornext_step3248= 1 ; if (fornext_step3248<0) fornext_step_negative3248=1; else fornext_step_negative3248=0; if (new_error) goto fornext_error3248; goto fornext_entrylabel3248; while(1){ fornext_value3248=fornext_step3248+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3248: *_FUNC_EVALUATECONST_LONG_I=fornext_value3248; if (fornext_step_negative3248){ if (fornext_value3248fornext_finalvalue3248) break; } fornext_error3248:; if(qbevent){evnt(25477);if(r)goto S_28311;} S_28312:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25478);if(r)goto S_28312;} do{ *_FUNC_EVALUATECONST_LONG_N2=*_FUNC_EVALUATECONST_LONG_N2+ 1 ; if(!qbevent)break;evnt(25479);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_N2)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[tmp_long])),((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); if(!qbevent)break;evnt(25480);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_N2)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5]); if (!new_error) ((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[tmp_long]=((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5])]; if(!qbevent)break;evnt(25481);}while(r); do{ tmp_long=array_check((*_FUNC_EVALUATECONST_LONG_N2)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5]); if (!new_error) ((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[tmp_long]=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]; if(!qbevent)break;evnt(25482);}while(r); } } fornext_exit_3247:; do{ *_FUNC_EVALUATECONST_LONG_N=*_FUNC_EVALUATECONST_LONG_N2; if(!qbevent)break;evnt(25485);}while(r); S_28320:; if ((-(*_FUNC_EVALUATECONST_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25488);if(r)goto S_28320;} S_28321:; if ((-(((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5])]== 0 ))||new_error){ if(qbevent){evnt(25489);if(r)goto S_28321;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.2",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25489);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25489);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_T=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]; if(!qbevent)break;evnt(25490);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25491);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25492);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25498);}while(r); S_28330:; if ((-(((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5])]== 0 ))||new_error){ if(qbevent){evnt(25499);if(r)goto S_28330;} S_28331:; if ((-(*_FUNC_EVALUATECONST_LONG_N!= 2 ))||new_error){ if(qbevent){evnt(25500);if(r)goto S_28331;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.4",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25500);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25500);}while(r); } S_28335:; if ((-(((int16*)(_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[4],_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[5])]== 0 ))||new_error){ if(qbevent){evnt(25501);if(r)goto S_28335;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.5",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25501);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25501);}while(r); } S_28339:; if ((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25502);if(r)goto S_28339;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.6",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25502);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25502);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_O,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25503);}while(r); S_28344:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("\361",1))))||new_error){ if(qbevent){evnt(25505);if(r)goto S_28344;} S_28345:; if ((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25506);if(r)goto S_28345;} do{ *_FUNC_EVALUATECONST_FLOAT_R=-(string2f(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25507);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,f2string(*_FUNC_EVALUATECONST_FLOAT_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25508);}while(r); }else{ do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(string2i64(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25510);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25511);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_T=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]; if(!qbevent)break;evnt(25513);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25514);}while(r); } S_28355:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(25517);if(r)goto S_28355;} S_28356:; if ((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25518);if(r)goto S_28356;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(string2f(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25519);}while(r); }else{ do{ *_FUNC_EVALUATECONST_INTEGER64_R=string2i64(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25521);}while(r); } do{ *_FUNC_EVALUATECONST_INTEGER64_R=~(*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25523);}while(r); do{ *_FUNC_EVALUATECONST_LONG_T=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check(( 2 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]; if(!qbevent)break;evnt(25524);}while(r); S_28363:; if ((*_FUNC_EVALUATECONST_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25525);if(r)goto S_28363;} do{ *_FUNC_EVALUATECONST_LONG_T=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25525);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25526);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25527);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.7",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25530);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25530);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_ET=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]; if(!qbevent)break;evnt(25536);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check(( 1 )-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25537);}while(r); do{ *_FUNC_EVALUATECONST_LONG_I= 2 ; if(!qbevent)break;evnt(25539);}while(r); LABEL_EVALCONSTEQU:; if(qbevent){evnt(25541);r=0;} S_28375:; if ((-(*_FUNC_EVALUATECONST_LONG_I>=*_FUNC_EVALUATECONST_LONG_N))||new_error){ if(qbevent){evnt(25544);if(r)goto S_28375;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.8",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25544);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25544);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_O,((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25545);}while(r); do{ *_FUNC_EVALUATECONST_LONG_I=*_FUNC_EVALUATECONST_LONG_I+ 1 ; if(!qbevent)break;evnt(25546);}while(r); S_28381:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_EVALUATECONST_STRING_O)== 0 )))||new_error){ if(qbevent){evnt(25547);if(r)goto S_28381;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.9",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25547);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25547);}while(r); } S_28385:; if ((-(*_FUNC_EVALUATECONST_LONG_I>*_FUNC_EVALUATECONST_LONG_N))||new_error){ if(qbevent){evnt(25548);if(r)goto S_28385;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.10",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25548);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25548);}while(r); } S_28389:; if ((-((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISSTRING)!=(*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(25551);if(r)goto S_28389;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.11",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25551);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25551);}while(r); } S_28393:; if ((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25553);if(r)goto S_28393;} S_28394:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(25554);if(r)goto S_28394;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.12",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25554);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25554);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_S1,qbs_right(_FUNC_EVALUATECONST_STRING_EV,_FUNC_EVALUATECONST_STRING_EV->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25556);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_S1,qbs_left(_FUNC_EVALUATECONST_STRING_S1,func_instr(NULL,_FUNC_EVALUATECONST_STRING_S1,func_chr( 34 ),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25557);}while(r); do{ *_FUNC_EVALUATECONST_LONG_S1SIZE=qbr(func_val(qbs_right(_FUNC_EVALUATECONST_STRING_EV,_FUNC_EVALUATECONST_STRING_EV->len-_FUNC_EVALUATECONST_STRING_S1->len- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25558);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_S2,qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25559);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_S2,qbs_left(_FUNC_EVALUATECONST_STRING_S2,func_instr(NULL,_FUNC_EVALUATECONST_STRING_S2,func_chr( 34 ),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25560);}while(r); do{ *_FUNC_EVALUATECONST_LONG_S2SIZE=qbr(func_val(qbs_right(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])])),((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))->len-_FUNC_EVALUATECONST_STRING_S2->len- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25561);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 34 ),_FUNC_EVALUATECONST_STRING_S1),_FUNC_EVALUATECONST_STRING_S2),func_chr( 34 )),qbs_new_txt_len(",",1)),FUNC_STR2(&(pass3255=*_FUNC_EVALUATECONST_LONG_S1SIZE+*_FUNC_EVALUATECONST_LONG_S2SIZE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25562);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(25563);}while(r); } S_28407:; if ((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25567);if(r)goto S_28407;} do{ *_FUNC_EVALUATECONST_LONG_LINTEGER= 0 ; if(!qbevent)break;evnt(25568);}while(r); do{ *_FUNC_EVALUATECONST_FLOAT_L=string2f(_FUNC_EVALUATECONST_STRING_EV); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25569);}while(r); do{ *_FUNC_EVALUATECONST_INTEGER64_L=qbr(*_FUNC_EVALUATECONST_FLOAT_L); if(!qbevent)break;evnt(25570);}while(r); }else{ do{ *_FUNC_EVALUATECONST_LONG_LINTEGER= 1 ; if(!qbevent)break;evnt(25572);}while(r); do{ *_FUNC_EVALUATECONST_INTEGER64_L=string2i64(_FUNC_EVALUATECONST_STRING_EV); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25573);}while(r); do{ *_FUNC_EVALUATECONST_FLOAT_L=*_FUNC_EVALUATECONST_INTEGER64_L; if(!qbevent)break;evnt(25574);}while(r); } S_28416:; if ((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25576);if(r)goto S_28416;} do{ *_FUNC_EVALUATECONST_LONG_RINTEGER= 0 ; if(!qbevent)break;evnt(25577);}while(r); do{ *_FUNC_EVALUATECONST_FLOAT_R=string2f(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25578);}while(r); do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25579);}while(r); }else{ do{ *_FUNC_EVALUATECONST_LONG_RINTEGER= 1 ; if(!qbevent)break;evnt(25581);}while(r); do{ *_FUNC_EVALUATECONST_INTEGER64_R=string2i64(((qbs*)(((uint64*)(_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[4],_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25582);}while(r); do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25583);}while(r); } S_28425:; if (((-(*_FUNC_EVALUATECONST_LONG_LINTEGER== 1 ))&(-(*_FUNC_EVALUATECONST_LONG_RINTEGER== 1 )))||new_error){ if(qbevent){evnt(25586);if(r)goto S_28425;} S_28426:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(25587);if(r)goto S_28426;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L+*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25587);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25587);}while(r); } S_28430:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(25588);if(r)goto S_28430;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L-*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25588);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25588);}while(r); } S_28434:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(25589);if(r)goto S_28434;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L**_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25589);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25589);}while(r); } S_28438:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(25590);if(r)goto S_28438;} do{ *_FUNC_EVALUATECONST_FLOAT_R=pow2(*_FUNC_EVALUATECONST_INTEGER64_L,*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25590);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(25590);}while(r); } S_28442:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(25591);if(r)goto S_28442;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_INTEGER64_L/ ((long double)(*_FUNC_EVALUATECONST_INTEGER64_R)); if(!qbevent)break;evnt(25591);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(25591);}while(r); } S_28446:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(25592);if(r)goto S_28446;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L/ *_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25592);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25592);}while(r); } S_28450:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(25593);if(r)goto S_28450;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L%*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25593);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25593);}while(r); } S_28454:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(25594);if(r)goto S_28454;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L==*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25594);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25594);}while(r); } S_28458:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(25595);if(r)goto S_28458;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L>*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25595);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25595);}while(r); } S_28462:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(25596);if(r)goto S_28462;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L<*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25596);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25596);}while(r); } S_28466:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(25597);if(r)goto S_28466;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L>=*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25597);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25597);}while(r); } S_28470:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(25598);if(r)goto S_28470;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L<=*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25598);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25598);}while(r); } S_28474:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(25599);if(r)goto S_28474;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L!=*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(25599);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25599);}while(r); } S_28478:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(25600);if(r)goto S_28478;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~*_FUNC_EVALUATECONST_INTEGER64_L|*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25600);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25600);}while(r); } S_28482:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(25601);if(r)goto S_28482;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~*_FUNC_EVALUATECONST_INTEGER64_L^*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25601);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25601);}while(r); } S_28486:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(25602);if(r)goto S_28486;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L^*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25602);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25602);}while(r); } S_28490:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(25603);if(r)goto S_28490;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L|*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25603);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25603);}while(r); } S_28494:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(25604);if(r)goto S_28494;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L&*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(25604);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(25604);}while(r); } } S_28499:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(25607);if(r)goto S_28499;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L+*_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(25607);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(25607);}while(r); } S_28503:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(25608);if(r)goto S_28503;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L-*_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(25608);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(25608);}while(r); } S_28507:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(25609);if(r)goto S_28507;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L**_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(25609);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(25609);}while(r); } S_28511:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(25610);if(r)goto S_28511;} do{ *_FUNC_EVALUATECONST_FLOAT_R=pow2(*_FUNC_EVALUATECONST_FLOAT_L,*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25610);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(25610);}while(r); } S_28515:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(25611);if(r)goto S_28515;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L/ *_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(25611);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(25611);}while(r); } S_28519:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(25612);if(r)goto S_28519;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)/ qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25612);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(25612);}while(r); } S_28523:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(25613);if(r)goto S_28523;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)%qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25613);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(25613);}while(r); } S_28527:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(25614);if(r)goto S_28527;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L==*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25614);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25614);}while(r); } S_28531:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(25615);if(r)goto S_28531;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L>*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25615);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25615);}while(r); } S_28535:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(25616);if(r)goto S_28535;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L<*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25616);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25616);}while(r); } S_28539:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(25617);if(r)goto S_28539;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L>=*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25617);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25617);}while(r); } S_28543:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(25618);if(r)goto S_28543;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L<=*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25618);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25618);}while(r); } S_28547:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(25619);if(r)goto S_28547;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L!=*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25619);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(25619);}while(r); } S_28551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(25620);if(r)goto S_28551;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~qbr(*_FUNC_EVALUATECONST_FLOAT_L)|qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25620);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(25620);}while(r); } S_28555:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(25621);if(r)goto S_28555;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~qbr(*_FUNC_EVALUATECONST_FLOAT_L)^qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25621);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(25621);}while(r); } S_28559:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(25622);if(r)goto S_28559;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)^qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25622);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(25622);}while(r); } S_28563:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(25623);if(r)goto S_28563;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)|qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25623);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(25623);}while(r); } S_28567:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(25624);if(r)goto S_28567;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)&qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(25624);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(25624);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.13",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25626);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25626);}while(r); LABEL_ECONSTMARKUPI16:; if(qbevent){evnt(25628);r=0;} do{ *_FUNC_EVALUATECONST_LONG_ET=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25629);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25630);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(25631);}while(r); LABEL_ECONSTMARKUPI32:; if(qbevent){evnt(25633);r=0;} do{ *_FUNC_EVALUATECONST_LONG_ET=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25634);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25635);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(25636);}while(r); LABEL_ECONSTMARKUPI:; if(qbevent){evnt(25638);r=0;} S_28579:; if ((-(*_FUNC_EVALUATECONST_LONG_ET!=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]))||new_error){ if(qbevent){evnt(25639);if(r)goto S_28579;} do{ *_FUNC_EVALUATECONST_LONG_U= 0 ; if(!qbevent)break;evnt(25641);}while(r); S_28581:; if (((-((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISUNSIGNED)!= 0 ))&(-((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISUNSIGNED)!= 0 )))||new_error){ if(qbevent){evnt(25641);if(r)goto S_28581;} do{ *_FUNC_EVALUATECONST_LONG_U= 1 ; if(!qbevent)break;evnt(25641);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_LB=*_FUNC_EVALUATECONST_LONG_ET& 511 ; if(!qbevent)break;evnt(25642);}while(r); do{ *_FUNC_EVALUATECONST_LONG_RB=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]& 511 ; if(!qbevent)break;evnt(25642);}while(r); do{ *_FUNC_EVALUATECONST_LONG_OB= 0 ; if(!qbevent)break;evnt(25643);}while(r); S_28587:; if ((-(*_FUNC_EVALUATECONST_LONG_LB==*_FUNC_EVALUATECONST_LONG_RB))||new_error){ if(qbevent){evnt(25644);if(r)goto S_28587;} S_28588:; if (((-((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISOFFSETINBITS)!= 0 ))&(-((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISOFFSETINBITS)!= 0 )))||new_error){ if(qbevent){evnt(25645);if(r)goto S_28588;} do{ *_FUNC_EVALUATECONST_LONG_OB= 1 ; if(!qbevent)break;evnt(25645);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_LB; if(!qbevent)break;evnt(25646);}while(r); } S_28593:; if ((-(*_FUNC_EVALUATECONST_LONG_LB>*_FUNC_EVALUATECONST_LONG_RB))||new_error){ if(qbevent){evnt(25648);if(r)goto S_28593;} S_28594:; if ((-((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISOFFSETINBITS)!= 0 ))||new_error){ if(qbevent){evnt(25649);if(r)goto S_28594;} do{ *_FUNC_EVALUATECONST_LONG_OB= 1 ; if(!qbevent)break;evnt(25649);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_LB; if(!qbevent)break;evnt(25650);}while(r); } S_28599:; if ((-(*_FUNC_EVALUATECONST_LONG_LB<*_FUNC_EVALUATECONST_LONG_RB))||new_error){ if(qbevent){evnt(25652);if(r)goto S_28599;} S_28600:; if ((-((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISOFFSETINBITS)!= 0 ))||new_error){ if(qbevent){evnt(25653);if(r)goto S_28600;} do{ *_FUNC_EVALUATECONST_LONG_OB= 1 ; if(!qbevent)break;evnt(25653);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_RB; if(!qbevent)break;evnt(25654);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_ET=*_FUNC_EVALUATECONST_LONG_B; if(!qbevent)break;evnt(25656);}while(r); S_28606:; if ((*_FUNC_EVALUATECONST_LONG_OB)||new_error){ if(qbevent){evnt(25657);if(r)goto S_28606;} do{ *_FUNC_EVALUATECONST_LONG_ET=*_FUNC_EVALUATECONST_LONG_ET+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(25657);}while(r); } S_28609:; if ((*_FUNC_EVALUATECONST_LONG_U)||new_error){ if(qbevent){evnt(25658);if(r)goto S_28609;} do{ *_FUNC_EVALUATECONST_LONG_ET=*_FUNC_EVALUATECONST_LONG_ET+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(25658);}while(r); } } do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25660);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(25661);}while(r); LABEL_ECONSTMARKUPF:; if(qbevent){evnt(25663);r=0;} do{ *_FUNC_EVALUATECONST_LONG_LFB= 0 ; if(!qbevent)break;evnt(25664);}while(r); do{ *_FUNC_EVALUATECONST_LONG_RFB= 0 ; if(!qbevent)break;evnt(25664);}while(r); do{ *_FUNC_EVALUATECONST_LONG_LIB= 0 ; if(!qbevent)break;evnt(25665);}while(r); do{ *_FUNC_EVALUATECONST_LONG_RIB= 0 ; if(!qbevent)break;evnt(25665);}while(r); S_28619:; if ((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25666);if(r)goto S_28619;} do{ *_FUNC_EVALUATECONST_LONG_LFB=*_FUNC_EVALUATECONST_LONG_ET& 511 ; if(!qbevent)break;evnt(25666);}while(r); }else{ do{ *_FUNC_EVALUATECONST_LONG_LIB=*_FUNC_EVALUATECONST_LONG_ET& 511 ; if(!qbevent)break;evnt(25666);}while(r); } S_28624:; if ((((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25667);if(r)goto S_28624;} do{ *_FUNC_EVALUATECONST_LONG_RFB=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]& 511 ; if(!qbevent)break;evnt(25667);}while(r); }else{ do{ *_FUNC_EVALUATECONST_LONG_RIB=((int32*)(_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[0]))[array_check((*_FUNC_EVALUATECONST_LONG_I)-_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[4],_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[5])]& 511 ; if(!qbevent)break;evnt(25667);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_F= 32 ; if(!qbevent)break;evnt(25668);}while(r); S_28630:; if (((-(*_FUNC_EVALUATECONST_LONG_LIB> 16 ))|(-(*_FUNC_EVALUATECONST_LONG_RIB> 16 )))||new_error){ if(qbevent){evnt(25669);if(r)goto S_28630;} do{ *_FUNC_EVALUATECONST_LONG_F= 64 ; if(!qbevent)break;evnt(25669);}while(r); } S_28633:; if (((-(*_FUNC_EVALUATECONST_LONG_LFB> 32 ))|(-(*_FUNC_EVALUATECONST_LONG_RFB> 32 )))||new_error){ if(qbevent){evnt(25670);if(r)goto S_28633;} do{ *_FUNC_EVALUATECONST_LONG_F= 64 ; if(!qbevent)break;evnt(25670);}while(r); } S_28636:; if (((-(*_FUNC_EVALUATECONST_LONG_LIB> 32 ))|(-(*_FUNC_EVALUATECONST_LONG_RIB> 32 )))||new_error){ if(qbevent){evnt(25671);if(r)goto S_28636;} do{ *_FUNC_EVALUATECONST_LONG_F= 256 ; if(!qbevent)break;evnt(25671);}while(r); } S_28639:; if (((-(*_FUNC_EVALUATECONST_LONG_LFB> 64 ))|(-(*_FUNC_EVALUATECONST_LONG_RFB> 64 )))||new_error){ if(qbevent){evnt(25672);if(r)goto S_28639;} do{ *_FUNC_EVALUATECONST_LONG_F= 256 ; if(!qbevent)break;evnt(25672);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_ET=*__LONG_ISFLOAT+*_FUNC_EVALUATECONST_LONG_F; if(!qbevent)break;evnt(25673);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,f2string(*_FUNC_EVALUATECONST_FLOAT_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25674);}while(r); LABEL_ECONSTMARKEDUP:; if(qbevent){evnt(25676);r=0;} do{ *_FUNC_EVALUATECONST_LONG_I=*_FUNC_EVALUATECONST_LONG_I+ 1 ; if(!qbevent)break;evnt(25678);}while(r); S_28645:; if ((-(*_FUNC_EVALUATECONST_LONG_I<=*_FUNC_EVALUATECONST_LONG_N))||new_error){ if(qbevent){evnt(25680);if(r)goto S_28645;} do{ goto LABEL_EVALCONSTEQU; if(!qbevent)break;evnt(25680);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_T=*_FUNC_EVALUATECONST_LONG_ET; if(!qbevent)break;evnt(25682);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,_FUNC_EVALUATECONST_STRING_EV); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25683);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free74.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_EVALUATECONST_STRING_EVALUATECONST);return _FUNC_EVALUATECONST_STRING_EVALUATECONST; } qbs* FUNC_TYPEVALUE2SYMBOL(int32*_FUNC_TYPEVALUE2SYMBOL_LONG_T){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data75.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_28650:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25689);if(r)goto S_28650;} S_28651:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(25690);if(r)goto S_28651;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert expression type to symbol",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25690);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25690);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25691);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25692);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25695);}while(r); S_28659:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(25697);if(r)goto S_28659;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("~",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25697);}while(r); } do{ *_FUNC_TYPEVALUE2SYMBOL_LONG_B=*_FUNC_TYPEVALUE2SYMBOL_LONG_T& 511 ; if(!qbevent)break;evnt(25699);}while(r); S_28663:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(25701);if(r)goto S_28663;} S_28664:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B> 1 ))||new_error){ if(qbevent){evnt(25702);if(r)goto S_28664;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_add(qbs_add(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("`",1)),FUNC_STR2(_FUNC_TYPEVALUE2SYMBOL_LONG_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25702);}while(r); }else{ do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_add(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("`",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25702);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,_FUNC_TYPEVALUE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25703);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25704);}while(r); } S_28672:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25707);if(r)goto S_28672;} S_28673:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 32 ))||new_error){ if(qbevent){evnt(25708);if(r)goto S_28673;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25708);}while(r); } S_28676:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 64 ))||new_error){ if(qbevent){evnt(25709);if(r)goto S_28676;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25709);}while(r); } S_28679:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 256 ))||new_error){ if(qbevent){evnt(25710);if(r)goto S_28679;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25710);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,_FUNC_TYPEVALUE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25711);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25712);}while(r); } S_28685:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 8 ))||new_error){ if(qbevent){evnt(25715);if(r)goto S_28685;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_add(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("%%",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25715);}while(r); } S_28688:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 16 ))||new_error){ if(qbevent){evnt(25716);if(r)goto S_28688;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_add(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("%",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25716);}while(r); } S_28691:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 32 ))||new_error){ if(qbevent){evnt(25717);if(r)goto S_28691;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_add(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("&",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25717);}while(r); } S_28694:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 64 ))||new_error){ if(qbevent){evnt(25718);if(r)goto S_28694;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_add(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("&&",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25718);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,_FUNC_TYPEVALUE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25719);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free75.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL);return _FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL; } qbs* FUNC_ID2FULLTYPENAME(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data76.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_ID2FULLTYPENAME_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(25725);}while(r); S_28699:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_T== 0 ))||new_error){ if(qbevent){evnt(25726);if(r)goto S_28699;} do{ *_FUNC_ID2FULLTYPENAME_LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(25726);}while(r); } do{ *_FUNC_ID2FULLTYPENAME_LONG_SIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(25727);}while(r); do{ *_FUNC_ID2FULLTYPENAME_LONG_BITS=*_FUNC_ID2FULLTYPENAME_LONG_T& 511 ; if(!qbevent)break;evnt(25728);}while(r); S_28704:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(25729);if(r)goto S_28704;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*_FUNC_ID2FULLTYPENAME_LONG_T& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25730);}while(r); do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25731);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25731);}while(r); } S_28709:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25733);if(r)goto S_28709;} S_28710:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(25734);if(r)goto S_28710;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_new_txt_len("STRING * ",9),FUNC_STR2(_FUNC_ID2FULLTYPENAME_LONG_SIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25734);}while(r); }else{ do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25734);}while(r); } do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25735);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25735);}while(r); } S_28718:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(25737);if(r)goto S_28718;} S_28719:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS> 1 ))||new_error){ if(qbevent){evnt(25738);if(r)goto S_28719;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_new_txt_len("_BIT * ",7),FUNC_STR2(_FUNC_ID2FULLTYPENAME_LONG_BITS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25738);}while(r); }else{ do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25738);}while(r); } S_28724:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(25739);if(r)goto S_28724;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_new_txt_len("_UNSIGNED ",10),_FUNC_ID2FULLTYPENAME_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25739);}while(r); } do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25740);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25740);}while(r); } S_28730:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(25742);if(r)goto S_28730;} S_28731:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(25743);if(r)goto S_28731;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743);}while(r); } S_28734:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(25744);if(r)goto S_28734;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744);}while(r); } S_28737:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 256 ))||new_error){ if(qbevent){evnt(25745);if(r)goto S_28737;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("_FLOAT",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25745);}while(r); } }else{ S_28741:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(25747);if(r)goto S_28741;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("_BYTE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747);}while(r); } S_28744:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(25748);if(r)goto S_28744;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("INTEGER",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748);}while(r); } S_28747:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(25749);if(r)goto S_28747;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25749);}while(r); } S_28750:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(25750);if(r)goto S_28750;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("_INTEGER64",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25750);}while(r); } S_28753:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(25751);if(r)goto S_28753;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_new_txt_len("_UNSIGNED ",10),_FUNC_ID2FULLTYPENAME_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25751);}while(r); } } do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free76.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME);return _FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME; } qbs* FUNC_SYMBOL2FULLTYPENAME(qbs*_FUNC_SYMBOL2FULLTYPENAME_STRING_S2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data77.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,_FUNC_SYMBOL2FULLTYPENAME_STRING_S2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25758);}while(r); S_28759:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_SYMBOL2FULLTYPENAME_STRING_S, 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(25760);if(r)goto S_28759;} do{ *_FUNC_SYMBOL2FULLTYPENAME_LONG_U= 1 ; if(!qbevent)break;evnt(25761);}while(r); S_28761:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_SYMBOL2FULLTYPENAME_STRING_TYP->len== 1 )))||new_error){ if(qbevent){evnt(25762);if(r)goto S_28761;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ~...",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25762);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25762);}while(r); } do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_right(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,_FUNC_SYMBOL2FULLTYPENAME_STRING_S->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25763);}while(r); do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("_UNSIGNED ",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25764);}while(r); } S_28768:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(25767);if(r)goto S_28768;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("_BYTE",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25767);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25767);}while(r); } S_28772:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(25768);if(r)goto S_28772;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("INTEGER",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25768);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25768);}while(r); } S_28776:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(25769);if(r)goto S_28776;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("LONG",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25769);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25769);}while(r); } S_28780:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(25770);if(r)goto S_28780;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("_INTEGER64",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25770);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25770);}while(r); } S_28784:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(25771);if(r)goto S_28784;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("_OFFSET",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25771);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25771);}while(r); } S_28788:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_SYMBOL2FULLTYPENAME_STRING_S, 1 ),qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(25773);if(r)goto S_28788;} S_28789:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_SYMBOL2FULLTYPENAME_STRING_S->len== 1 )))||new_error){ if(qbevent){evnt(25774);if(r)goto S_28789;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("_BIT * 1",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25775);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25776);}while(r); } do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_N,qbs_right(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,_FUNC_SYMBOL2FULLTYPENAME_STRING_S->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25778);}while(r); S_28794:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_SYMBOL2FULLTYPENAME_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(25779);if(r)goto S_28794;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected number after symbol `",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25779);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25779);}while(r); } do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_new_txt_len("_BIT * ",7)),_FUNC_SYMBOL2FULLTYPENAME_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25780);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25781);}while(r); } S_28801:; if ((-(*_FUNC_SYMBOL2FULLTYPENAME_LONG_U== 1 ))||new_error){ if(qbevent){evnt(25784);if(r)goto S_28801;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected type symbol after ~",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25784);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25784);}while(r); } S_28805:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(25786);if(r)goto S_28805;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25786);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25786);}while(r); } S_28809:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(25787);if(r)goto S_28809;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25787);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25787);}while(r); } S_28813:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(25788);if(r)goto S_28813;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len("_FLOAT",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25788);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25788);}while(r); } S_28817:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(25789);if(r)goto S_28817;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25789);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25789);}while(r); } S_28821:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_SYMBOL2FULLTYPENAME_STRING_S, 1 ),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(25791);if(r)goto S_28821;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_N,qbs_right(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,_FUNC_SYMBOL2FULLTYPENAME_STRING_S->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25792);}while(r); S_28823:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_SYMBOL2FULLTYPENAME_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(25793);if(r)goto S_28823;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected number after symbol $",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25793);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25793);}while(r); } do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(qbs_new_txt_len("STRING * ",9),_FUNC_SYMBOL2FULLTYPENAME_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25794);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(25795);}while(r); } do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,_FUNC_SYMBOL2FULLTYPENAME_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25798);}while(r); LABEL_GOTSYM2TYP:; if(qbevent){evnt(25800);r=0;} S_28831:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(qbs_add(qbs_new_txt_len(" ",1),_FUNC_SYMBOL2FULLTYPENAME_STRING_T), 5 ),qbs_new_txt_len(" _BIT",5))))||new_error){ if(qbevent){evnt(25802);if(r)goto S_28831;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len(" * 1",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25802);}while(r); } S_28834:; fornext_value3263= 1 ; fornext_finalvalue3263=_FUNC_SYMBOL2FULLTYPENAME_STRING_T->len; fornext_step3263= 1 ; if (fornext_step3263<0) fornext_step_negative3263=1; else fornext_step_negative3263=0; if (new_error) goto fornext_error3263; goto fornext_entrylabel3263; while(1){ fornext_value3263=fornext_step3263+(*_FUNC_SYMBOL2FULLTYPENAME_LONG_I); fornext_entrylabel3263: *_FUNC_SYMBOL2FULLTYPENAME_LONG_I=fornext_value3263; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3263){ if (fornext_value3263fornext_finalvalue3263) break; } fornext_error3263:; if(qbevent){evnt(25804);if(r)goto S_28834;} S_28835:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,*_FUNC_SYMBOL2FULLTYPENAME_LONG_I)==qbs_asc(__STRING1_SP))))||new_error){ if(qbevent){evnt(25805);if(r)goto S_28835;} do{ tqbs=_FUNC_SYMBOL2FULLTYPENAME_STRING_T; if (!new_error){ tmp_fileno=*_FUNC_SYMBOL2FULLTYPENAME_LONG_I; if (!new_error){ tmp_long= 32 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(25805);}while(r); } } fornext_exit_3262:; do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_SYMBOL2FULLTYPENAME,_FUNC_SYMBOL2FULLTYPENAME_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25808);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free77.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_SYMBOL2FULLTYPENAME_STRING_SYMBOL2FULLTYPENAME);return _FUNC_SYMBOL2FULLTYPENAME_STRING_SYMBOL2FULLTYPENAME; } void SUB_LINEINPUT3LOAD(qbs*_SUB_LINEINPUT3LOAD_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data78.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_open(_SUB_LINEINPUT3LOAD_STRING_F, 2 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25813);}while(r); do{ *_SUB_LINEINPUT3LOAD_LONG_L=func_lof( 1 ); if(!qbevent)break;evnt(25814);}while(r); do{ qbs_set(__STRING_LINEINPUT3BUFFER,func_space(*_SUB_LINEINPUT3LOAD_LONG_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25815);}while(r); do{ sub_get2( 1 ,NULL,__STRING_LINEINPUT3BUFFER,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25816);}while(r); S_28844:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LINEINPUT3BUFFER->len))||new_error){ if(qbevent){evnt(25817);if(r)goto S_28844;} S_28845:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_LINEINPUT3BUFFER, 1 ),func_chr( 26 ))))||new_error){ if(qbevent){evnt(25817);if(r)goto S_28845;} do{ qbs_set(__STRING_LINEINPUT3BUFFER,qbs_left(__STRING_LINEINPUT3BUFFER,__STRING_LINEINPUT3BUFFER->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25817);}while(r); } } do{ sub_close( 1 ,1); if(!qbevent)break;evnt(25818);}while(r); do{ *__LONG_LINEINPUT3INDEX= 1 ; if(!qbevent)break;evnt(25819);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free78.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_LINEINPUT3(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data79.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_LINEINPUT3_LONG_L=__STRING_LINEINPUT3BUFFER->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25824);}while(r); S_28852:; if ((-(*__LONG_LINEINPUT3INDEX>*_FUNC_LINEINPUT3_LONG_L))||new_error){ if(qbevent){evnt(25825);if(r)goto S_28852;} do{ qbs_set(_FUNC_LINEINPUT3_STRING_LINEINPUT3,func_chr( 13 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25825);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25825);}while(r); } do{ *_FUNC_LINEINPUT3_LONG_C13=func_instr(*__LONG_LINEINPUT3INDEX,__STRING_LINEINPUT3BUFFER,func_chr( 13 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25826);}while(r); do{ *_FUNC_LINEINPUT3_LONG_C10=func_instr(*__LONG_LINEINPUT3INDEX,__STRING_LINEINPUT3BUFFER,func_chr( 10 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25827);}while(r); S_28858:; if (((-(*_FUNC_LINEINPUT3_LONG_C10== 0 ))&(-(*_FUNC_LINEINPUT3_LONG_C13== 0 )))||new_error){ if(qbevent){evnt(25828);if(r)goto S_28858;} do{ qbs_set(_FUNC_LINEINPUT3_STRING_LINEINPUT3,func_mid(__STRING_LINEINPUT3BUFFER,*__LONG_LINEINPUT3INDEX,*_FUNC_LINEINPUT3_LONG_L-*__LONG_LINEINPUT3INDEX+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25829);}while(r); do{ *__LONG_LINEINPUT3INDEX=*_FUNC_LINEINPUT3_LONG_L+ 1 ; if(!qbevent)break;evnt(25830);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25831);}while(r); } S_28863:; if ((-(*_FUNC_LINEINPUT3_LONG_C10== 0 ))||new_error){ if(qbevent){evnt(25833);if(r)goto S_28863;} do{ *_FUNC_LINEINPUT3_LONG_C10= 2147483647 ; if(!qbevent)break;evnt(25833);}while(r); } S_28866:; if ((-(*_FUNC_LINEINPUT3_LONG_C13== 0 ))||new_error){ if(qbevent){evnt(25834);if(r)goto S_28866;} do{ *_FUNC_LINEINPUT3_LONG_C13= 2147483647 ; if(!qbevent)break;evnt(25834);}while(r); } S_28869:; if ((-(*_FUNC_LINEINPUT3_LONG_C10<*_FUNC_LINEINPUT3_LONG_C13))||new_error){ if(qbevent){evnt(25835);if(r)goto S_28869;} do{ qbs_set(_FUNC_LINEINPUT3_STRING_LINEINPUT3,func_mid(__STRING_LINEINPUT3BUFFER,*__LONG_LINEINPUT3INDEX,*_FUNC_LINEINPUT3_LONG_C10-*__LONG_LINEINPUT3INDEX,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25837);}while(r); do{ *__LONG_LINEINPUT3INDEX=*_FUNC_LINEINPUT3_LONG_C10+ 1 ; if(!qbevent)break;evnt(25838);}while(r); S_28872:; if ((-(*__LONG_LINEINPUT3INDEX<=*_FUNC_LINEINPUT3_LONG_L))||new_error){ if(qbevent){evnt(25839);if(r)goto S_28872;} S_28873:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(func_mid(__STRING_LINEINPUT3BUFFER,*__LONG_LINEINPUT3INDEX, 1 ,1))== 13 )))||new_error){ if(qbevent){evnt(25840);if(r)goto S_28873;} do{ *__LONG_LINEINPUT3INDEX=*__LONG_LINEINPUT3INDEX+ 1 ; if(!qbevent)break;evnt(25840);}while(r); } } }else{ do{ qbs_set(_FUNC_LINEINPUT3_STRING_LINEINPUT3,func_mid(__STRING_LINEINPUT3BUFFER,*__LONG_LINEINPUT3INDEX,*_FUNC_LINEINPUT3_LONG_C13-*__LONG_LINEINPUT3INDEX,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25844);}while(r); do{ *__LONG_LINEINPUT3INDEX=*_FUNC_LINEINPUT3_LONG_C13+ 1 ; if(!qbevent)break;evnt(25845);}while(r); S_28880:; if ((-(*__LONG_LINEINPUT3INDEX<=*_FUNC_LINEINPUT3_LONG_L))||new_error){ if(qbevent){evnt(25846);if(r)goto S_28880;} S_28881:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(func_mid(__STRING_LINEINPUT3BUFFER,*__LONG_LINEINPUT3INDEX, 1 ,1))== 10 )))||new_error){ if(qbevent){evnt(25847);if(r)goto S_28881;} do{ *__LONG_LINEINPUT3INDEX=*__LONG_LINEINPUT3INDEX+ 1 ; if(!qbevent)break;evnt(25847);}while(r); } } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free79.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_LINEINPUT3_STRING_LINEINPUT3);return _FUNC_LINEINPUT3_STRING_LINEINPUT3; } qbs* FUNC_GETFILEPATH(qbs*_FUNC_GETFILEPATH_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data80.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_28886:; fornext_value3271=_FUNC_GETFILEPATH_STRING_F->len; fornext_finalvalue3271= 1 ; fornext_step3271= -1 ; if (fornext_step3271<0) fornext_step_negative3271=1; else fornext_step_negative3271=0; if (new_error) goto fornext_error3271; goto fornext_entrylabel3271; while(1){ fornext_value3271=fornext_step3271+(*_FUNC_GETFILEPATH_LONG_I); fornext_entrylabel3271: *_FUNC_GETFILEPATH_LONG_I=fornext_value3271; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3271){ if (fornext_value3271fornext_finalvalue3271) break; } fornext_error3271:; if(qbevent){evnt(25853);if(r)goto S_28886;} do{ qbs_set(_FUNC_GETFILEPATH_STRING_A,func_mid(_FUNC_GETFILEPATH_STRING_F,*_FUNC_GETFILEPATH_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25854);}while(r); S_28888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETFILEPATH_STRING_A,__STRING1_PATHSEP)))||new_error){ if(qbevent){evnt(25855);if(r)goto S_28888;} do{ qbs_set(_FUNC_GETFILEPATH_STRING_GETFILEPATH,qbs_left(_FUNC_GETFILEPATH_STRING_F,*_FUNC_GETFILEPATH_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25856);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25857);}while(r); } } fornext_exit_3270:; do{ qbs_set(_FUNC_GETFILEPATH_STRING_GETFILEPATH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25860);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free80.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_GETFILEPATH_STRING_GETFILEPATH);return _FUNC_GETFILEPATH_STRING_GETFILEPATH; } qbs* FUNC_ELEUCASE(qbs*_FUNC_ELEUCASE_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data81.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_28894:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ELEUCASE_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(25866);if(r)goto S_28894;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25866);}while(r); } do{ *_FUNC_ELEUCASE_LONG_I= 1 ; if(!qbevent)break;evnt(25867);}while(r); S_28898:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_ELEUCASE_STRING_A)== 34 )))||new_error){ if(qbevent){evnt(25868);if(r)goto S_28898;} do{ *_FUNC_ELEUCASE_LONG_I2=func_instr(NULL,_FUNC_ELEUCASE_STRING_A,__STRING1_SP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25869);}while(r); S_28900:; if ((-(*_FUNC_ELEUCASE_LONG_I2== 0 ))||new_error){ if(qbevent){evnt(25870);if(r)goto S_28900;} do{ qbs_set(_FUNC_ELEUCASE_STRING_ELEUCASE,_FUNC_ELEUCASE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25870);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25870);}while(r); } do{ qbs_set(_FUNC_ELEUCASE_STRING_A2,qbs_left(_FUNC_ELEUCASE_STRING_A,*_FUNC_ELEUCASE_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25871);}while(r); do{ *_FUNC_ELEUCASE_LONG_I=*_FUNC_ELEUCASE_LONG_I2; if(!qbevent)break;evnt(25872);}while(r); } do{ qbs_set(_FUNC_ELEUCASE_STRING_SP34,qbs_add(__STRING1_SP,func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25875);}while(r); S_28908:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_ELEUCASE_LONG_I<_FUNC_ELEUCASE_STRING_A->len)))||new_error){ if(qbevent){evnt(25876);if(r)goto S_28908;} S_28909:; while((qbs_cleanup(qbs_tmp_base,func_instr(*_FUNC_ELEUCASE_LONG_I,_FUNC_ELEUCASE_STRING_A,_FUNC_ELEUCASE_STRING_SP34,1)))||new_error){ if(qbevent){evnt(25877);if(r)goto S_28909;} do{ *_FUNC_ELEUCASE_LONG_I2=func_instr(*_FUNC_ELEUCASE_LONG_I,_FUNC_ELEUCASE_STRING_A,_FUNC_ELEUCASE_STRING_SP34,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25878);}while(r); do{ qbs_set(_FUNC_ELEUCASE_STRING_A2,qbs_add(_FUNC_ELEUCASE_STRING_A2,qbs_ucase(func_mid(_FUNC_ELEUCASE_STRING_A,*_FUNC_ELEUCASE_LONG_I,*_FUNC_ELEUCASE_LONG_I2-*_FUNC_ELEUCASE_LONG_I+ 1 ,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25879);}while(r); do{ *_FUNC_ELEUCASE_LONG_I3=func_instr(*_FUNC_ELEUCASE_LONG_I2+ 1 ,_FUNC_ELEUCASE_STRING_A,__STRING1_SP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25880);}while(r); S_28913:; if ((-(*_FUNC_ELEUCASE_LONG_I3== 0 ))||new_error){ if(qbevent){evnt(25880);if(r)goto S_28913;} do{ *_FUNC_ELEUCASE_LONG_I3=_FUNC_ELEUCASE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25880);}while(r); }else{ do{ *_FUNC_ELEUCASE_LONG_I3=*_FUNC_ELEUCASE_LONG_I3- 1 ; if(!qbevent)break;evnt(25880);}while(r); } do{ qbs_set(_FUNC_ELEUCASE_STRING_A2,qbs_add(_FUNC_ELEUCASE_STRING_A2,func_mid(_FUNC_ELEUCASE_STRING_A,*_FUNC_ELEUCASE_LONG_I2+ 1 ,*_FUNC_ELEUCASE_LONG_I3-(*_FUNC_ELEUCASE_LONG_I2+ 1 )+ 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25881);}while(r); do{ *_FUNC_ELEUCASE_LONG_I=*_FUNC_ELEUCASE_LONG_I3+ 1 ; if(!qbevent)break;evnt(25882);}while(r); S_28920:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_ELEUCASE_LONG_I>_FUNC_ELEUCASE_STRING_A->len)))||new_error){ if(qbevent){evnt(25883);if(r)goto S_28920;} do{ goto dl_exit_3276; if(!qbevent)break;evnt(25883);}while(r); } } dl_exit_3276:; } do{ qbs_set(_FUNC_ELEUCASE_STRING_A2,qbs_add(_FUNC_ELEUCASE_STRING_A2,qbs_ucase(func_mid(_FUNC_ELEUCASE_STRING_A,*_FUNC_ELEUCASE_LONG_I,_FUNC_ELEUCASE_STRING_A->len-*_FUNC_ELEUCASE_LONG_I+ 1 ,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25886);}while(r); do{ qbs_set(_FUNC_ELEUCASE_STRING_ELEUCASE,_FUNC_ELEUCASE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25887);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free81.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_ELEUCASE_STRING_ELEUCASE);return _FUNC_ELEUCASE_STRING_ELEUCASE; } void SUB_GETXYMOUSE(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data82.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(25897);}while(r); do{ *__INTEGER_MOUSEWHEEL= 0 ; if(!qbevent)break;evnt(25898);}while(r); S_28929:; while((func__mouseinput())||new_error){ if(qbevent){evnt(25900);if(r)goto S_28929;} do{ *__INTEGER_MOUSEX=qbr_float_to_long(func__mousex()); if(!qbevent)break;evnt(25902);}while(r); do{ *__INTEGER_MOUSEY=qbr_float_to_long(func__mousey()); if(!qbevent)break;evnt(25903);}while(r); S_28932:; if ((func__mousebutton( 1 ))||new_error){ if(qbevent){evnt(25904);if(r)goto S_28932;} do{ *__INTEGER_MOUSEBUTTON1= 1 ; if(!qbevent)break;evnt(25904);}while(r); }else{ do{ *__INTEGER_MOUSEBUTTON1= 0 ; if(!qbevent)break;evnt(25904);}while(r); } do{ *__INTEGER_MOUSEWHEEL=*__INTEGER_MOUSEWHEEL+func__mousewheel(); if(!qbevent)break;evnt(25905);}while(r); S_28938:; if (((-(*__INTEGER_MOUSEX!=*_SUB_GETXYMOUSE_SINGLE_OLDMOUSEX))|(-(*__INTEGER_MOUSEY!=*_SUB_GETXYMOUSE_SINGLE_OLDMOUSEY)))||new_error){ if(qbevent){evnt(25907);if(r)goto S_28938;} S_28939:; if ((*__INTEGER_MOUSEBUTTON1)||new_error){ if(qbevent){evnt(25908);if(r)goto S_28939;} do{ *_SUB_GETXYMOUSE_SINGLE_CHANGE= 1 ; if(!qbevent)break;evnt(25908);}while(r); } } S_28943:; if ((-(*_SUB_GETXYMOUSE_SINGLE_OLDMOUSEBUTTON1!=*__INTEGER_MOUSEBUTTON1))||new_error){ if(qbevent){evnt(25910);if(r)goto S_28943;} do{ *_SUB_GETXYMOUSE_SINGLE_CHANGE= 1 ; if(!qbevent)break;evnt(25910);}while(r); } S_28946:; if ((*__INTEGER_MOUSEWHEEL)||new_error){ if(qbevent){evnt(25911);if(r)goto S_28946;} do{ *_SUB_GETXYMOUSE_SINGLE_CHANGE= 1 ; if(!qbevent)break;evnt(25911);}while(r); } do{ *_SUB_GETXYMOUSE_SINGLE_OLDMOUSEX=*__INTEGER_MOUSEX; if(!qbevent)break;evnt(25913);}while(r); do{ *_SUB_GETXYMOUSE_SINGLE_OLDMOUSEY=*__INTEGER_MOUSEY; if(!qbevent)break;evnt(25914);}while(r); do{ *_SUB_GETXYMOUSE_SINGLE_OLDMOUSEBUTTON1=*__INTEGER_MOUSEBUTTON1; if(!qbevent)break;evnt(25915);}while(r); S_28952:; if ((-(*_SUB_GETXYMOUSE_SINGLE_CHANGE== 1 ))||new_error){ if(qbevent){evnt(25917);if(r)goto S_28952;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25917);}while(r); } } dl_exit_3280:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free82.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_IDE(int32*_FUNC_IDE_LONG_IGNORE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data83.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_28956:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_IDECOMMAND)== 3 )))||new_error){ if(qbevent){evnt(25984);if(r)goto S_28956;} S_28957:; if ((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDEN))||new_error){ if(qbevent){evnt(25985);if(r)goto S_28957;} S_28958:; if (((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDESY))|(-(*__LONG_IDECOMPILEDLINE>(*__LONG_IDESY+(*__LONG_IDEWY- 9 )))))||new_error){ if(qbevent){evnt(25986);if(r)goto S_28958;} S_28959:; if ((func__exit()& 1 )||new_error){ if(qbevent){evnt(25987);if(r)goto S_28959;} do{ *__LONG_IDEEXIT= 1 ; if(!qbevent)break;evnt(25987);}while(r); } S_28962:; if ((-(*__LONG_IDEEXIT== 0 ))||new_error){ if(qbevent){evnt(25988);if(r)goto S_28962;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25989);}while(r); S_28964:; if (((-(*__LONG_ICHANGED== 0 ))&(-(*__LONG_MB== 0 )))||new_error){ if(qbevent){evnt(25990);if(r)goto S_28964;} S_28965:; if (((-(*__LONG_IDEAUTOLAYOUT!= 0 ))|(-(*__LONG_IDEAUTOINDENT!= 0 )))||new_error){ if(qbevent){evnt(25994);if(r)goto S_28965;} S_28966:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(25995);if(r)goto S_28966;} do{ *_FUNC_IDE_LONG_L=__STRING_LAYOUT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25998);}while(r); S_28968:; fornext_value3284= 1 ; fornext_finalvalue3284=*_FUNC_IDE_LONG_L; fornext_step3284= 1 ; if (fornext_step3284<0) fornext_step_negative3284=1; else fornext_step_negative3284=0; if (new_error) goto fornext_error3284; goto fornext_entrylabel3284; while(1){ fornext_value3284=fornext_step3284+(*_FUNC_IDE_LONG_I); fornext_entrylabel3284: *_FUNC_IDE_LONG_I=fornext_value3284; if (fornext_step_negative3284){ if (fornext_value3284fornext_finalvalue3284) break; } fornext_error3284:; if(qbevent){evnt(25999);if(r)goto S_28968;} S_28969:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_LAYOUT,*_FUNC_IDE_LONG_I)!= 32 ))|(-(*_FUNC_IDE_LONG_I==*_FUNC_IDE_LONG_L))))||new_error){ if(qbevent){evnt(26000);if(r)goto S_28969;} S_28970:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_LAYOUT,*_FUNC_IDE_LONG_I)== 32 )))||new_error){ if(qbevent){evnt(26001);if(r)goto S_28970;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26002);}while(r); do{ *_FUNC_IDE_LONG_INDENT=*_FUNC_IDE_LONG_I; if(!qbevent)break;evnt(26002);}while(r); }else{ do{ *_FUNC_IDE_LONG_INDENT=*_FUNC_IDE_LONG_I- 1 ; if(!qbevent)break;evnt(26004);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_right(__STRING_LAYOUT,__STRING_LAYOUT->len-*_FUNC_IDE_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26005);}while(r); } do{ goto fornext_exit_3283; if(!qbevent)break;evnt(26007);}while(r); } } fornext_exit_3283:; S_28980:; if ((*__LONG_IDEAUTOLAYOUT)||new_error){ if(qbevent){evnt(26011);if(r)goto S_28980;} do{ qbs_set(_FUNC_IDE_STRING_LAYOUT2,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26012);}while(r); do{ *_FUNC_IDE_LONG_I2= 1 ; if(!qbevent)break;evnt(26012);}while(r); do{ *_FUNC_IDE_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(26013);}while(r); S_28984:; fornext_value3287= 1 ; fornext_finalvalue3287=__STRING_LAYOUT->len; fornext_step3287= 1 ; if (fornext_step3287<0) fornext_step_negative3287=1; else fornext_step_negative3287=0; if (new_error) goto fornext_error3287; goto fornext_entrylabel3287; while(1){ fornext_value3287=fornext_step3287+(*_FUNC_IDE_LONG_I); fornext_entrylabel3287: *_FUNC_IDE_LONG_I=fornext_value3287; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3287){ if (fornext_value3287fornext_finalvalue3287) break; } fornext_error3287:; if(qbevent){evnt(26014);if(r)goto S_28984;} do{ *_FUNC_IDE_LONG_A=qbs_asc(__STRING_LAYOUT,*_FUNC_IDE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26015);}while(r); S_28986:; if ((-(*_FUNC_IDE_LONG_A== 34 ))||new_error){ if(qbevent){evnt(26016);if(r)goto S_28986;} do{ *_FUNC_IDE_LONG_IGNORESP=*_FUNC_IDE_LONG_IGNORESP+ 1 ; if(!qbevent)break;evnt(26017);}while(r); S_28988:; if ((-(*_FUNC_IDE_LONG_IGNORESP== 2 ))||new_error){ if(qbevent){evnt(26017);if(r)goto S_28988;} do{ *_FUNC_IDE_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(26017);}while(r); } } S_28992:; if ((-(*_FUNC_IDE_LONG_IGNORESP== 0 ))||new_error){ if(qbevent){evnt(26019);if(r)goto S_28992;} S_28993:; if ((-(*_FUNC_IDE_LONG_A==*__LONG_SP_ASC))||new_error){ if(qbevent){evnt(26020);if(r)goto S_28993;} do{ tqbs=_FUNC_IDE_STRING_LAYOUT2; if (!new_error){ tmp_fileno=*_FUNC_IDE_LONG_I2; if (!new_error){ tmp_long= 32 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(26020);}while(r); do{ *_FUNC_IDE_LONG_I2=*_FUNC_IDE_LONG_I2+ 1 ; if(!qbevent)break;evnt(26020);}while(r); do{ goto LABEL_SKIPCHAR; if(!qbevent)break;evnt(26020);}while(r); } S_28998:; if ((-(*_FUNC_IDE_LONG_A==*__LONG_SP2_ASC))||new_error){ if(qbevent){evnt(26021);if(r)goto S_28998;} do{ goto LABEL_SKIPCHAR; if(!qbevent)break;evnt(26021);}while(r); } } do{ tqbs=_FUNC_IDE_STRING_LAYOUT2; if (!new_error){ tmp_fileno=*_FUNC_IDE_LONG_I2; if (!new_error){ tmp_long=*_FUNC_IDE_LONG_A; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(26023);}while(r); do{ *_FUNC_IDE_LONG_I2=*_FUNC_IDE_LONG_I2+ 1 ; if(!qbevent)break;evnt(26023);}while(r); LABEL_SKIPCHAR:; if(qbevent){evnt(26024);r=0;} } fornext_exit_3286:; do{ qbs_set(__STRING_LAYOUT,qbs_left(_FUNC_IDE_STRING_LAYOUT2,*_FUNC_IDE_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26026);}while(r); } S_29007:; if ((-(*__LONG_IDEAUTOINDENT== 0 ))||new_error){ if(qbevent){evnt(26029);if(r)goto S_29007;} do{ *_FUNC_IDE_LONG_INDENT= 0 ; if(!qbevent)break;evnt(26032);}while(r); do{ *_FUNC_IDE_LONG_L=__STRING_IDECOMPILEDLINE->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26033);}while(r); S_29010:; fornext_value3291= 1 ; fornext_finalvalue3291=*_FUNC_IDE_LONG_L; fornext_step3291= 1 ; if (fornext_step3291<0) fornext_step_negative3291=1; else fornext_step_negative3291=0; if (new_error) goto fornext_error3291; goto fornext_entrylabel3291; while(1){ fornext_value3291=fornext_step3291+(*_FUNC_IDE_LONG_I); fornext_entrylabel3291: *_FUNC_IDE_LONG_I=fornext_value3291; if (fornext_step_negative3291){ if (fornext_value3291fornext_finalvalue3291) break; } fornext_error3291:; if(qbevent){evnt(26034);if(r)goto S_29010;} S_29011:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_IDECOMPILEDLINE,*_FUNC_IDE_LONG_I)!= 32 ))|(-(*_FUNC_IDE_LONG_I==*_FUNC_IDE_LONG_L))))||new_error){ if(qbevent){evnt(26035);if(r)goto S_29011;} do{ *_FUNC_IDE_LONG_INDENT=*_FUNC_IDE_LONG_I- 1 ; if(!qbevent)break;evnt(26036);}while(r); do{ goto fornext_exit_3290; if(!qbevent)break;evnt(26037);}while(r); } } fornext_exit_3290:; do{ qbs_set(_FUNC_IDE_STRING_INDENT,func_space(*_FUNC_IDE_LONG_INDENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26040);}while(r); }else{ do{ qbs_set(_FUNC_IDE_STRING_INDENT,func_space(*_FUNC_IDE_LONG_INDENT**__LONG_IDEAUTOINDENTSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26042);}while(r); } S_29020:; if ((-(*__LONG_IDEAUTOLAYOUT== 0 ))||new_error){ if(qbevent){evnt(26045);if(r)goto S_29020;} do{ *_FUNC_IDE_LONG_L=__STRING_IDECOMPILEDLINE->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26047);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26048);}while(r); S_29023:; fornext_value3294= 1 ; fornext_finalvalue3294=*_FUNC_IDE_LONG_L; fornext_step3294= 1 ; if (fornext_step3294<0) fornext_step_negative3294=1; else fornext_step_negative3294=0; if (new_error) goto fornext_error3294; goto fornext_entrylabel3294; while(1){ fornext_value3294=fornext_step3294+(*_FUNC_IDE_LONG_I); fornext_entrylabel3294: *_FUNC_IDE_LONG_I=fornext_value3294; if (fornext_step_negative3294){ if (fornext_value3294fornext_finalvalue3294) break; } fornext_error3294:; if(qbevent){evnt(26049);if(r)goto S_29023;} S_29024:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_IDECOMPILEDLINE,*_FUNC_IDE_LONG_I)!= 32 ))|(-(*_FUNC_IDE_LONG_I==*_FUNC_IDE_LONG_L))))||new_error){ if(qbevent){evnt(26050);if(r)goto S_29024;} do{ qbs_set(__STRING_LAYOUT,qbs_right(__STRING_IDECOMPILEDLINE,*_FUNC_IDE_LONG_L-*_FUNC_IDE_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26051);}while(r); do{ goto fornext_exit_3293; if(!qbevent)break;evnt(26052);}while(r); } } fornext_exit_3293:; } S_29030:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(26057);if(r)goto S_29030;} do{ qbs_set(__STRING_LAYOUT,qbs_add(_FUNC_IDE_STRING_INDENT,__STRING_LAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26058);}while(r); S_29032:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMPILEDLINE,__STRING_LAYOUT)))||new_error){ if(qbevent){evnt(26059);if(r)goto S_29032;} do{ SUB_IDESETLINE(__LONG_IDECOMPILEDLINE,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26060);}while(r); } } } } do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE+ 1 ; if(!qbevent)break;evnt(26069);}while(r); do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(__LONG_IDECOMPILEDLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26070);}while(r); do{ *_FUNC_IDE_LONG_IDE= 4 ; if(!qbevent)break;evnt(26071);}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26072);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(26073);}while(r); } S_29044:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(26075);if(r)goto S_29044;} do{ *__LONG_ICHECKLATER= 1 ; if(!qbevent)break;evnt(26075);}while(r); } } } } } do{ *_FUNC_IDE_LONG_IDE=FUNC_IDE2(&(pass3296= 0 )); if(!qbevent)break;evnt(26081);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free83.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDE_LONG_IDE; } int32 FUNC_IDE2(int32*_FUNC_IDE2_LONG_IGNORE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data84.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_IDE2_STRING_C,__STRING_IDECOMMAND); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26085);}while(r); S_29053:; if ((*__LONG_IDEERROR)||new_error){ if(qbevent){evnt(26088);if(r)goto S_29053;} do{ *_FUNC_IDE2_LONG_MUSTDISPLAY= 1 ; if(!qbevent)break;evnt(26089);}while(r); S_29055:; if ((-(*__LONG_IDEERROR== 1 ))||new_error){ if(qbevent){evnt(26090);if(r)goto S_29055;} do{ SUB_IDEERRORMESSAGE(qbs_new_txt_len("IDE module error",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26090);}while(r); } S_29058:; if ((-(*__LONG_IDEERROR== 2 ))||new_error){ if(qbevent){evnt(26091);if(r)goto S_29058;} do{ SUB_IDEERRORMESSAGE(qbs_new_txt_len("File not found",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26091);}while(r); } S_29061:; if ((-(*__LONG_IDEERROR== 3 ))||new_error){ if(qbevent){evnt(26092);if(r)goto S_29061;} do{ SUB_IDEERRORMESSAGE(qbs_new_txt_len("File access error",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26092);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(26092);}while(r); } S_29065:; if ((-(*__LONG_IDEERROR== 4 ))||new_error){ if(qbevent){evnt(26093);if(r)goto S_29065;} do{ SUB_IDEERRORMESSAGE(qbs_new_txt_len("Path not found",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26093);}while(r); } } do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(26095);}while(r); S_29070:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 12 ))))||new_error){ if(qbevent){evnt(26097);if(r)goto S_29070;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_right(_FUNC_IDE2_STRING_C,_FUNC_IDE2_STRING_C->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26098);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(26099);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26100);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26100);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3298; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3298: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26100);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26100);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3299; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3299: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26100);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 1 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26100);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3300; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3300: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26100);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26101);}while(r); S_29081:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(26103);if(r)goto S_29081;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Creating executable file named ",31),func_chr( 34 )),_FUNC_IDE2_STRING_F),__STRING_EXTENSION),func_chr( 34 )),qbs_new_txt_len("...",3))); if (new_error) goto skip3301; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3301: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26104);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Creating .EXE file named ",25),func_chr( 34 )),_FUNC_IDE2_STRING_F),__STRING_EXTENSION),func_chr( 34 )),qbs_new_txt_len("...",3))); if (new_error) goto skip3302; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3302: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26106);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(26109);}while(r); do{ *_FUNC_IDE2_LONG_IDE2= 9 ; if(!qbevent)break;evnt(26110);}while(r); do{ qbs_set(__STRING_IDERETURN,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26110);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(26111);}while(r); } S_29091:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 100 ))))||new_error){ if(qbevent){evnt(26114);if(r)goto S_29091;} do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE+ 1 ; if(!qbevent)break;evnt(26115);}while(r); S_29093:; if ((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDEN))||new_error){ if(qbevent){evnt(26116);if(r)goto S_29093;} do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(__LONG_IDECOMPILEDLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26117);}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26118);}while(r); }else{ do{ qbs_set(__STRING_IDECOMPILEDLINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26120);}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26121);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(26123);}while(r); } S_29102:; if ((-(*__LONG_IDELAUNCHED== 0 ))||new_error){ if(qbevent){evnt(26126);if(r)goto S_29102;} do{ *__LONG_IDELAUNCHED= 1 ; if(!qbevent)break;evnt(26127);}while(r); do{ qbsub_width(NULL,*__LONG_IDEWX,*__LONG_IDEWY,3); if(!qbevent)break;evnt(26129);}while(r); do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(26130);}while(r); S_29106:; if ((*__LONG_IDECPINDEX)||new_error){ if(qbevent){evnt(26133);if(r)goto S_29106;} S_29107:; fornext_value3304= 128 ; fornext_finalvalue3304= 255 ; fornext_step3304= 1 ; if (fornext_step3304<0) fornext_step_negative3304=1; else fornext_step_negative3304=0; if (new_error) goto fornext_error3304; goto fornext_entrylabel3304; while(1){ fornext_value3304=fornext_step3304+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3304: *_FUNC_IDE2_LONG_X=fornext_value3304; if (fornext_step_negative3304){ if (fornext_value3304fornext_finalvalue3304) break; } fornext_error3304:; if(qbevent){evnt(26134);if(r)goto S_29107;} do{ *_FUNC_IDE2_LONG_U=qbr(func_val(qbs_add(qbs_add(qbs_new_txt_len("&H",2),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[array_check((*__LONG_IDECPINDEX)-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5])])),(*_FUNC_IDE2_LONG_X* 8 )+( 1 ), 8 ,1)),qbs_new_txt_len("&",1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26135);}while(r); S_29109:; if ((-(*_FUNC_IDE2_LONG_U== 0 ))||new_error){ if(qbevent){evnt(26136);if(r)goto S_29109;} do{ *_FUNC_IDE2_LONG_U= 9744 ; if(!qbevent)break;evnt(26136);}while(r); } do{ sub__mapunicode(*_FUNC_IDE2_LONG_U,*_FUNC_IDE2_LONG_X); if(!qbevent)break;evnt(26137);}while(r); } fornext_exit_3303:; } S_29115:; if ((*__LONG_IDECUSTOMFONT)||new_error){ if(qbevent){evnt(26141);if(r)goto S_29115;} do{ *__LONG_IDECUSTOMFONTHANDLE=func__loadfont(__STRING_IDECUSTOMFONTFILE,*__LONG_IDECUSTOMFONTHEIGHT,qbs_new_txt_len("MONOSPACE",9),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26142);}while(r); S_29117:; if ((-(*__LONG_IDECUSTOMFONTHANDLE== -1 ))||new_error){ if(qbevent){evnt(26143);if(r)goto S_29117;} do{ *__LONG_IDECUSTOMFONT= 0 ; if(!qbevent)break;evnt(26145);}while(r); do{ qbs_set(__STRING_IDECUSTOMFONTFILE,qbs_new_txt_len("c:\\windows\\fonts\\lucon.ttf",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26145);}while(r); do{ *__LONG_IDECUSTOMFONTHEIGHT= 21 ; if(!qbevent)break;evnt(26145);}while(r); }else{ do{ sub__font(*__LONG_IDECUSTOMFONTHANDLE,NULL,0); if(!qbevent)break;evnt(26147);}while(r); } } do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(26151);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(26151);}while(r); do{ SUB_IDEMAKEFILEMENU(); if(!qbevent)break;evnt(26152);}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(26154);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(26154);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Edit",4)); if(!qbevent)break;evnt(26155);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26155);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Cu#t Shift+Del or CTRL+X",25)); if(!qbevent)break;evnt(26156);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26156);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Copy Ctrl+Ins or CTRL+C",25)); if(!qbevent)break;evnt(26157);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26157);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Paste Shift+Ins or CTRL+V",27)); if(!qbevent)break;evnt(26158);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26158);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Cl#ear Del",11)); if(!qbevent)break;evnt(26159);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26159);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Select #All CTRL+A",19)); if(!qbevent)break;evnt(26160);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26160);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26161);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26161);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Undo CTRL+Z",13)); if(!qbevent)break;evnt(26162);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26162);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Redo CTRL+Y",13)); if(!qbevent)break;evnt(26163);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26163);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26164);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26164);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Comment (add ')",15)); if(!qbevent)break;evnt(26165);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26165);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Uncomment (remove ')",20)); if(!qbevent)break;evnt(26166);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26166);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26167);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26167);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("New #SUB...",11)); if(!qbevent)break;evnt(26168);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26168);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("New #FUNCTION...",16)); if(!qbevent)break;evnt(26169);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26169);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26170);}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(26172);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(26172);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("View",4)); if(!qbevent)break;evnt(26173);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26173);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#SUBs... F2",12)); if(!qbevent)break;evnt(26174);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26174);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26175);}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(26177);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(26177);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Search",6)); if(!qbevent)break;evnt(26178);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26178);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Find...",8)); if(!qbevent)break;evnt(26179);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26179);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Repeat Last Find (Shift+) F3",30)); if(!qbevent)break;evnt(26180);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26180);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Change...",10)); if(!qbevent)break;evnt(26181);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26181);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26182);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26182);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Add/Remove #Bookmark ALT+Left",30)); if(!qbevent)break;evnt(26183);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26183);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Next Bookmark ALT+Down",24)); if(!qbevent)break;evnt(26184);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26184);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Previous Bookmark ALT+Up",26)); if(!qbevent)break;evnt(26185);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26185);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26186);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26186);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Go to line...",14)); if(!qbevent)break;evnt(26187);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26187);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26189);}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(26191);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(26191);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Run",3)); if(!qbevent)break;evnt(26192);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26192);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Start F5",10)); if(!qbevent)break;evnt(26193);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26193);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26194);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26194);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Start (#Detached) Ctrl+F5",26)); if(!qbevent)break;evnt(26195);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26195);}while(r); S_29201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(26196);if(r)goto S_29201;} do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Make E#xecutable Only F11",26)); if(!qbevent)break;evnt(26197);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26197);}while(r); }else{ do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Make E#XE Only F11",19)); if(!qbevent)break;evnt(26199);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26199);}while(r); } do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26201);}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(26203);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(26203);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Options",7)); if(!qbevent)break;evnt(26204);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26204);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Display...",11)); if(!qbevent)break;evnt(26205);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26205);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Language...",12)); if(!qbevent)break;evnt(26206);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26206);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Code layout...",15)); if(!qbevent)break;evnt(26207);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26207);}while(r); S_29219:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(26208);if(r)goto S_29219;} } do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Backup/Undo...",15)); if(!qbevent)break;evnt(26211);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26211);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26212);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26212);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Advanced...",12)); if(!qbevent)break;evnt(26213);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26213);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26215);}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(26217);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(26217);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Help",4)); if(!qbevent)break;evnt(26218);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26218);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#View Shift+F1",15)); if(!qbevent)break;evnt(26219);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26219);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Contents page",14)); if(!qbevent)break;evnt(26220);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26220);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Keyword #index",14)); if(!qbevent)break;evnt(26221);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26221);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Keywords by usage",18)); if(!qbevent)break;evnt(26222);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26222);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("ASCII c#hart",12)); if(!qbevent)break;evnt(26223);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26223);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26224);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26224);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Update current page",20)); if(!qbevent)break;evnt(26225);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26225);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Update all #pages",17)); if(!qbevent)break;evnt(26226);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26226);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("-",1)); if(!qbevent)break;evnt(26227);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26227);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#About...",9)); if(!qbevent)break;evnt(26228);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(26228);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26229);}while(r); do{ *__INTEGER_MENUS=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(26233);}while(r); S_29254:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(26235);if(r)goto S_29254;} do{ qbs_set(__STRING1_IDEPATHSEP,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26236);}while(r); } S_29257:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(26238);if(r)goto S_29257;} do{ qbs_set(__STRING1_IDEPATHSEP,qbs_new_txt_len("/",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26239);}while(r); } do{ SUB_INITMOUSE(); if(!qbevent)break;evnt(26242);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("QWERTYUIOP????ASDFGHJKL?????ZXCVBNM",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26243);}while(r); do{ *_FUNC_IDE2_LONG_X= 16 ; if(!qbevent)break;evnt(26243);}while(r); S_29263:; fornext_value3306= 1 ; fornext_finalvalue3306=_FUNC_IDE2_STRING_A->len; fornext_step3306= 1 ; if (fornext_step3306<0) fornext_step_negative3306=1; else fornext_step_negative3306=0; if (new_error) goto fornext_error3306; goto fornext_entrylabel3306; while(1){ fornext_value3306=fornext_step3306+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3306: *_FUNC_IDE2_LONG_I=fornext_value3306; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3306){ if (fornext_value3306fornext_finalvalue3306) break; } fornext_error3306:; if(qbevent){evnt(26243);if(r)goto S_29263;} do{ tmp_long=array_check((qbs_asc(func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1)))-__ARRAY_INTEGER_IDEALTCODE[4],__ARRAY_INTEGER_IDEALTCODE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_IDEALTCODE[0]))[tmp_long]=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(26243);}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(26243);}while(r); } fornext_exit_3305:; do{ qbs_set(__STRING_IDEROOT,FUNC_IDEZGETROOT()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26245);}while(r); do{ qbs_set(__STRING_IDEPATH,__STRING_IDEROOT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26246);}while(r); do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26249);}while(r); do{ *__LONG_IDEL= 1 ; if(!qbevent)break;evnt(26249);}while(r); do{ *__LONG_IDELI= 1 ; if(!qbevent)break;evnt(26249);}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(26249);}while(r); do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(26249);}while(r); do{ *__LONG_IDEUNSAVED= -1 ; if(!qbevent)break;evnt(26250);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(26251);}while(r); LABEL_REDRAWEVERYTHING:; if(qbevent){evnt(26253);r=0;} do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(26255);}while(r); do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(26256);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(26257);}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(26258);}while(r); LABEL_REDRAWEVERYTHING2:; if(qbevent){evnt(26260);r=0;} do{ qbs_set(__STRING_MENUBAR,qbs_new_txt_len(" ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26263);}while(r); S_29281:; fornext_value3309= 1 ; fornext_finalvalue3309=*__INTEGER_MENUS- 1 ; fornext_step3309= 1 ; if (fornext_step3309<0) fornext_step_negative3309=1; else fornext_step_negative3309=0; if (new_error) goto fornext_error3309; goto fornext_entrylabel3309; while(1){ fornext_value3309=fornext_step3309+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3309: *_FUNC_IDE2_LONG_I=fornext_value3309; if (fornext_step_negative3309){ if (fornext_value3309fornext_finalvalue3309) break; } fornext_error3309:; if(qbevent){evnt(26264);if(r)goto S_29281;} do{ qbs_set(__STRING_MENUBAR,qbs_add(qbs_add(__STRING_MENUBAR,((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))),qbs_new_txt_len(" ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26265);}while(r); } fornext_exit_3308:; do{ qbs_set(__STRING_MENUBAR,qbs_add(__STRING_MENUBAR,func_space(*__LONG_IDEWX-__STRING_MENUBAR->len-((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26267);}while(r); do{ qbs_set(__STRING_MENUBAR,qbs_add(qbs_add(__STRING_MENUBAR,((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))),qbs_new_txt_len(" ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26268);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(26271);}while(r); do{ qbg_sub_view_print( 1 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,1); if(!qbevent)break;evnt(26272);}while(r); do{ qbg_sub_locate(NULL,NULL,NULL, 8 , 8 ,24); if(!qbevent)break;evnt(26277);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(26280);}while(r); do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26280);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3312; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3312: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26280);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26281);}while(r); do{ SUB_IDEBOX(&(pass3313= 1 ),&(pass3314= 2 ),__LONG_IDEWX,&(pass3315=*__LONG_IDEWY- 5 )); if(!qbevent)break;evnt(26281);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26284);}while(r); do{ SUB_IDEBOX(&(pass3316= 1 ),&(pass3317=*__LONG_IDEWY- 4 ),__LONG_IDEWX,&(pass3318= 5 )); if(!qbevent)break;evnt(26284);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26286);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 4 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26286);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\303",1)); if (new_error) goto skip3319; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3319: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26286);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 4 ,*__LONG_IDEWX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26286);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\264",1)); if (new_error) goto skip3320; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3320: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26286);}while(r); S_29301:; if ((-(*__LONG_IDEHELP== 1 ))||new_error){ if(qbevent){evnt(26288);if(r)goto S_29301;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(26289);}while(r); do{ SUB_IDEBOX(&(pass3321= 1 ),__LONG_IDEWY,__LONG_IDEWX,&(pass3322=*__LONG_IDESUBWINDOW+ 1 )); if(!qbevent)break;evnt(26289);}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(26290);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY, 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26290);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\303",1)); if (new_error) goto skip3323; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3323: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26290);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY,*__LONG_IDEWX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26290);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\264",1)); if (new_error) goto skip3324; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3324: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26290);}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(26291);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY,*__LONG_IDEWX- 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26291);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\264X\303",3)); if (new_error) goto skip3325; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3325: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26291);}while(r); } do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26295);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 4 ,qbr((*__LONG_IDEWX- 8 )/ ((long double)( 2 ))),NULL,NULL,NULL,3); if(!qbevent)break;evnt(26295);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" Status ",8)); if (new_error) goto skip3326; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3326: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26295);}while(r); do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(26297);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW, 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26297);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX)); if (new_error) goto skip3327; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3327: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26297);}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3328=*__LONG_IDEWY- 3 ),&(pass3329= 3 ),&(pass3330= 1 ),&(pass3331= 1 )); if(!qbevent)break;evnt(26298);}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3332= 3 ),&(pass3333=*__LONG_IDEWY- 8 ),&(pass3334= 1 ),&(pass3335= 1 )); if(!qbevent)break;evnt(26299);}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEHBAR(&(pass3336= 2 ),&(pass3337=*__LONG_IDEWY- 5 ),&(pass3338=*__LONG_IDEWX- 2 ),&(pass3339= 1 ),&(pass3340= 1 )); if(!qbevent)break;evnt(26300);}while(r); do{ sub_defseg( 0 ,1); if(!qbevent)break;evnt(26303);}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(26304);}while(r); S_29324:; if ((-(*_FUNC_IDE2_LONG_RETVAL== 1 ))||new_error){ if(qbevent){evnt(26306);if(r)goto S_29324;} do{ goto LABEL_SKIPLOAD; if(!qbevent)break;evnt(26306);}while(r); } do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("autosave.bin",12)), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26310);}while(r); S_29328:; if ((-(func_lof( 150 )== 1 ))||new_error){ if(qbevent){evnt(26311);if(r)goto S_29328;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(26312);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDERESTORE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26313);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(26314);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(26314);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(26314);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(26314);}while(r); S_29335:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(26315);if(r)goto S_29335;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("undo2.bin",9)), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26317);}while(r); S_29337:; if ((func_lof( 150 ))||new_error){ if(qbevent){evnt(26318);if(r)goto S_29337;} do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(26319);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26320);}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26320);}while(r); do{ *_FUNC_IDE2_LONG_P1=string2l(func_mid(_FUNC_IDE2_STRING_H, 1 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26320);}while(r); do{ *_FUNC_IDE2_LONG_P2=string2l(func_mid(_FUNC_IDE2_STRING_H, 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26320);}while(r); do{ *_FUNC_IDE2_LONG_PLAST=string2l(func_mid(_FUNC_IDE2_STRING_H, 9 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26320);}while(r); do{ sub_seek( 150 ,*_FUNC_IDE2_LONG_P2); if(!qbevent)break;evnt(26322);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_L,4,byte_element_3341),0); if(!qbevent)break;evnt(26323);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESX,4,byte_element_3342),0); if(!qbevent)break;evnt(26324);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESY,4,byte_element_3343),0); if(!qbevent)break;evnt(26324);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECX,4,byte_element_3344),0); if(!qbevent)break;evnt(26325);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECY,4,byte_element_3345),0); if(!qbevent)break;evnt(26325);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECT,4,byte_element_3346),0); if(!qbevent)break;evnt(26326);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTX1,4,byte_element_3347),0); if(!qbevent)break;evnt(26326);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTY1,4,byte_element_3348),0); if(!qbevent)break;evnt(26326);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEN,4,byte_element_3349),0); if(!qbevent)break;evnt(26327);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEL,4,byte_element_3350),0); if(!qbevent)break;evnt(26328);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDELI,4,byte_element_3351),0); if(!qbevent)break;evnt(26329);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEBMKN,4,byte_element_3352),0); if(!qbevent)break;evnt(26331);}while(r); do{ if (__ARRAY_UDT_IDEBMK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDEBMK)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_IDEBMK[2]&1){ if (__ARRAY_UDT_IDEBMK[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDEBMK[0])); }else{ free((void*)(__ARRAY_UDT_IDEBMK[0])); } } __ARRAY_UDT_IDEBMK[4]= 0 ; __ARRAY_UDT_IDEBMK[5]=(*__LONG_IDEBMKN+ 1 )-__ARRAY_UDT_IDEBMK[4]+1; __ARRAY_UDT_IDEBMK[6]=1; if (__ARRAY_UDT_IDEBMK[2]&4){ __ARRAY_UDT_IDEBMK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_IDEBMK[5]*128/8+1); memset((void*)(__ARRAY_UDT_IDEBMK[0]),0,__ARRAY_UDT_IDEBMK[5]*128/8+1); }else{ __ARRAY_UDT_IDEBMK[0]=(ptrszint)calloc(__ARRAY_UDT_IDEBMK[5]*128/8+1,1); if (!__ARRAY_UDT_IDEBMK[0]) error(257); } __ARRAY_UDT_IDEBMK[2]|=1; } if(!qbevent)break;evnt(26331);}while(r); S_29358:; fornext_value3354= 1 ; fornext_finalvalue3354=*__LONG_IDEBMKN; fornext_step3354= 1 ; if (fornext_step3354<0) fornext_step_negative3354=1; else fornext_step_negative3354=0; if (new_error) goto fornext_error3354; goto fornext_entrylabel3354; while(1){ fornext_value3354=fornext_step3354+(*_FUNC_IDE2_LONG_BI); fornext_entrylabel3354: *_FUNC_IDE2_LONG_BI=fornext_value3354; if (fornext_step_negative3354){ if (fornext_value3354fornext_finalvalue3354) break; } fornext_error3354:; if(qbevent){evnt(26332);if(r)goto S_29358;} do{ sub_get( 150 ,NULL,byte_element((uint64)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)),4,byte_element_3355),0); if(!qbevent)break;evnt(26332);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+4)),4,byte_element_3356),0); if(!qbevent)break;evnt(26332);}while(r); } fornext_exit_3353:; do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_X,4,byte_element_3357),0); if(!qbevent)break;evnt(26333);}while(r); do{ qbs_set(__STRING_IDET,func_space(*_FUNC_IDE2_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26333);}while(r); do{ sub_get2( 150 ,NULL,__STRING_IDET,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26333);}while(r); } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(26335);}while(r); } }else{ do{ sub_close( 150 ,1); if(!qbevent)break;evnt(26338);}while(r); } S_29371:; if ((-(*__LONG_IDEUNSAVED!= 1 ))||new_error){ if(qbevent){evnt(26341);if(r)goto S_29371;} S_29372:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 1 ))))||new_error){ if(qbevent){evnt(26342);if(r)goto S_29372;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_right(_FUNC_IDE2_STRING_C,_FUNC_IDE2_STRING_C->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26343);}while(r); S_29374:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_FILEHASEXTENSION(_FUNC_IDE2_STRING_F)== 0 )))||new_error){ if(qbevent){evnt(26344);if(r)goto S_29374;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(_FUNC_IDE2_STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26344);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_PATH,FUNC_IDEZGETFILEPATH(__STRING_IDEROOT,_FUNC_IDE2_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26345);}while(r); do{ *__LONG_IDEERROR= 2 ; if(!qbevent)break;evnt(26348);}while(r); do{ sub_open(qbs_add(qbs_add(_FUNC_IDE2_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDE2_STRING_F), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26349);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(26349);}while(r); do{ *__LONG_IDEERROR= 3 ; if(!qbevent)break;evnt(26350);}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_IDE2_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26351);}while(r); do{ SUB_LINEINPUT3LOAD(qbs_add(qbs_add(_FUNC_IDE2_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDE2_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26352);}while(r); do{ qbs_set(__STRING_IDET,func_space(__STRING_LINEINPUT3BUFFER->len* 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26353);}while(r); do{ *_FUNC_IDE2_LONG_I2= 1 ; if(!qbevent)break;evnt(26354);}while(r); do{ *_FUNC_IDE2_LONG_N= 0 ; if(!qbevent)break;evnt(26355);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHRTAB,func_chr( 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26356);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE1,qbs_new_txt_len(" ",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26357);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE2,qbs_new_txt_len(" ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26357);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE3,qbs_new_txt_len(" ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26357);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE4,qbs_new_txt_len(" ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26357);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR7,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26358);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR11,func_chr( 11 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26358);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR12,func_chr( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26358);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR28,func_chr( 28 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26358);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR29,func_chr( 29 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26358);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR30,func_chr( 30 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26358);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR31,func_chr( 31 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26358);}while(r); S_29399:; do{ if(qbevent){evnt(26359);if(r)goto S_29399;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26360);}while(r); do{ *_FUNC_IDE2_LONG_L=_FUNC_IDE2_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26361);}while(r); S_29402:; if ((*_FUNC_IDE2_LONG_L)||new_error){ if(qbevent){evnt(26362);if(r)goto S_29402;} do{ *_FUNC_IDE2_LONG_ASCA=qbs_asc(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26362);}while(r); }else{ do{ *_FUNC_IDE2_LONG_ASCA= -1 ; if(!qbevent)break;evnt(26362);}while(r); } S_29407:; if ((-(*_FUNC_IDE2_LONG_ASCA!= 13 ))||new_error){ if(qbevent){evnt(26363);if(r)goto S_29407;} S_29408:; if ((-(*_FUNC_IDE2_LONG_ASCA!= -1 ))||new_error){ if(qbevent){evnt(26364);if(r)goto S_29408;} LABEL_IDEOPENFIXTABSX:; if(qbevent){evnt(26366);r=0;} do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_CHRTAB,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26367);}while(r); S_29410:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(26368);if(r)goto S_29410;} do{ *_FUNC_IDE2_LONG_X2=(*_FUNC_IDE2_LONG_X- 1 )% 4 ; if(!qbevent)break;evnt(26369);}while(r); S_29412:; if ((-(*_FUNC_IDE2_LONG_X2== 0 ))||new_error){ if(qbevent){evnt(26370);if(r)goto S_29412;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X- 1 ),_FUNC_IDE2_STRING_SPACE4),qbs_right(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_L-*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26370);}while(r); do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 3 ; if(!qbevent)break;evnt(26370);}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(26370);}while(r); } S_29417:; if ((-(*_FUNC_IDE2_LONG_X2== 1 ))||new_error){ if(qbevent){evnt(26371);if(r)goto S_29417;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X- 1 ),_FUNC_IDE2_STRING_SPACE3),qbs_right(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_L-*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26371);}while(r); do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 2 ; if(!qbevent)break;evnt(26371);}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(26371);}while(r); } S_29422:; if ((-(*_FUNC_IDE2_LONG_X2== 2 ))||new_error){ if(qbevent){evnt(26372);if(r)goto S_29422;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X- 1 ),_FUNC_IDE2_STRING_SPACE2),qbs_right(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_L-*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26372);}while(r); do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 1 ; if(!qbevent)break;evnt(26372);}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(26372);}while(r); } S_29427:; if ((-(*_FUNC_IDE2_LONG_X2== 3 ))||new_error){ if(qbevent){evnt(26373);if(r)goto S_29427;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X- 1 ),_FUNC_IDE2_STRING_SPACE1),qbs_right(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_L-*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26373);}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(26373);}while(r); } } } do{ sub_mid(__STRING_IDET,*_FUNC_IDE2_LONG_I2,*_FUNC_IDE2_LONG_L+ 8 ,qbs_add(qbs_add(l2string(*_FUNC_IDE2_LONG_L),_FUNC_IDE2_STRING_A),l2string(*_FUNC_IDE2_LONG_L)),1); if(!qbevent)break;evnt(26376);}while(r); do{ *_FUNC_IDE2_LONG_I2=*_FUNC_IDE2_LONG_I2+*_FUNC_IDE2_LONG_L+ 8 ; if(!qbevent)break;evnt(26376);}while(r); do{ *_FUNC_IDE2_LONG_N=*_FUNC_IDE2_LONG_N+ 1 ; if(!qbevent)break;evnt(26376);}while(r); } S_29437:; }while((!(-(*_FUNC_IDE2_LONG_ASCA== 13 )))&&(!new_error)); dl_exit_3360:; if(qbevent){evnt(26378);if(r)goto S_29437;} do{ qbs_set(__STRING_LINEINPUT3BUFFER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26379);}while(r); do{ *__LONG_IDEN=*_FUNC_IDE2_LONG_N; if(!qbevent)break;evnt(26380);}while(r); S_29440:; if ((-(*_FUNC_IDE2_LONG_N== 0 ))||new_error){ if(qbevent){evnt(26380);if(r)goto S_29440;} do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26380);}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(26380);}while(r); }else{ do{ qbs_set(__STRING_IDET,qbs_left(__STRING_IDET,*_FUNC_IDE2_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26380);}while(r); } do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(26381);}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(26382);}while(r); do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26383);}while(r); do{ sub__title(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - QB64",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26383);}while(r); do{ SUB_IDEIMPORTBOOKMARKS(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26384);}while(r); do{ SUB_IDEADDRECENT(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26385);}while(r); } } LABEL_SKIPLOAD:; if(qbevent){evnt(26390);r=0;} } S_29455:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 3 ))))||new_error){ if(qbevent){evnt(26404);if(r)goto S_29455;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 1 ; if(!qbevent)break;evnt(26405);}while(r); do{ *_FUNC_IDE2_LONG_SENDNEXTLINE= 1 ; if(!qbevent)break;evnt(26406);}while(r); S_29458:; if (((-(*__LONG_IDEAUTOLAYOUT== 0 ))&(-(*__LONG_IDEAUTOINDENT== 0 )))||new_error){ if(qbevent){evnt(26410);if(r)goto S_29458;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26412);}while(r); do{ *__LONG_IDELAYOUTALLOW= 0 ; if(!qbevent)break;evnt(26413);}while(r); }else{ S_29462:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(26417);if(r)goto S_29462;} S_29463:; fornext_value3364= 1 ; fornext_finalvalue3364=__STRING_LAYOUT->len; fornext_step3364= 1 ; if (fornext_step3364<0) fornext_step_negative3364=1; else fornext_step_negative3364=0; if (new_error) goto fornext_error3364; goto fornext_entrylabel3364; while(1){ fornext_value3364=fornext_step3364+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3364: *_FUNC_IDE2_LONG_I=fornext_value3364; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3364){ if (fornext_value3364fornext_finalvalue3364) break; } fornext_error3364:; if(qbevent){evnt(26420);if(r)goto S_29463;} S_29464:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I)!= 32 ))|(-(*_FUNC_IDE2_LONG_I==__STRING_LAYOUT->len))))||new_error){ if(qbevent){evnt(26421);if(r)goto S_29464;} do{ *_FUNC_IDE2_LONG_INDENT=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26422);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_right(__STRING_LAYOUT,__STRING_LAYOUT->len-*_FUNC_IDE2_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26423);}while(r); do{ goto fornext_exit_3363; if(!qbevent)break;evnt(26424);}while(r); } } fornext_exit_3363:; S_29470:; if ((*__LONG_IDEAUTOLAYOUT)||new_error){ if(qbevent){evnt(26428);if(r)goto S_29470;} LABEL_SPACELAYOUT:; if(qbevent){evnt(26429);r=0;} do{ *_FUNC_IDE2_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(26430);}while(r); S_29472:; fornext_value3369= 1 ; fornext_finalvalue3369=__STRING_LAYOUT->len; fornext_step3369= 1 ; if (fornext_step3369<0) fornext_step_negative3369=1; else fornext_step_negative3369=0; if (new_error) goto fornext_error3369; goto fornext_entrylabel3369; while(1){ fornext_value3369=fornext_step3369+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3369: *_FUNC_IDE2_LONG_I=fornext_value3369; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3369){ if (fornext_value3369fornext_finalvalue3369) break; } fornext_error3369:; if(qbevent){evnt(26431);if(r)goto S_29472;} S_29473:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I)== 34 )))||new_error){ if(qbevent){evnt(26432);if(r)goto S_29473;} do{ *_FUNC_IDE2_LONG_IGNORESP=*_FUNC_IDE2_LONG_IGNORESP+ 1 ; if(!qbevent)break;evnt(26433);}while(r); S_29475:; if ((-(*_FUNC_IDE2_LONG_IGNORESP== 2 ))||new_error){ if(qbevent){evnt(26433);if(r)goto S_29475;} do{ *_FUNC_IDE2_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(26433);}while(r); } } S_29479:; if ((-(*_FUNC_IDE2_LONG_IGNORESP== 0 ))||new_error){ if(qbevent){evnt(26435);if(r)goto S_29479;} S_29480:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(26436);if(r)goto S_29480;} do{ sub_mid(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(26436);}while(r); } S_29483:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I, 1 ,1),__STRING1_SP2)))||new_error){ if(qbevent){evnt(26437);if(r)goto S_29483;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_left(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I- 1 ),qbs_right(__STRING_LAYOUT,__STRING_LAYOUT->len-*_FUNC_IDE2_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26437);}while(r); do{ goto LABEL_SPACELAYOUT; if(!qbevent)break;evnt(26437);}while(r); } } } fornext_exit_3368:; } S_29490:; if ((-(*__LONG_IDEAUTOINDENT== 0 ))||new_error){ if(qbevent){evnt(26442);if(r)goto S_29490;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26445);}while(r); do{ *_FUNC_IDE2_LONG_INDENT= 0 ; if(!qbevent)break;evnt(26446);}while(r); S_29493:; fornext_value3373= 1 ; fornext_finalvalue3373=_FUNC_IDE2_STRING_A->len; fornext_step3373= 1 ; if (fornext_step3373<0) fornext_step_negative3373=1; else fornext_step_negative3373=0; if (new_error) goto fornext_error3373; goto fornext_entrylabel3373; while(1){ fornext_value3373=fornext_step3373+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3373: *_FUNC_IDE2_LONG_I=fornext_value3373; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3373){ if (fornext_value3373fornext_finalvalue3373) break; } fornext_error3373:; if(qbevent){evnt(26447);if(r)goto S_29493;} S_29494:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I)!= 32 ))|(-(*_FUNC_IDE2_LONG_I==_FUNC_IDE2_STRING_A->len))))||new_error){ if(qbevent){evnt(26448);if(r)goto S_29494;} do{ *_FUNC_IDE2_LONG_INDENT=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(26449);}while(r); do{ goto fornext_exit_3372; if(!qbevent)break;evnt(26450);}while(r); } } fornext_exit_3372:; do{ qbs_set(_FUNC_IDE2_STRING_INDENT,func_space(*_FUNC_IDE2_LONG_INDENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26453);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_INDENT,func_space(*_FUNC_IDE2_LONG_INDENT**__LONG_IDEAUTOINDENTSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26455);}while(r); } S_29503:; if ((-(*__LONG_IDEAUTOLAYOUT== 0 ))||new_error){ if(qbevent){evnt(26458);if(r)goto S_29503;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26460);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26461);}while(r); S_29506:; fornext_value3377= 1 ; fornext_finalvalue3377=_FUNC_IDE2_STRING_A->len; fornext_step3377= 1 ; if (fornext_step3377<0) fornext_step_negative3377=1; else fornext_step_negative3377=0; if (new_error) goto fornext_error3377; goto fornext_entrylabel3377; while(1){ fornext_value3377=fornext_step3377+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3377: *_FUNC_IDE2_LONG_I=fornext_value3377; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3377){ if (fornext_value3377fornext_finalvalue3377) break; } fornext_error3377:; if(qbevent){evnt(26462);if(r)goto S_29506;} S_29507:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I)!= 32 ))|(-(*_FUNC_IDE2_LONG_I==_FUNC_IDE2_STRING_A->len))))||new_error){ if(qbevent){evnt(26463);if(r)goto S_29507;} do{ qbs_set(__STRING_LAYOUT,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26464);}while(r); do{ goto fornext_exit_3376; if(!qbevent)break;evnt(26465);}while(r); } } fornext_exit_3376:; } do{ qbs_set(__STRING_LAYOUT,qbs_add(_FUNC_IDE2_STRING_INDENT,__STRING_LAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26470);}while(r); S_29514:; if (((-(*__LONG_IDECY!=*__LONG_IDECOMPILEDLINE))|(-(*__LONG_IDELAYOUTALLOW!= 0 )))||new_error){ if(qbevent){evnt(26472);if(r)goto S_29514;} do{ *__LONG_IDELAYOUTALLOW= 0 ; if(!qbevent)break;evnt(26473);}while(r); S_29516:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMPILEDLINE,__STRING_LAYOUT)))||new_error){ if(qbevent){evnt(26475);if(r)goto S_29516;} do{ SUB_IDESETLINE(__LONG_IDECOMPILEDLINE,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26476);}while(r); S_29518:; if (((-(*__LONG_IDECOMPILEDLINE>=*__LONG_IDESY))&(-(*__LONG_IDECOMPILEDLINE<=(*__LONG_IDESY+ 16 ))))||new_error){ if(qbevent){evnt(26477);if(r)goto S_29518;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(26477);}while(r); } } }else{ S_29523:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMPILEDLINE,__STRING_LAYOUT)))||new_error){ if(qbevent){evnt(26482);if(r)goto S_29523;} do{ qbs_set(__STRING_IDECURRENTLINELAYOUT,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26483);}while(r); do{ *__LONG_IDECURRENTLINELAYOUTI=*__LONG_IDECY; if(!qbevent)break;evnt(26484);}while(r); } } } } } S_29531:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 6 ))))||new_error){ if(qbevent){evnt(26495);if(r)goto S_29531;} do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(26496);}while(r); do{ *_FUNC_IDE2_LONG_READY= 1 ; if(!qbevent)break;evnt(26497);}while(r); S_29534:; if ((*__LONG_IDEAUTORUN)||new_error){ if(qbevent){evnt(26498);if(r)goto S_29534;} do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(26498);}while(r); do{ goto LABEL_IDEMRUNSPECIAL; if(!qbevent)break;evnt(26498);}while(r); } } S_29539:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 11 ))))||new_error){ if(qbevent){evnt(26501);if(r)goto S_29539;} do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(26502);}while(r); do{ *_FUNC_IDE2_LONG_READY= 1 ; if(!qbevent)break;evnt(26503);}while(r); do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(26504);}while(r); do{ *_FUNC_IDE2_LONG_SHOWEXECREATED= 1 ; if(!qbevent)break;evnt(26505);}while(r); } S_29545:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 7 ))))||new_error){ if(qbevent){evnt(26508);if(r)goto S_29545;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 1 ; if(!qbevent)break;evnt(26509);}while(r); do{ *__LONG_IDECOMPILEDLINE= 0 ; if(!qbevent)break;evnt(26510);}while(r); do{ *_FUNC_IDE2_LONG_SENDNEXTLINE= 1 ; if(!qbevent)break;evnt(26511);}while(r); } S_29550:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 8 ))))||new_error){ if(qbevent){evnt(26514);if(r)goto S_29550;} do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(26515);}while(r); do{ *_FUNC_IDE2_LONG_FAILED= 1 ; if(!qbevent)break;evnt(26516);}while(r); do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(26517);}while(r); } do{ *_FUNC_IDE2_LONG_PASSBACK= 0 ; if(!qbevent)break;evnt(26520);}while(r); S_29556:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 10 ))))||new_error){ if(qbevent){evnt(26521);if(r)goto S_29556;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 1 ; if(!qbevent)break;evnt(26522);}while(r); do{ *_FUNC_IDE2_LONG_SENDNEXTLINE= 1 ; if(!qbevent)break;evnt(26523);}while(r); do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE- 1 ; if(!qbevent)break;evnt(26524);}while(r); do{ *_FUNC_IDE2_LONG_PASSBACK= 1 ; if(!qbevent)break;evnt(26525);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_PASSBACK,qbs_right(_FUNC_IDE2_STRING_C,_FUNC_IDE2_STRING_C->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26526);}while(r); } S_29563:; if ((*_FUNC_IDE2_LONG_MUSTDISPLAY)||new_error){ if(qbevent){evnt(26529);if(r)goto S_29563;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(26529);}while(r); } S_29566:; if ((-(*_FUNC_IDE2_LONG_SKIPDISPLAY== 0 ))||new_error){ if(qbevent){evnt(26531);if(r)goto S_29566;} do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(26533);}while(r); S_29568:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_C,func_chr( 3 ))))||new_error){ if(qbevent){evnt(26538);if(r)goto S_29568;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26539);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26539);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3382; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3382: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26539);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26539);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3383; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3383: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26539);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 1 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26539);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3384; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3384: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26539);}while(r); S_29576:; if ((*_FUNC_IDE2_LONG_READY)||new_error){ if(qbevent){evnt(26540);if(r)goto S_29576;} do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26540);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("OK",2)); if (new_error) goto skip3385; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3385: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26540);}while(r); } S_29580:; if ((*_FUNC_IDE2_LONG_SHOWEXECREATED)||new_error){ if(qbevent){evnt(26541);if(r)goto S_29580;} do{ *_FUNC_IDE2_LONG_SHOWEXECREATED= 0 ; if(!qbevent)break;evnt(26542);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26543);}while(r); S_29583:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(26545);if(r)goto S_29583;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Executable file created",23)); if (new_error) goto skip3386; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3386: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26546);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(".EXE file created",17)); if (new_error) goto skip3387; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3387: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26548);}while(r); } } } } do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(26556);}while(r); S_29592:; do{ if(qbevent){evnt(26587);if(r)goto S_29592;} LABEL_IDELOOP:; if(qbevent){evnt(26588);r=0;} do{ SUB_IDEDELTXT(); if(!qbevent)break;evnt(26590);}while(r); S_29594:; if ((-(*_FUNC_IDE2_LONG_SKIPDISPLAY== 0 ))||new_error){ if(qbevent){evnt(26592);if(r)goto S_29594;} do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(26594);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26597);}while(r); do{ qbg_sub_locate( 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26597);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_string(*__LONG_IDEWX- 2 ,(qbs_new_txt_len("\304",1)->chr[0]))); if (new_error) goto skip3389; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3389: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26597);}while(r); S_29599:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEPROGNAME->len))||new_error){ if(qbevent){evnt(26598);if(r)goto S_29599;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26598);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_new_txt_len("Untitled",8),__STRING_TEMPFOLDERINDEXSTR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26598);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_new_txt_len(" ",1),_FUNC_IDE2_STRING_A),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26599);}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(26600);}while(r); do{ qbg_sub_locate( 2 ,qbr((((*__LONG_IDEWX/ ((long double)( 2 )))- 1 ))-((_FUNC_IDE2_STRING_A->len- 1 )/ 2 )),NULL,NULL,NULL,3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26600);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_IDE2_STRING_A); if (new_error) goto skip3392; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3392: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26600);}while(r); do{ qbg_sub_locate( 2 ,*__LONG_IDEWX- 30 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26603);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26604);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\264",1)); if (new_error) goto skip3393; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3393: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26604);}while(r); do{ qbg_sub_color( 3 , 1 ,NULL,3); if(!qbevent)break;evnt(26605);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Find[ \022]",28)); if (new_error) goto skip3394; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3394: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26605);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26606);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\303",1)); if (new_error) goto skip3395; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3395: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26606);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26607);}while(r); S_29616:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_F->len> 20 )))||new_error){ if(qbevent){evnt(26608);if(r)goto S_29616;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_new_txt_len("\372\372\372",3),qbs_right(_FUNC_IDE2_STRING_F, 17 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26609);}while(r); } do{ qbg_sub_locate( 2 ,*__LONG_IDEWX- 28 + 4 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26611);}while(r); do{ qbg_sub_color( 3 , 1 ,NULL,3); if(!qbevent)break;evnt(26611);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_IDE2_STRING_F); if (new_error) goto skip3397; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3397: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26611);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_FINDTEXT,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26612);}while(r); S_29623:; if ((*__INTEGER_IDEINSERT)||new_error){ if(qbevent){evnt(26615);if(r)goto S_29623;} do{ qbg_sub_locate(NULL,NULL,NULL, 0 , 31 ,24); if(!qbevent)break;evnt(26615);}while(r); }else{ do{ qbg_sub_locate(NULL,NULL,NULL, 8 , 8 ,24); if(!qbevent)break;evnt(26615);}while(r); } S_29628:; if ((*_FUNC_IDE2_LONG_FAILED)||new_error){ if(qbevent){evnt(26618);if(r)goto S_29628;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26619);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26619);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3398; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3398: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26619);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26619);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3399; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3399: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26619);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 1 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26619);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3400; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3400: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26619);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,func_mid(_FUNC_IDE2_STRING_C, 2 ,_FUNC_IDE2_STRING_C->len- 5 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26622);}while(r); do{ *_FUNC_IDE2_LONG_L=string2l(qbs_right(_FUNC_IDE2_STRING_C, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26625);}while(r); S_29638:; if ((-(*_FUNC_IDE2_LONG_L!= 0 ))||new_error){ if(qbevent){evnt(26625);if(r)goto S_29638;} do{ *__LONG_IDEFOCUSLINE=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(26625);}while(r); } do{ *_FUNC_IDE2_LONG_X= 1 ; if(!qbevent)break;evnt(26627);}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 3 ; if(!qbevent)break;evnt(26628);}while(r); S_29643:; if (((-(*_FUNC_IDE2_LONG_L!= 0 ))&(-(*__LONG_IDECY==*_FUNC_IDE2_LONG_L)))||new_error){ if(qbevent){evnt(26630);if(r)goto S_29643;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,qbs_new_txt_len(" on current line",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26630);}while(r); } S_29646:; fornext_value3403= 1 ; fornext_finalvalue3403=_FUNC_IDE2_STRING_A->len; fornext_step3403= 1 ; if (fornext_step3403<0) fornext_step_negative3403=1; else fornext_step_negative3403=0; if (new_error) goto fornext_error3403; goto fornext_entrylabel3403; while(1){ fornext_value3403=fornext_step3403+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3403: *_FUNC_IDE2_LONG_I=fornext_value3403; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3403){ if (fornext_value3403fornext_finalvalue3403) break; } fornext_error3403:; if(qbevent){evnt(26632);if(r)goto S_29646;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(26633);}while(r); S_29648:; if ((-(*_FUNC_IDE2_LONG_X==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(26633);if(r)goto S_29648;} do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(26633);}while(r); do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y+ 1 ; if(!qbevent)break;evnt(26633);}while(r); } S_29652:; if ((-(*_FUNC_IDE2_LONG_Y>(*__LONG_IDEWY- 1 )))||new_error){ if(qbevent){evnt(26634);if(r)goto S_29652;} do{ goto fornext_exit_3402; if(!qbevent)break;evnt(26634);}while(r); } do{ qbg_sub_locate(*_FUNC_IDE2_LONG_Y,*_FUNC_IDE2_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26635);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I))); if (new_error) goto skip3405; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3405: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26636);}while(r); } fornext_exit_3402:; S_29658:; if (((-(*_FUNC_IDE2_LONG_L!= 0 ))&(-(*__LONG_IDECY!=*_FUNC_IDE2_LONG_L)))||new_error){ if(qbevent){evnt(26639);if(r)goto S_29658;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_new_txt_len(" on line",8),qbs_str((int32)(*_FUNC_IDE2_LONG_L)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26640);}while(r); do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(26641);}while(r); S_29661:; fornext_value3407= 1 ; fornext_finalvalue3407=_FUNC_IDE2_STRING_A->len; fornext_step3407= 1 ; if (fornext_step3407<0) fornext_step_negative3407=1; else fornext_step_negative3407=0; if (new_error) goto fornext_error3407; goto fornext_entrylabel3407; while(1){ fornext_value3407=fornext_step3407+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3407: *_FUNC_IDE2_LONG_I=fornext_value3407; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3407){ if (fornext_value3407fornext_finalvalue3407) break; } fornext_error3407:; if(qbevent){evnt(26642);if(r)goto S_29661;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(26643);}while(r); S_29663:; if ((-(*_FUNC_IDE2_LONG_X==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(26643);if(r)goto S_29663;} do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(26643);}while(r); do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y+ 1 ; if(!qbevent)break;evnt(26643);}while(r); } S_29667:; if ((-(*_FUNC_IDE2_LONG_Y>(*__LONG_IDEWY- 1 )))||new_error){ if(qbevent){evnt(26644);if(r)goto S_29667;} do{ goto fornext_exit_3406; if(!qbevent)break;evnt(26644);}while(r); } do{ qbg_sub_locate(*_FUNC_IDE2_LONG_Y,*_FUNC_IDE2_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26645);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I))); if (new_error) goto skip3409; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3409: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26646);}while(r); } fornext_exit_3406:; } } S_29675:; if ((*__INTEGER_IDECHANGEMADE)||new_error){ if(qbevent){evnt(26652);if(r)goto S_29675;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(26653);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26653);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3410; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3410: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26653);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26653);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3411; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3411: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26653);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 1 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26653);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3412; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3412: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26653);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26656);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("...",3)); if (new_error) goto skip3413; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3413: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26656);}while(r); } do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(26659);}while(r); S_29687:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(26661);if(r)goto S_29687;} do{ SUB_HELP_SHOWTEXT(); if(!qbevent)break;evnt(26666);}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEHBAR(&(pass3414= 2 ),&(pass3415=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ),&(pass3416=*__LONG_IDEWX- 2 ),__LONG_HELP_CX,&(pass3417=*__LONG_HELP_W+ 1 )); if(!qbevent)break;evnt(26668);}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3418=*__LONG_IDEWY+ 1 ),&(pass3419=*__LONG_IDESUBWINDOW- 2 ),__LONG_HELP_CY,&(pass3420=*__LONG_HELP_H+ 1 )); if(!qbevent)break;evnt(26669);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR,func_string( 1000 , 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26673);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR_I,func_string( 4000 , 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26674);}while(r); do{ *_FUNC_IDE2_LONG_TOP=func_ubound(__ARRAY_STRING_BACK,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26675);}while(r); S_29694:; fornext_value3422= 1 ; fornext_finalvalue3422=*_FUNC_IDE2_LONG_TOP; fornext_step3422= 1 ; if (fornext_step3422<0) fornext_step_negative3422=1; else fornext_step_negative3422=0; if (new_error) goto fornext_error3422; goto fornext_entrylabel3422; while(1){ fornext_value3422=fornext_step3422+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3422: *_FUNC_IDE2_LONG_X=fornext_value3422; if (fornext_step_negative3422){ if (fornext_value3422fornext_finalvalue3422) break; } fornext_error3422:; if(qbevent){evnt(26676);if(r)goto S_29694;} do{ qbs_set(_FUNC_IDE2_STRING_N,((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26677);}while(r); S_29696:; if ((-(*_FUNC_IDE2_LONG_X==*__LONG_HELP_BACK_POS))||new_error){ if(qbevent){evnt(26678);if(r)goto S_29696;} do{ *_FUNC_IDE2_LONG_P=_FUNC_IDE2_STRING_BACK_STR->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26678);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR,qbs_add(_FUNC_IDE2_STRING_BACK_STR,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26679);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR_I,qbs_add(_FUNC_IDE2_STRING_BACK_STR_I,l2string(*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26680);}while(r); S_29701:; fornext_value3425= 1 ; fornext_finalvalue3425=_FUNC_IDE2_STRING_N->len; fornext_step3425= 1 ; if (fornext_step3425<0) fornext_step_negative3425=1; else fornext_step_negative3425=0; if (new_error) goto fornext_error3425; goto fornext_entrylabel3425; while(1){ fornext_value3425=fornext_step3425+(*_FUNC_IDE2_LONG_X2); fornext_entrylabel3425: *_FUNC_IDE2_LONG_X2=fornext_value3425; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3425){ if (fornext_value3425fornext_finalvalue3425) break; } fornext_error3425:; if(qbevent){evnt(26681);if(r)goto S_29701;} do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR,qbs_add(_FUNC_IDE2_STRING_BACK_STR,func_chr(qbs_asc(_FUNC_IDE2_STRING_N,*_FUNC_IDE2_LONG_X2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26682);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR_I,qbs_add(_FUNC_IDE2_STRING_BACK_STR_I,l2string(*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26683);}while(r); } fornext_exit_3424:; do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR,qbs_add(_FUNC_IDE2_STRING_BACK_STR,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26685);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR_I,qbs_add(_FUNC_IDE2_STRING_BACK_STR_I,l2string(*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26686);}while(r); S_29707:; if ((-(*_FUNC_IDE2_LONG_X!=*_FUNC_IDE2_LONG_TOP))||new_error){ if(qbevent){evnt(26688);if(r)goto S_29707;} do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR,qbs_add(_FUNC_IDE2_STRING_BACK_STR,func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26689);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR_I,qbs_add(_FUNC_IDE2_STRING_BACK_STR_I,l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26690);}while(r); } } fornext_exit_3421:; do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR,qbs_add(_FUNC_IDE2_STRING_BACK_STR,func_string( 1000 , 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26693);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR_I,qbs_add(_FUNC_IDE2_STRING_BACK_STR_I,func_string( 4000 , 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26694);}while(r); do{ *_FUNC_IDE2_LONG_BACK_STR_POS=*_FUNC_IDE2_LONG_P-(*__LONG_IDEWX/ 2 )+((((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5])]))->len+ 2 )/ 2 )+( 3 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26695);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY, 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26698);}while(r); S_29716:; fornext_value3429=*_FUNC_IDE2_LONG_BACK_STR_POS; fornext_finalvalue3429=*_FUNC_IDE2_LONG_BACK_STR_POS+*__LONG_IDEWX- 6 ; fornext_step3429= 1 ; if (fornext_step3429<0) fornext_step_negative3429=1; else fornext_step_negative3429=0; if (new_error) goto fornext_error3429; goto fornext_entrylabel3429; while(1){ fornext_value3429=fornext_step3429+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3429: *_FUNC_IDE2_LONG_X=fornext_value3429; if (fornext_step_negative3429){ if (fornext_value3429fornext_finalvalue3429) break; } fornext_error3429:; if(qbevent){evnt(26699);if(r)goto S_29716;} do{ *_FUNC_IDE2_LONG_I=string2l(func_mid(_FUNC_IDE2_STRING_BACK_STR_I,((*_FUNC_IDE2_LONG_X- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26700);}while(r); do{ *_FUNC_IDE2_LONG_A=qbs_asc(_FUNC_IDE2_STRING_BACK_STR,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26701);}while(r); S_29719:; if ((*_FUNC_IDE2_LONG_A)||new_error){ if(qbevent){evnt(26702);if(r)goto S_29719;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(26703);}while(r); S_29721:; if ((-(*_FUNC_IDE2_LONG_I<*__LONG_HELP_BACK_POS))||new_error){ if(qbevent){evnt(26704);if(r)goto S_29721;} do{ qbg_sub_color( 9 , 7 ,NULL,3); if(!qbevent)break;evnt(26704);}while(r); } S_29724:; if ((-(*_FUNC_IDE2_LONG_I>*__LONG_HELP_BACK_POS))||new_error){ if(qbevent){evnt(26705);if(r)goto S_29724;} do{ qbg_sub_color( 9 , 7 ,NULL,3); if(!qbevent)break;evnt(26705);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(*_FUNC_IDE2_LONG_A)); if (new_error) goto skip3430; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3430: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26706);}while(r); }else{ do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(26708);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\304",1)); if (new_error) goto skip3431; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3431: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26709);}while(r); } } fornext_exit_3428:; do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26713);}while(r); S_29734:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HELP_SEARCH_STR->len))||new_error){ if(qbevent){evnt(26714);if(r)goto S_29734;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_HELP_SEARCH_STR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26715);}while(r); S_29736:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len> 20 )))||new_error){ if(qbevent){evnt(26716);if(r)goto S_29736;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_new_txt_len("\372\372\372",3),qbs_right(_FUNC_IDE2_STRING_A, 17 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26716);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("[",1),_FUNC_IDE2_STRING_A),qbs_new_txt_len("](DELETE=next)",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26717);}while(r); } do{ qbs_set(__STRING_IDEINFO,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26719);}while(r); } S_29743:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(26722);if(r)goto S_29743;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(26723);}while(r); do{ qbg_sub_locate( 2 ,*__LONG_IDEWX- 28 + 4 +_FUNC_IDE2_STRING_FINDTEXT->len,NULL,NULL,NULL,3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26724);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(26725);}while(r); } S_29748:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(26728);if(r)goto S_29748;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(26729);}while(r); do{ sub__palettecolor( 2 ,func__rgb32( 24 , 24 , 24 ),NULL,0); if(!qbevent)break;evnt(26730);}while(r); do{ qbg_sub_locate(*__LONG_HELP_CY-*__LONG_HELP_SY+*__LONG_HELP_WY1,*__LONG_HELP_CX-*__LONG_HELP_SX+*__LONG_HELP_WX1,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26731);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(26732);}while(r); } S_29754:; if ((-(*__LONG_IDESYSTEM!= 3 ))||new_error){ if(qbevent){evnt(26736);if(r)goto S_29754;} do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26736);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDEINFO); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26739);}while(r); S_29758:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len> 60 )))||new_error){ if(qbevent){evnt(26740);if(r)goto S_29758;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A, 57 ),qbs_new_txt_len("\372\372\372",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26740);}while(r); } S_29761:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len< 60 )))||new_error){ if(qbevent){evnt(26741);if(r)goto S_29761;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,func_space( 60 -_FUNC_IDE2_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26741);}while(r); } do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(26742);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW, 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26742);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_IDE2_STRING_A); if (new_error) goto skip3438; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3438: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26743);}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(26745);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(26748);}while(r); } S_29770:; if ((*__INTEGER_IDECHANGEMADE)||new_error){ if(qbevent){evnt(26754);if(r)goto S_29770;} S_29771:; if ((*__LONG_IDELAYOUTALLOW)||new_error){ if(qbevent){evnt(26756);if(r)goto S_29771;} do{ *__LONG_IDELAYOUTALLOW=*__LONG_IDELAYOUTALLOW- 1 ; if(!qbevent)break;evnt(26756);}while(r); } do{ *__LONG_IDECURRENTLINELAYOUTI= 0 ; if(!qbevent)break;evnt(26758);}while(r); do{ *__INTEGER_IDECHANGEMADE= 0 ; if(!qbevent)break;evnt(26760);}while(r); S_29776:; if ((-(*__LONG_IDEUNSAVED== -1 ))||new_error){ if(qbevent){evnt(26761);if(r)goto S_29776;} do{ *__LONG_IDEUNSAVED= 0 ; if(!qbevent)break;evnt(26761);}while(r); }else{ do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(26761);}while(r); } S_29781:; if ((-(*__LONG_IDENOUNDO== 0 ))||new_error){ if(qbevent){evnt(26763);if(r)goto S_29781;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26767);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A,l2string(*__LONG_IDESX)),l2string(*__LONG_IDESY))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26768);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A,l2string(*__LONG_IDECX)),l2string(*__LONG_IDECY))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26769);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_A,l2string(*__LONG_IDESELECT)),l2string(*__LONG_IDESELECTX1)),l2string(*__LONG_IDESELECTY1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26770);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,l2string(*__LONG_IDEN))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26771);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,l2string(*__LONG_IDEL))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26772);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,l2string(*__LONG_IDELI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26773);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,l2string(*__LONG_IDEBMKN))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26775);}while(r); S_29790:; fornext_value3440= 1 ; fornext_finalvalue3440=*__LONG_IDEBMKN; fornext_step3440= 1 ; if (fornext_step3440<0) fornext_step_negative3440=1; else fornext_step_negative3440=0; if (new_error) goto fornext_error3440; goto fornext_entrylabel3440; while(1){ fornext_value3440=fornext_step3440+(*_FUNC_IDE2_LONG_BI); fornext_entrylabel3440: *_FUNC_IDE2_LONG_BI=fornext_value3440; if (fornext_step_negative3440){ if (fornext_value3440fornext_finalvalue3440) break; } fornext_error3440:; if(qbevent){evnt(26776);if(r)goto S_29790;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A,l2string(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)))),l2string(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+4))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26776);}while(r); } fornext_exit_3439:; do{ *_FUNC_IDE2_LONG_L=__STRING_IDET->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26777);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,l2string(*_FUNC_IDE2_LONG_L))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26778);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_add(l2string(*_FUNC_IDE2_LONG_L+_FUNC_IDE2_STRING_A->len),_FUNC_IDE2_STRING_A),__STRING_IDET),l2string(*_FUNC_IDE2_LONG_L+_FUNC_IDE2_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26779);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("undo2.bin",9)), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26783);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26785);}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26785);}while(r); do{ *_FUNC_IDE2_LONG_P1=string2l(func_mid(_FUNC_IDE2_STRING_H, 1 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26785);}while(r); do{ *_FUNC_IDE2_LONG_P2=string2l(func_mid(_FUNC_IDE2_STRING_H, 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26785);}while(r); do{ *_FUNC_IDE2_LONG_PLAST=string2l(func_mid(_FUNC_IDE2_STRING_H, 9 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26785);}while(r); S_29802:; if ((*__LONG_IDEMERGEUNDO)||new_error){ if(qbevent){evnt(26787);if(r)goto S_29802;} do{ *__LONG_IDEMERGEUNDO= 0 ; if(!qbevent)break;evnt(26788);}while(r); S_29804:; if ((-(*_FUNC_IDE2_LONG_P2!=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(26789);if(r)goto S_29804;} S_29805:; if ((-(*_FUNC_IDE2_LONG_P2== 13 ))||new_error){ if(qbevent){evnt(26790);if(r)goto S_29805;} do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_PLAST; if(!qbevent)break;evnt(26791);}while(r); }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P2- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_PP2L,4,byte_element_3444),1); if(!qbevent)break;evnt(26794);}while(r); do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_P2- 4 -*_FUNC_IDE2_LONG_PP2L- 4 ; if(!qbevent)break;evnt(26795);}while(r); } } } S_29813:; if ((-(*_FUNC_IDE2_LONG_P1== 0 ))||new_error){ if(qbevent){evnt(26800);if(r)goto S_29813;} do{ *_FUNC_IDE2_LONG_P1= 13 ; if(!qbevent)break;evnt(26801);}while(r); do{ *_FUNC_IDE2_LONG_P2= 13 ; if(!qbevent)break;evnt(26801);}while(r); }else{ S_29817:; if ((-(*_FUNC_IDE2_LONG_P2>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(26803);if(r)goto S_29817;} S_29818:; if ((-(*_FUNC_IDE2_LONG_P2>=(*__LONG_IDEBACKUPSIZE* 1000000 )))||new_error){ if(qbevent){evnt(26806);if(r)goto S_29818;} do{ *_FUNC_IDE2_LONG_PLAST=*_FUNC_IDE2_LONG_P2; if(!qbevent)break;evnt(26809);}while(r); do{ *_FUNC_IDE2_LONG_P2= 13 ; if(!qbevent)break;evnt(26810);}while(r); S_29821:; while((qbs_cleanup(qbs_tmp_base,-((*_FUNC_IDE2_LONG_P2+_FUNC_IDE2_STRING_A->len- 1 )>=*_FUNC_IDE2_LONG_P1)))||new_error){ if(qbevent){evnt(26812);if(r)goto S_29821;} S_29822:; if ((-(*_FUNC_IDE2_LONG_P1==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(26813);if(r)goto S_29822;} do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(26813);}while(r); } do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P1,byte_element((uint64)_FUNC_IDE2_LONG_P1L,4,byte_element_3447),1); if(!qbevent)break;evnt(26816);}while(r); do{ *_FUNC_IDE2_LONG_P1=*_FUNC_IDE2_LONG_P1+ 4 +*_FUNC_IDE2_LONG_P1L+ 4 ; if(!qbevent)break;evnt(26817);}while(r); } dl_exit_3446:; }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P2,byte_element((uint64)_FUNC_IDE2_LONG_P2L,4,byte_element_3448),1); if(!qbevent)break;evnt(26823);}while(r); do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_P2+ 4 +*_FUNC_IDE2_LONG_P2L+ 4 ; if(!qbevent)break;evnt(26824);}while(r); } }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P2,byte_element((uint64)_FUNC_IDE2_LONG_P2L,4,byte_element_3449),1); if(!qbevent)break;evnt(26830);}while(r); do{ *_FUNC_IDE2_LONG_OP2=*_FUNC_IDE2_LONG_P2; if(!qbevent)break;evnt(26831);}while(r); do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_P2+ 4 +*_FUNC_IDE2_LONG_P2L+ 4 ; if(!qbevent)break;evnt(26832);}while(r); S_29836:; while((qbs_cleanup(qbs_tmp_base,-((*_FUNC_IDE2_LONG_P2+_FUNC_IDE2_STRING_A->len- 1 )>=*_FUNC_IDE2_LONG_P1)))||new_error){ if(qbevent){evnt(26834);if(r)goto S_29836;} S_29837:; if ((-(*_FUNC_IDE2_LONG_P1==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(26835);if(r)goto S_29837;} do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(26835);}while(r); } S_29840:; if ((-(*_FUNC_IDE2_LONG_P1==*_FUNC_IDE2_LONG_PLAST))||new_error){ if(qbevent){evnt(26837);if(r)goto S_29840;} do{ *_FUNC_IDE2_LONG_P1= 13 ; if(!qbevent)break;evnt(26838);}while(r); do{ goto dl_exit_3451; if(!qbevent)break;evnt(26839);}while(r); }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P1,byte_element((uint64)_FUNC_IDE2_LONG_P1L,4,byte_element_3452),1); if(!qbevent)break;evnt(26841);}while(r); do{ *_FUNC_IDE2_LONG_P1=*_FUNC_IDE2_LONG_P1+ 4 +*_FUNC_IDE2_LONG_P1L+ 4 ; if(!qbevent)break;evnt(26842);}while(r); } } dl_exit_3451:; S_29848:; if ((-(*_FUNC_IDE2_LONG_P2>=(*__LONG_IDEBACKUPSIZE* 1000000 )))||new_error){ if(qbevent){evnt(26846);if(r)goto S_29848;} do{ *_FUNC_IDE2_LONG_PLAST=*_FUNC_IDE2_LONG_OP2; if(!qbevent)break;evnt(26849);}while(r); do{ *_FUNC_IDE2_LONG_P2= 13 ; if(!qbevent)break;evnt(26850);}while(r); S_29851:; while((qbs_cleanup(qbs_tmp_base,-((*_FUNC_IDE2_LONG_P2+_FUNC_IDE2_STRING_A->len- 1 )>=*_FUNC_IDE2_LONG_P1)))||new_error){ if(qbevent){evnt(26852);if(r)goto S_29851;} S_29852:; if ((-(*_FUNC_IDE2_LONG_P1==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(26853);if(r)goto S_29852;} do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(26853);}while(r); } do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P1,byte_element((uint64)_FUNC_IDE2_LONG_P1L,4,byte_element_3455),1); if(!qbevent)break;evnt(26856);}while(r); do{ *_FUNC_IDE2_LONG_P1=*_FUNC_IDE2_LONG_P1+ 4 +*_FUNC_IDE2_LONG_P1L+ 4 ; if(!qbevent)break;evnt(26857);}while(r); } dl_exit_3454:; } } } do{ qbs_set(_FUNC_IDE2_STRING_H,qbs_add(qbs_add(l2string(*_FUNC_IDE2_LONG_P1),l2string(*_FUNC_IDE2_LONG_P2)),l2string(*_FUNC_IDE2_LONG_PLAST))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26865);}while(r); do{ sub_put2( 150 , 1 ,byte_element((uint64)_FUNC_IDE2_STRING_H->chr,_FUNC_IDE2_STRING_H->len,byte_element_3456),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26866);}while(r); do{ sub_put2( 150 ,*_FUNC_IDE2_LONG_P2,byte_element((uint64)_FUNC_IDE2_STRING_A->chr,_FUNC_IDE2_STRING_A->len,byte_element_3457),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26869);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(26871);}while(r); do{ *__LONG_IDEUNDOPOS=*_FUNC_IDE2_LONG_P2; if(!qbevent)break;evnt(26873);}while(r); S_29866:; if ((-(*__LONG_IDEUNDOBASE== 0 ))||new_error){ if(qbevent){evnt(26874);if(r)goto S_29866;} do{ *__LONG_IDEUNDOBASE=*__LONG_IDEUNDOPOS; if(!qbevent)break;evnt(26874);}while(r); } S_29869:; if ((-(*__LONG_IDEUNDOFLAG== 0 ))||new_error){ if(qbevent){evnt(26877);if(r)goto S_29869;} do{ *__LONG_IDEUNDOFLAG= 1 ; if(!qbevent)break;evnt(26878);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("autosave.bin",12)), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26879);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,func_chr( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26879);}while(r); do{ sub_put2( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_STRING_A->chr,_FUNC_IDE2_STRING_A->len,byte_element_3458),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26879);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(26879);}while(r); } }else{ do{ *__LONG_IDENOUNDO= 0 ; if(!qbevent)break;evnt(26883);}while(r); } do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(26887);}while(r); do{ *__LONG_IDECOMPILING= 1 ; if(!qbevent)break;evnt(26888);}while(r); do{ *_FUNC_IDE2_LONG_IDE2= 2 ; if(!qbevent)break;evnt(26889);}while(r); do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(&(pass3459= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26890);}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26891);}while(r); do{ *__LONG_IDECOMPILEDLINE= 1 ; if(!qbevent)break;evnt(26892);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(26893);}while(r); } do{ *_FUNC_IDE2_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(26911);}while(r); LABEL_WAITFORINPUT:; if(qbevent){evnt(26912);r=0;} S_29888:; if ((*__LONG_IDECURRENTLINELAYOUTI)||new_error){ if(qbevent){evnt(26914);if(r)goto S_29888;} S_29889:; if ((-(*__LONG_IDECY!=*__LONG_IDECURRENTLINELAYOUTI))||new_error){ if(qbevent){evnt(26915);if(r)goto S_29889;} do{ SUB_IDESETLINE(__LONG_IDECURRENTLINELAYOUTI,__STRING_IDECURRENTLINELAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26916);}while(r); do{ *__LONG_IDECURRENTLINELAYOUTI= 0 ; if(!qbevent)break;evnt(26917);}while(r); do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26918);}while(r); } } do{ *_FUNC_IDE2_LONG_EXITVALUE=func__exit(); if(!qbevent)break;evnt(26922);}while(r); S_29896:; if (((-((*_FUNC_IDE2_LONG_EXITVALUE& 1 )!= 0 ))|(-(*__LONG_IDEEXIT!= 0 )))||new_error){ if(qbevent){evnt(26923);if(r)goto S_29896;} do{ *__LONG_IDEEXIT= 0 ; if(!qbevent)break;evnt(26923);}while(r); do{ goto LABEL_QUICKEXIT; if(!qbevent)break;evnt(26923);}while(r); } S_29900:; if ((*__LONG_UPDATEHANDLE)||new_error){ if(qbevent){evnt(26925);if(r)goto S_29900;} do{ SUB_CONTINUEDOWNLOADS(); if(!qbevent)break;evnt(26926);}while(r); S_29902:; if ((-(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))== 2 ))||new_error){ if(qbevent){evnt(26927);if(r)goto S_29902;} do{ SUB_UPDATE(&(pass3460= 0 )); if(!qbevent)break;evnt(26928);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(26929);}while(r); do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26930);}while(r); }else{ S_29907:; if ((-(func_abs((float)(func_timer(NULL,0)-*__SINGLE_IDEUPDATETIMERVAL))>= 5 ))||new_error){ if(qbevent){evnt(26932);if(r)goto S_29907;} do{ sub_close(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8+4)),1); if(!qbevent)break;evnt(26933);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))= 0 ; if(!qbevent)break;evnt(26933);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(26933);}while(r); } } } do{ SUB_GETINPUT(); if(!qbevent)break;evnt(26938);}while(r); S_29915:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(26939);if(r)goto S_29915;} S_29916:; if (((((-(*__LONG_MX!=*_FUNC_IDE2_LONG_MOX))|(-(*__LONG_MY!=*_FUNC_IDE2_LONG_MOY))))&(-(*__LONG_MB!= 0 )))||new_error){ if(qbevent){evnt(26940);if(r)goto S_29916;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26940);}while(r); } S_29919:; if ((-(*__LONG_MB!=*__LONG_MOB))||new_error){ if(qbevent){evnt(26941);if(r)goto S_29919;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26941);}while(r); } S_29922:; if ((-(*__LONG_MB2!=*__LONG_MOB2))||new_error){ if(qbevent){evnt(26942);if(r)goto S_29922;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26942);}while(r); } S_29925:; if (((-(*__LONG_MCLICK!= 0 ))|(-(*__LONG_MCLICK2!= 0 )))||new_error){ if(qbevent){evnt(26943);if(r)goto S_29925;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26943);}while(r); } S_29928:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(26944);if(r)goto S_29928;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26944);}while(r); } S_29931:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(26945);if(r)goto S_29931;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26945);}while(r); } S_29934:; if ((*__LONG_KSTATECHANGED)||new_error){ if(qbevent){evnt(26946);if(r)goto S_29934;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26946);}while(r); } } S_29938:; if (((-(*__LONG_MB!= 0 ))&(-(*__LONG_IDEMBMONITOR== 1 )))||new_error){ if(qbevent){evnt(26948);if(r)goto S_29938;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(26948);}while(r); } S_29941:; if ((-(*__LONG_MB== 0 ))||new_error){ if(qbevent){evnt(26949);if(r)goto S_29941;} do{ *__LONG_IDEMOUSESELECT= 0 ; if(!qbevent)break;evnt(26949);}while(r); do{ *__LONG_IDEMBMONITOR= 0 ; if(!qbevent)break;evnt(26949);}while(r); } S_29945:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(26952);if(r)goto S_29945;} S_29946:; if (((-(*__LONG_IDEALTHIGHLIGHT== 0 ))&(-(*__LONG_KALTPRESS== -1 )))||new_error){ if(qbevent){evnt(26954);if(r)goto S_29946;} do{ *__LONG_IDEALTHIGHLIGHT= 1 ; if(!qbevent)break;evnt(26956);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(26957);}while(r); do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(26957);}while(r); do{ *_FUNC_IDE2_LONG_X= 4 ; if(!qbevent)break;evnt(26957);}while(r); S_29951:; fornext_value3462= 1 ; fornext_finalvalue3462=*__INTEGER_MENUS; fornext_step3462= 1 ; if (fornext_step3462<0) fornext_step_negative3462=1; else fornext_step_negative3462=0; if (new_error) goto fornext_error3462; goto fornext_entrylabel3462; while(1){ fornext_value3462=fornext_step3462+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3462: *_FUNC_IDE2_LONG_I=fornext_value3462; if (fornext_step_negative3462){ if (fornext_value3462fornext_finalvalue3462) break; } fornext_error3462:; if(qbevent){evnt(26958);if(r)goto S_29951;} do{ qbg_sub_locate( 1 ,*_FUNC_IDE2_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26959);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 1 )); if (new_error) goto skip3463; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3463: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26959);}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26960);}while(r); S_29955:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(26961);if(r)goto S_29955;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDEWX-((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_MENUS)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26961);}while(r); } } fornext_exit_3461:; do{ *__LONG_IDEENTERMENU= 1 ; if(!qbevent)break;evnt(26963);}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(26965);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(26965);}while(r); } }else{ S_29964:; if ((-(*__LONG_IDEALTHIGHLIGHT== 1 ))||new_error){ if(qbevent){evnt(26970);if(r)goto S_29964;} do{ *__LONG_IDEALTHIGHLIGHT= 0 ; if(!qbevent)break;evnt(26972);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(26973);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(26973);}while(r); do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(26973);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3466; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3466: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26973);}while(r); S_29970:; if (((-(*__LONG_IDEENTERMENU== 1 ))&(-(*__LONG_KCONTROL== 0 )))||new_error){ if(qbevent){evnt(26974);if(r)goto S_29970;} do{ qbg_sub_locate(NULL,NULL,NULL, 8 , 8 ,24); if(!qbevent)break;evnt(26975);}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(26975);}while(r); do{ *__LONG_IDEENTERMENU= 0 ; if(!qbevent)break;evnt(26975);}while(r); do{ goto LABEL_STARTMENU; if(!qbevent)break;evnt(26975);}while(r); } } } S_29978:; if ((-(*_FUNC_IDE2_LONG_CHANGE== 0 ))||new_error){ if(qbevent){evnt(26981);if(r)goto S_29978;} S_29979:; if ((*__LONG_IDECOMPILING)||new_error){ if(qbevent){evnt(26984);if(r)goto S_29979;} S_29980:; if ((*_FUNC_IDE2_LONG_SENDNEXTLINE)||new_error){ if(qbevent){evnt(26985);if(r)goto S_29980;} S_29981:; if ((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDEN))||new_error){ if(qbevent){evnt(26986);if(r)goto S_29981;} do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE+ 1 ; if(!qbevent)break;evnt(26987);}while(r); do{ *_FUNC_IDE2_LONG_IDE2= 4 ; if(!qbevent)break;evnt(26988);}while(r); S_29984:; if ((*_FUNC_IDE2_LONG_PASSBACK)||new_error){ if(qbevent){evnt(26989);if(r)goto S_29984;} do{ qbs_set(__STRING_IDECOMPILEDLINE,_FUNC_IDE2_STRING_PASSBACK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26990);}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26991);}while(r); }else{ do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(__LONG_IDECOMPILEDLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26993);}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26994);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(26996);}while(r); }else{ do{ *_FUNC_IDE2_LONG_IDE2= 5 ; if(!qbevent)break;evnt(26999);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(27003);}while(r); } } } do{ sub__limit( 16 ); if(!qbevent)break;evnt(27008);}while(r); do{ goto LABEL_WAITFORINPUT; if(!qbevent)break;evnt(27010);}while(r); } do{ *__LONG_IDEENTERMENU= 0 ; if(!qbevent)break;evnt(27013);}while(r); do{ *__LONG_IDEUNDOCOMBO=*__LONG_IDEUNDOCOMBO- 1 ; if(!qbevent)break;evnt(27015);}while(r); S_30003:; if ((-(*__LONG_IDEUNDOCOMBO< 0 ))||new_error){ if(qbevent){evnt(27016);if(r)goto S_30003;} do{ *__LONG_IDEUNDOCOMBO= 0 ; if(!qbevent)break;evnt(27016);}while(r); } do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(27018);}while(r); S_30007:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27022);if(r)goto S_30007;} S_30008:; if (((-(*__LONG_MX>= 2 ))&(-(*__LONG_MX<=*__LONG_IDEWX))&(-(*__LONG_MY>=(*__LONG_IDEWY- 3 )))&(-(*__LONG_MY<=(*__LONG_IDEWY- 1 ))))||new_error){ if(qbevent){evnt(27023);if(r)goto S_30008;} S_30009:; if ((-((func_screen(*__LONG_MY,*__LONG_MX, 1 ,1))==(( 11 )+( 1 * 16 ))))||new_error){ if(qbevent){evnt(27024);if(r)goto S_30009;} S_30010:; if ((*__LONG_IDEFOCUSLINE)||new_error){ if(qbevent){evnt(27025);if(r)goto S_30010;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(27025);}while(r); do{ *__LONG_IDECY=*__LONG_IDEFOCUSLINE; if(!qbevent)break;evnt(27025);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(27025);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27025);}while(r); } } } } S_30019:; if (((-(*__LONG_KB== 16128 ))&*__LONG_KCTRL)||new_error){ if(qbevent){evnt(27030);if(r)goto S_30019;} LABEL_IDEMDETACHED:; if(qbevent){evnt(27031);r=0;} do{ *__LONG_IDERUNMODE= 1 ; if(!qbevent)break;evnt(27032);}while(r); do{ goto LABEL_IDEMRUNSPECIAL; if(!qbevent)break;evnt(27033);}while(r); } S_30023:; if ((-(*__LONG_KB== 34048 ))||new_error){ if(qbevent){evnt(27036);if(r)goto S_30023;} LABEL_IDEMEXE:; if(qbevent){evnt(27037);r=0;} do{ *__LONG_IDERUNMODE= 2 ; if(!qbevent)break;evnt(27038);}while(r); do{ goto LABEL_IDEMRUNSPECIAL; if(!qbevent)break;evnt(27039);}while(r); } S_30027:; if ((-(*__LONG_KB== 16128 ))||new_error){ if(qbevent){evnt(27042);if(r)goto S_30027;} LABEL_IDEMRUN:; if(qbevent){evnt(27043);r=0;} do{ *__LONG_IDERUNMODE= 0 ; if(!qbevent)break;evnt(27044);}while(r); LABEL_IDEMRUNSPECIAL:; if(qbevent){evnt(27045);r=0;} S_30029:; if ((*_FUNC_IDE2_LONG_READY)||new_error){ if(qbevent){evnt(27048);if(r)goto S_30029;} do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(27050);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(27051);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27051);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3467; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3467: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27051);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27051);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3468; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3468: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27051);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 1 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27051);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3469; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3469: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27051);}while(r); S_30038:; if ((*__LONG_IDECOMPILED)||new_error){ if(qbevent){evnt(27053);if(r)goto S_30038;} S_30039:; if ((-(*__LONG_IDERUNMODE== 2 ))||new_error){ if(qbevent){evnt(27055);if(r)goto S_30039;} do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27056);}while(r); S_30041:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(27058);if(r)goto S_30041;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Already created executable file!",32)); if (new_error) goto skip3470; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3470: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27059);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Already created .EXE file!",26)); if (new_error) goto skip3471; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3471: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27061);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27064);}while(r); } do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27067);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Starting program...",19)); if (new_error) goto skip3472; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3472: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27067);}while(r); }else{ S_30051:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(27070);if(r)goto S_30051;} do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27071);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Creating executable file...",27)); if (new_error) goto skip3473; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3473: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27071);}while(r); }else{ do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27073);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Creating .EXE file...",21)); if (new_error) goto skip3474; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3474: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27073);}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(27077);}while(r); S_30060:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(27081);if(r)goto S_30060;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27082);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_F,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27084);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,FUNC_REMOVEFILEEXTENSION(_FUNC_IDE2_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27085);}while(r); } do{ *_FUNC_IDE2_LONG_IDE2= 9 ; if(!qbevent)break;evnt(27087);}while(r); do{ qbs_set(__STRING_IDERETURN,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27087);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(27088);}while(r); } S_30070:; if ((-(*_FUNC_IDE2_LONG_FAILED== 1 ))||new_error){ if(qbevent){evnt(27091);if(r)goto S_30070;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27091);}while(r); } do{ *__LONG_IDEAUTORUN= 1 ; if(!qbevent)break;evnt(27093);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(27096);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(27097);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27097);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3475; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3475: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27097);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 2 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27097);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3476; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3476: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27097);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 1 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27097);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*__LONG_IDEWX- 2 )); if (new_error) goto skip3477; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3477: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27097);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27100);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Checking program... (editing program will cancel request)",57)); if (new_error) goto skip3478; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3478: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27100);}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(27103);}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(27104);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(27105);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27107);}while(r); } do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(27110);}while(r); do{ qbg_sub_locate(NULL,NULL,NULL, 8 , 8 ,24); if(!qbevent)break;evnt(27111);}while(r); S_30091:; if ((*__LONG_MCLICK&(-(*__LONG_IDEMOUSESELECT== 0 )))||new_error){ if(qbevent){evnt(27113);if(r)goto S_30091;} S_30092:; if ((-(*__LONG_MY== 1 ))||new_error){ if(qbevent){evnt(27114);if(r)goto S_30092;} do{ *_FUNC_IDE2_LONG_X= 3 ; if(!qbevent)break;evnt(27115);}while(r); S_30094:; fornext_value3480= 1 ; fornext_finalvalue3480=*__INTEGER_MENUS; fornext_step3480= 1 ; if (fornext_step3480<0) fornext_step_negative3480=1; else fornext_step_negative3480=0; if (new_error) goto fornext_error3480; goto fornext_entrylabel3480; while(1){ fornext_value3480=fornext_step3480+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3480: *_FUNC_IDE2_LONG_I=fornext_value3480; if (fornext_step_negative3480){ if (fornext_value3480fornext_finalvalue3480) break; } fornext_error3480:; if(qbevent){evnt(27116);if(r)goto S_30094;} do{ *_FUNC_IDE2_LONG_X2=((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27117);}while(r); S_30096:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<(*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2))))||new_error){ if(qbevent){evnt(27118);if(r)goto S_30096;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(27119);}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(27120);}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(27122);}while(r); S_30101:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(27123);if(r)goto S_30101;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDEWX-((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_MENUS)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len- 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27123);}while(r); } } fornext_exit_3479:; } } S_30107:; fornext_value3484= 1 ; fornext_finalvalue3484=*__INTEGER_MENUS; fornext_step3484= 1 ; if (fornext_step3484<0) fornext_step_negative3484=1; else fornext_step_negative3484=0; if (new_error) goto fornext_error3484; goto fornext_entrylabel3484; while(1){ fornext_value3484=fornext_step3484+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3484: *_FUNC_IDE2_LONG_I=fornext_value3484; if (fornext_step_negative3484){ if (fornext_value3484fornext_finalvalue3484) break; } fornext_error3484:; if(qbevent){evnt(27128);if(r)goto S_30107;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_ucase(qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27129);}while(r); S_30109:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KALT&(qbs_equal(qbs_ucase(__STRING_K),_FUNC_IDE2_STRING_A))))||new_error){ if(qbevent){evnt(27130);if(r)goto S_30109;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(27131);}while(r); do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(27132);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(27132);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3485; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3485: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27132);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(27133);}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(27134);}while(r); } } fornext_exit_3483:; S_30118:; if ((-(*__LONG_KB== 15616 ))||new_error){ if(qbevent){evnt(27139);if(r)goto S_30118;} S_30119:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(27140);if(r)goto S_30119;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27140);}while(r); } LABEL_IDEMF3:; if(qbevent){evnt(27141);r=0;} S_30122:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDEFINDTEXT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(27142);if(r)goto S_30122;} S_30123:; if ((*__LONG_KSHIFT)||new_error){ if(qbevent){evnt(27143);if(r)goto S_30123;} do{ *__INTEGER_IDEFINDINVERT= 1 ; if(!qbevent)break;evnt(27143);}while(r); } do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27144);}while(r); do{ SUB_IDEFINDAGAIN(); if(!qbevent)break;evnt(27145);}while(r); }else{ do{ goto LABEL_IDEFINDJMP; if(!qbevent)break;evnt(27147);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27149);}while(r); } S_30133:; if ((*__LONG_KSHIFT&(-(*__LONG_KB== 15104 )))||new_error){ if(qbevent){evnt(27152);if(r)goto S_30133;} S_30134:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(27153);if(r)goto S_30134;} do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(27154);}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(27154);}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(27155);}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(27155);}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(27155);}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(27155);}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(27155);}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(27155);}while(r); do{ *__LONG_IDEHELP= 1 ; if(!qbevent)break;evnt(27156);}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(27157);}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(27158);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(27159);}while(r); do{ goto LABEL_REDRAWEVERYTHING2; if(!qbevent)break;evnt(27159);}while(r); } do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(27161);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27162);}while(r); } do{ if(!qbevent)break;evnt(27167);}while(r); S_30153:; if ((-(*__LONG_MB== 0 ))||new_error){ if(qbevent){evnt(27169);if(r)goto S_30153;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR= 0 ; if(!qbevent)break;evnt(27169);}while(r); } S_30156:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(27170);if(r)goto S_30156;} S_30157:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(27171);if(r)goto S_30157;} S_30158:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27174);if(r)goto S_30158;} S_30159:; if (((-(*__LONG_MX>= 2 ))&(-(*__LONG_MX<=(*__LONG_IDEWX- 1 )))&(-(*__LONG_MY==(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ))))||new_error){ if(qbevent){evnt(27175);if(r)goto S_30159;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR= 1 ; if(!qbevent)break;evnt(27176);}while(r); do{ *_FUNC_IDE2_LONG_V=FUNC_IDEHBAR(&(pass3486= 2 ),&(pass3487=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ),&(pass3488=*__LONG_IDEWX- 2 ),__LONG_HELP_CX,&(pass3489=*__LONG_HELP_W+ 1 )); if(!qbevent)break;evnt(27177);}while(r); S_30162:; if ((-(*_FUNC_IDE2_LONG_V!=*__LONG_MX))||new_error){ if(qbevent){evnt(27178);if(r)goto S_30162;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 3 ; if(!qbevent)break;evnt(27178);}while(r); }else{ do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 4 ; if(!qbevent)break;evnt(27178);}while(r); } S_30167:; if ((-(*__LONG_MX== 2 ))||new_error){ if(qbevent){evnt(27179);if(r)goto S_30167;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 1 ; if(!qbevent)break;evnt(27179);}while(r); } S_30170:; if ((-(*__LONG_MX==(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(27180);if(r)goto S_30170;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 2 ; if(!qbevent)break;evnt(27180);}while(r); } } S_30174:; if (((-(*__LONG_MY>=(*__LONG_IDEWY+ 1 )))&(-(*__LONG_MY<=(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 )))&(-(*__LONG_MX==*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(27182);if(r)goto S_30174;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR= 2 ; if(!qbevent)break;evnt(27183);}while(r); do{ *_FUNC_IDE2_LONG_V=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3490=*__LONG_IDEWY+ 1 ),&(pass3491=*__LONG_IDESUBWINDOW- 2 ),__LONG_HELP_CY,&(pass3492=*__LONG_HELP_H+ 1 )); if(!qbevent)break;evnt(27184);}while(r); S_30177:; if ((-(*_FUNC_IDE2_LONG_V!=*__LONG_MY))||new_error){ if(qbevent){evnt(27185);if(r)goto S_30177;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 3 ; if(!qbevent)break;evnt(27185);}while(r); }else{ do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 4 ; if(!qbevent)break;evnt(27185);}while(r); } S_30182:; if ((-(*__LONG_MY==(*__LONG_IDEWY+ 1 )))||new_error){ if(qbevent){evnt(27186);if(r)goto S_30182;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 1 ; if(!qbevent)break;evnt(27186);}while(r); } S_30185:; if ((-(*__LONG_MY==(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 )))||new_error){ if(qbevent){evnt(27187);if(r)goto S_30185;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 2 ; if(!qbevent)break;evnt(27187);}while(r); } } } S_30190:; if ((*_FUNC_IDE2_LONG_HELP_SCROLLBAR)||new_error){ if(qbevent){evnt(27191);if(r)goto S_30190;} do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(27192);}while(r); S_30192:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 1 ))||new_error){ if(qbevent){evnt(27193);if(r)goto S_30192;} S_30193:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(27194);if(r)goto S_30193;} do{ *__LONG_KB= 19200 ; if(!qbevent)break;evnt(27194);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27194);}while(r); } S_30197:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(27195);if(r)goto S_30197;} do{ *__LONG_KB= 18432 ; if(!qbevent)break;evnt(27195);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27195);}while(r); } } S_30202:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 2 ))||new_error){ if(qbevent){evnt(27197);if(r)goto S_30202;} S_30203:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(27198);if(r)goto S_30203;} do{ *__LONG_KB= 19712 ; if(!qbevent)break;evnt(27198);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27198);}while(r); } S_30207:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(27199);if(r)goto S_30207;} do{ *__LONG_KB= 20480 ; if(!qbevent)break;evnt(27199);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27199);}while(r); } } S_30212:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 3 ))||new_error){ if(qbevent){evnt(27201);if(r)goto S_30212;} S_30213:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(27202);if(r)goto S_30213;} do{ *_FUNC_IDE2_LONG_V=FUNC_IDEHBAR(&(pass3493= 2 ),&(pass3494=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ),&(pass3495=*__LONG_IDEWX- 2 ),__LONG_HELP_CX,&(pass3496=*__LONG_HELP_W+ 1 )); if(!qbevent)break;evnt(27203);}while(r); S_30215:; if ((-(*__LONG_MX<*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(27204);if(r)goto S_30215;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX- 8 ; if(!qbevent)break;evnt(27205);}while(r); S_30217:; if ((-(*__LONG_HELP_CX< 1 ))||new_error){ if(qbevent){evnt(27206);if(r)goto S_30217;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27206);}while(r); } S_30220:; if ((-(*__LONG_HELP_SX>*__LONG_HELP_CX))||new_error){ if(qbevent){evnt(27207);if(r)goto S_30220;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX; if(!qbevent)break;evnt(27207);}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27208);}while(r); } S_30225:; if ((-(*__LONG_MX>*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(27210);if(r)goto S_30225;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX+ 8 ; if(!qbevent)break;evnt(27211);}while(r); S_30227:; if ((-(*__LONG_HELP_CX>(*__LONG_HELP_W+ 1 )))||new_error){ if(qbevent){evnt(27212);if(r)goto S_30227;} do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(27212);}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27213);}while(r); } } S_30233:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(27216);if(r)goto S_30233;} do{ *_FUNC_IDE2_LONG_V=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3497=*__LONG_IDEWY+ 1 ),&(pass3498=*__LONG_IDESUBWINDOW- 2 ),__LONG_HELP_CY,&(pass3499=*__LONG_HELP_H+ 1 )); if(!qbevent)break;evnt(27217);}while(r); S_30235:; if ((-(*__LONG_MY<*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(27218);if(r)goto S_30235;} do{ *__LONG_KB= 18688 ; if(!qbevent)break;evnt(27218);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27218);}while(r); } S_30239:; if ((-(*__LONG_MY>*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(27219);if(r)goto S_30239;} do{ *__LONG_KB= 20736 ; if(!qbevent)break;evnt(27219);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(27219);}while(r); } } } S_30245:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 4 ))||new_error){ if(qbevent){evnt(27226);if(r)goto S_30245;} S_30246:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(27227);if(r)goto S_30246;} S_30247:; if ((-(*__LONG_HELP_W> 1 ))||new_error){ if(qbevent){evnt(27228);if(r)goto S_30247;} S_30248:; if ((-(*__LONG_MX<= 3 ))||new_error){ if(qbevent){evnt(27229);if(r)goto S_30248;} do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(27230);}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27230);}while(r); S_30251:; }else{ if (-(*__LONG_MX>=(*__LONG_IDEWX- 2 ))){ if(qbevent){evnt(27231);if(r)goto S_30251;} do{ *__LONG_HELP_SX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(27232);}while(r); do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(27232);}while(r); }else{ do{ *_FUNC_IDE2_LONG_X=*__LONG_MX; if(!qbevent)break;evnt(27234);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_X- 4 + 0.5E+0 ; if(!qbevent)break;evnt(27235);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ (*__LONG_IDEWX- 3 - 3 ); if(!qbevent)break;evnt(27236);}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P**__LONG_HELP_W)+( 1 )); if(!qbevent)break;evnt(27237);}while(r); do{ *__LONG_HELP_SX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(27238);}while(r); do{ *__LONG_HELP_CX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(27238);}while(r); } } } } S_30264:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(27242);if(r)goto S_30264;} S_30265:; if ((-(*__LONG_HELP_H> 1 ))||new_error){ if(qbevent){evnt(27243);if(r)goto S_30265;} S_30266:; if ((-(*__LONG_MY<=(*__LONG_IDEWY+ 2 )))||new_error){ if(qbevent){evnt(27245);if(r)goto S_30266;} do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(27246);}while(r); S_30268:; }else{ if (-(*__LONG_MY>=(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 3 ))){ if(qbevent){evnt(27247);if(r)goto S_30268;} do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(27248);}while(r); }else{ do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY; if(!qbevent)break;evnt(27250);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_Y-*__LONG_IDEWY- 3 + 0.5E+0 ; if(!qbevent)break;evnt(27251);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ (*__LONG_IDESUBWINDOW- 3 - 3 ); if(!qbevent)break;evnt(27252);}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P**__LONG_HELP_H)+( 1 )); if(!qbevent)break;evnt(27253);}while(r); do{ *__LONG_HELP_CY=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(27254);}while(r); } } S_30277:; if ((-(*__LONG_HELP_CX< 1 ))||new_error){ if(qbevent){evnt(27257);if(r)goto S_30277;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27257);}while(r); } S_30280:; if ((-(*__LONG_HELP_CX>(*__LONG_HELP_W+ 1 )))||new_error){ if(qbevent){evnt(27258);if(r)goto S_30280;} do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(27258);}while(r); } S_30283:; if ((-(*__LONG_HELP_CY< 1 ))||new_error){ if(qbevent){evnt(27259);if(r)goto S_30283;} do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(27259);}while(r); } S_30286:; if ((-(*__LONG_HELP_CY>(*__LONG_HELP_H+ 1 )))||new_error){ if(qbevent){evnt(27260);if(r)goto S_30286;} do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(27260);}while(r); } S_30289:; if ((-(*__LONG_HELP_CX<*__LONG_HELP_SX))||new_error){ if(qbevent){evnt(27262);if(r)goto S_30289;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX; if(!qbevent)break;evnt(27262);}while(r); } S_30292:; if ((-(*__LONG_HELP_CX>=(*__LONG_HELP_SX+*__LONG_HELP_WW)))||new_error){ if(qbevent){evnt(27263);if(r)goto S_30292;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX-*__LONG_HELP_WW+ 1 ; if(!qbevent)break;evnt(27263);}while(r); } S_30295:; if ((-(*__LONG_HELP_CY<*__LONG_HELP_SY))||new_error){ if(qbevent){evnt(27264);if(r)goto S_30295;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY; if(!qbevent)break;evnt(27264);}while(r); } S_30298:; if ((-(*__LONG_HELP_CY>=(*__LONG_HELP_SY+*__LONG_HELP_WH)))||new_error){ if(qbevent){evnt(27265);if(r)goto S_30298;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY-*__LONG_HELP_WH+ 1 ; if(!qbevent)break;evnt(27265);}while(r); } S_30301:; if ((-(*__LONG_HELP_SX< 1 ))||new_error){ if(qbevent){evnt(27267);if(r)goto S_30301;} do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(27267);}while(r); } S_30304:; if ((-(*__LONG_HELP_SY< 1 ))||new_error){ if(qbevent){evnt(27268);if(r)goto S_30304;} do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(27268);}while(r); } } } } S_30310:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27289);if(r)goto S_30310;} do{ *__LONG_MCLICK= 0 ; if(!qbevent)break;evnt(27289);}while(r); } } } } S_30316:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27300);if(r)goto S_30316;} S_30317:; if (((-(*__LONG_MY== 2 ))&(-(*__LONG_MX>(*__LONG_IDEWX- 30 )))&(-(*__LONG_MX<(*__LONG_IDEWX- 1 ))))||new_error){ if(qbevent){evnt(27301);if(r)goto S_30317;} S_30318:; if ((-(*__LONG_MX<=(*__LONG_IDEWX- 28 + 2 )))||new_error){ if(qbevent){evnt(27302);if(r)goto S_30318;} S_30319:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_IDEFINDTEXT->len== 0 )))||new_error){ if(qbevent){evnt(27303);if(r)goto S_30319;} do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(27304);}while(r); }else{ do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27306);}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27307);}while(r); do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(27307);}while(r); } }else{ S_30327:; if ((-(*__LONG_MX==(*__LONG_IDEWX- 3 )))||new_error){ if(qbevent){evnt(27310);if(r)goto S_30327;} do{ sub_pcopy( 0 , 3 ); if(!qbevent)break;evnt(27311);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,FUNC_IDESEARCHEDBOX()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27312);}while(r); S_30330:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_F->len))||new_error){ if(qbevent){evnt(27313);if(r)goto S_30330;} do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27313);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(27314);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(27314);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(27314);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(27314);}while(r); S_30337:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_F->len))||new_error){ if(qbevent){evnt(27315);if(r)goto S_30337;} do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(27315);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(27316);}while(r); }else{ S_30342:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(27318);if(r)goto S_30342;} do{ qbs_set(__STRING_IDEFINDTEXT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27318);}while(r); } do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(27319);}while(r); } } } } S_30350:; if ((-(*__LONG_KB== 16384 ))||new_error){ if(qbevent){evnt(27327);if(r)goto S_30350;} S_30351:; if ((-(*__LONG_IDEHELP== 1 ))||new_error){ if(qbevent){evnt(27328);if(r)goto S_30351;} S_30352:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(27329);if(r)goto S_30352;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27330);}while(r); }else{ do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(27332);}while(r); } } } S_30359:; if ((-(*__LONG_IDEHELP== 1 ))||new_error){ if(qbevent){evnt(27337);if(r)goto S_30359;} S_30360:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27338);if(r)goto S_30360;} S_30361:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(27339);if(r)goto S_30361;} S_30362:; if (((-(*__LONG_MY>= 2 ))&(-(*__LONG_MY<*__LONG_IDEWY)))||new_error){ if(qbevent){evnt(27340);if(r)goto S_30362;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27341);}while(r); } }else{ S_30366:; if (((-(*__LONG_MY>=*__LONG_IDEWY))&(-(*__LONG_MY<(*__LONG_IDEWY+*__LONG_IDESUBWINDOW))))||new_error){ if(qbevent){evnt(27344);if(r)goto S_30366;} do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(27345);}while(r); } } } } S_30372:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(27351);if(r)goto S_30372;} do{ *_FUNC_IDE2_LONG_Z= 0 ; if(!qbevent)break;evnt(27352);}while(r); S_30374:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(27353);if(r)goto S_30374;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(27353);}while(r); } S_30377:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(27354);if(r)goto S_30377;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(27354);}while(r); } S_30380:; if ((-(*__LONG_KB== 18688 ))||new_error){ if(qbevent){evnt(27355);if(r)goto S_30380;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(27355);}while(r); } S_30383:; if ((-(*__LONG_KB== 20736 ))||new_error){ if(qbevent){evnt(27356);if(r)goto S_30383;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(27356);}while(r); } S_30386:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(27357);if(r)goto S_30386;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(27357);}while(r); } S_30389:; if ((-(*_FUNC_IDE2_LONG_Z== 1 ))||new_error){ if(qbevent){evnt(27358);if(r)goto S_30389;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27358);}while(r); } } S_30393:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(27361);if(r)goto S_30393;} S_30394:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("V",1))))))||new_error){ if(qbevent){evnt(27363);if(r)goto S_30394;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27364);}while(r); do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,_FUNC_IDE2_STRING_CLIP,func_chr( 13 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27365);}while(r); S_30397:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(27366);if(r)goto S_30397;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_left(_FUNC_IDE2_STRING_CLIP,*_FUNC_IDE2_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27366);}while(r); } do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,_FUNC_IDE2_STRING_CLIP,func_chr( 10 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27367);}while(r); S_30401:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(27368);if(r)goto S_30401;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_left(_FUNC_IDE2_STRING_CLIP,*_FUNC_IDE2_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27368);}while(r); } S_30404:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_CLIP->len))||new_error){ if(qbevent){evnt(27369);if(r)goto S_30404;} do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27370);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27371);}while(r); } } S_30409:; if ((qbs_cleanup(qbs_tmp_base,((*__LONG_KCTRL&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1)))))))||new_error){ if(qbevent){evnt(27375);if(r)goto S_30409;} S_30410:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEFINDTEXT->len))||new_error){ if(qbevent){evnt(27376);if(r)goto S_30410;} do{ sub__clipboard(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27376);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27377);}while(r); } S_30415:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(27380);if(r)goto S_30415;} S_30416:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(27381);if(r)goto S_30416;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27382);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27383);}while(r); } S_30420:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_K)== 13 )))||new_error){ if(qbevent){evnt(27385);if(r)goto S_30420;} S_30421:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEFINDTEXT->len))||new_error){ if(qbevent){evnt(27386);if(r)goto S_30421;} do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27386);}while(r); do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(27386);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27387);}while(r); } S_30427:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_K)== 8 )))||new_error){ if(qbevent){evnt(27389);if(r)goto S_30427;} S_30428:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEFINDTEXT->len))||new_error){ if(qbevent){evnt(27390);if(r)goto S_30428;} do{ qbs_set(__STRING_IDEFINDTEXT,qbs_left(__STRING_IDEFINDTEXT,__STRING_IDEFINDTEXT->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27390);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27391);}while(r); } S_30433:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_K)< 32 )))||new_error){ if(qbevent){evnt(27393);if(r)goto S_30433;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27393);}while(r); } do{ qbs_set(__STRING_IDEFINDTEXT,qbs_add(__STRING_IDEFINDTEXT,__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27395);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27396);}while(r); } S_30439:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27399);if(r)goto S_30439;} S_30440:; if (((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(27400);if(r)goto S_30440;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27401);}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27405);}while(r); } S_30446:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(27408);if(r)goto S_30446;} S_30447:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_MCLICK|(qbs_equal(__STRING_K,func_chr( 27 )))))||new_error){ if(qbevent){evnt(27410);if(r)goto S_30447;} S_30448:; if ((qbs_cleanup(qbs_tmp_base,(((-(*__LONG_MY==*__LONG_IDEWY))&(-(*__LONG_MX==(*__LONG_IDEWX- 2 )))))|(qbs_equal(__STRING_K,func_chr( 27 )))))||new_error){ if(qbevent){evnt(27411);if(r)goto S_30448;} do{ *__LONG_IDEWY=*__LONG_IDEWY+*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(27417);}while(r); do{ *__LONG_IDEHELP= 0 ; if(!qbevent)break;evnt(27418);}while(r); do{ *__LONG_IDESUBWINDOW= 0 ; if(!qbevent)break;evnt(27419);}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(27420);}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27421);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(27422);}while(r); do{ goto LABEL_REDRAWEVERYTHING2; if(!qbevent)break;evnt(27422);}while(r); } } S_30458:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27428);if(r)goto S_30458;} S_30459:; if ((-(*__LONG_MY==*__LONG_IDEWY))||new_error){ if(qbevent){evnt(27429);if(r)goto S_30459;} do{ *_FUNC_IDE2_LONG_SX= 2 ; if(!qbevent)break;evnt(27431);}while(r); S_30461:; fornext_value3510=*_FUNC_IDE2_LONG_BACK_STR_POS; fornext_finalvalue3510=*_FUNC_IDE2_LONG_BACK_STR_POS+*__LONG_IDEWX- 6 ; fornext_step3510= 1 ; if (fornext_step3510<0) fornext_step_negative3510=1; else fornext_step_negative3510=0; if (new_error) goto fornext_error3510; goto fornext_entrylabel3510; while(1){ fornext_value3510=fornext_step3510+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3510: *_FUNC_IDE2_LONG_X=fornext_value3510; if (fornext_step_negative3510){ if (fornext_value3510fornext_finalvalue3510) break; } fornext_error3510:; if(qbevent){evnt(27432);if(r)goto S_30461;} S_30462:; if ((-(*__LONG_MX==*_FUNC_IDE2_LONG_SX))||new_error){ if(qbevent){evnt(27433);if(r)goto S_30462;} do{ *_FUNC_IDE2_LONG_I=string2l(func_mid(_FUNC_IDE2_STRING_BACK_STR_I,((*_FUNC_IDE2_LONG_X- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27434);}while(r); do{ *_FUNC_IDE2_LONG_A=qbs_asc(_FUNC_IDE2_STRING_BACK_STR,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27435);}while(r); S_30465:; if (((-(*_FUNC_IDE2_LONG_A!= 0 ))&(-(*_FUNC_IDE2_LONG_I!=*__LONG_HELP_BACK_POS)))||new_error){ if(qbevent){evnt(27436);if(r)goto S_30465;} do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))=*__LONG_HELP_SX; if(!qbevent)break;evnt(27437);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))=*__LONG_HELP_SY; if(!qbevent)break;evnt(27438);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))=*__LONG_HELP_CX; if(!qbevent)break;evnt(27439);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))=*__LONG_HELP_CY; if(!qbevent)break;evnt(27440);}while(r); do{ *__LONG_HELP_BACK_POS=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(27441);}while(r); do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(27442);}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(27442);}while(r); do{ *__LONG_HELP_SX=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16)); if(!qbevent)break;evnt(27443);}while(r); do{ *__LONG_HELP_SY=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4)); if(!qbevent)break;evnt(27444);}while(r); do{ *__LONG_HELP_CX=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8)); if(!qbevent)break;evnt(27445);}while(r); do{ *__LONG_HELP_CY=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12)); if(!qbevent)break;evnt(27446);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_WIKI(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27447);}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27448);}while(r); do{ goto LABEL_NEWPAGEPARSED; if(!qbevent)break;evnt(27449);}while(r); } } do{ *_FUNC_IDE2_LONG_SX=*_FUNC_IDE2_LONG_SX+ 1 ; if(!qbevent)break;evnt(27452);}while(r); } fornext_exit_3509:; } } S_30486:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("A",1)))))||new_error){ if(qbevent){evnt(27474);if(r)goto S_30486;} S_30487:; if ((*__LONG_HELP_H)||new_error){ if(qbevent){evnt(27475);if(r)goto S_30487;} do{ *__LONG_HELP_SELECT= 2 ; if(!qbevent)break;evnt(27476);}while(r); do{ *__LONG_HELP_SELX1= 1 ; if(!qbevent)break;evnt(27477);}while(r); do{ *__LONG_HELP_SELY1= 1 ; if(!qbevent)break;evnt(27478);}while(r); do{ *__LONG_HELP_SELX2= 10000000 ; if(!qbevent)break;evnt(27479);}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_H; if(!qbevent)break;evnt(27480);}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27481);}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(27481);}while(r); do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(27482);}while(r); } } S_30498:; if ((qbs_cleanup(qbs_tmp_base,(((*__LONG_KCTRL&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1))))))&(-(*__LONG_HELP_SELECT== 2 ))))||new_error){ if(qbevent){evnt(27486);if(r)goto S_30498;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27487);}while(r); S_30500:; fornext_value3512=*__LONG_HELP_SELY1; fornext_finalvalue3512=*__LONG_HELP_SELY2; fornext_step3512= 1 ; if (fornext_step3512<0) fornext_step_negative3512=1; else fornext_step_negative3512=0; if (new_error) goto fornext_error3512; goto fornext_entrylabel3512; while(1){ fornext_value3512=fornext_step3512+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel3512: *_FUNC_IDE2_LONG_Y=fornext_value3512; if (fornext_step_negative3512){ if (fornext_value3512fornext_finalvalue3512) break; } fornext_error3512:; if(qbevent){evnt(27488);if(r)goto S_30500;} S_30501:; if ((-(*_FUNC_IDE2_LONG_Y!=*__LONG_HELP_SELY1))||new_error){ if(qbevent){evnt(27489);if(r)goto S_30501;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_add(qbs_add(_FUNC_IDE2_STRING_CLIP,func_chr( 13 )),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27489);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27490);}while(r); S_30505:; if ((-(*_FUNC_IDE2_LONG_Y<=*__LONG_HELP_H))||new_error){ if(qbevent){evnt(27491);if(r)goto S_30505;} do{ *_FUNC_IDE2_LONG_L=string2l(func_mid(__STRING_HELP_LINE,((*_FUNC_IDE2_LONG_Y- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27492);}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(27493);}while(r); do{ *_FUNC_IDE2_LONG_X3= 1 ; if(!qbevent)break;evnt(27494);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27495);}while(r); S_30510:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(27496);if(r)goto S_30510;} S_30511:; if ((-(*__LONG_HELP_SELECT== 2 ))||new_error){ if(qbevent){evnt(27497);if(r)goto S_30511;} S_30512:; if (((-(*_FUNC_IDE2_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_FUNC_IDE2_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(27498);if(r)goto S_30512;} S_30513:; if (((-(*_FUNC_IDE2_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_FUNC_IDE2_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(27499);if(r)goto S_30513;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,func_chr(*_FUNC_IDE2_LONG_C))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27500);}while(r); } } } do{ *_FUNC_IDE2_LONG_X3=*_FUNC_IDE2_LONG_X3+ 1 ; if(!qbevent)break;evnt(27504);}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(27504);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27504);}while(r); } dl_exit_3513:; } do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_add(_FUNC_IDE2_STRING_CLIP,_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27507);}while(r); } fornext_exit_3511:; S_30525:; if (((-(*__LONG_HELP_SELY1==*__LONG_HELP_SELY2))&(-(*__LONG_HELP_CY>*__LONG_HELP_CY1)))||new_error){ if(qbevent){evnt(27509);if(r)goto S_30525;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_add(qbs_add(_FUNC_IDE2_STRING_CLIP,func_chr( 13 )),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27509);}while(r); } S_30528:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(27510);if(r)goto S_30528;} do{ sub__clipboard(_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27510);}while(r); } do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(27511);}while(r); } S_30533:; if (((-(*__LONG_MX>=*__LONG_HELP_WX1))&(-(*__LONG_MY>=*__LONG_HELP_WY1))&(-(*__LONG_MX<=*__LONG_HELP_WX2))&(-(*__LONG_MY<=*__LONG_HELP_WY2)))||new_error){ if(qbevent){evnt(27515);if(r)goto S_30533;} S_30534:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27516);if(r)goto S_30534;} do{ *__LONG_HELP_CX=*__LONG_HELP_SX+(*__LONG_MX-*__LONG_HELP_WX1); if(!qbevent)break;evnt(27517);}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_SY+(*__LONG_MY-*__LONG_HELP_WY1); if(!qbevent)break;evnt(27518);}while(r); do{ *__LONG_HELP_SELECT= 1 ; if(!qbevent)break;evnt(27519);}while(r); do{ *__LONG_HELP_MSELECT= 1 ; if(!qbevent)break;evnt(27520);}while(r); do{ *__LONG_HELP_CX1=*__LONG_HELP_CX; if(!qbevent)break;evnt(27521);}while(r); do{ *__LONG_HELP_CY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(27521);}while(r); do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(27522);}while(r); } S_30543:; if (((*__LONG_MB&(-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 0 ))))||new_error){ if(qbevent){evnt(27524);if(r)goto S_30543;} do{ *__LONG_HELP_CX=*__LONG_HELP_SX+(*__LONG_MX-*__LONG_HELP_WX1); if(!qbevent)break;evnt(27525);}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_SY+(*__LONG_MY-*__LONG_HELP_WY1); if(!qbevent)break;evnt(27526);}while(r); S_30546:; if ((*__LONG_HELP_SELECT)||new_error){ if(qbevent){evnt(27527);if(r)goto S_30546;} do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(27527);}while(r); } } }else{ S_30551:; if ((((*__LONG_MB&(-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 0 ))))&(-(*__LONG_HELP_MSELECT== 1 ))&(-(*__LONG_HELP_SELECT== 2 )))||new_error){ if(qbevent){evnt(27531);if(r)goto S_30551;} S_30552:; if ((-(*__LONG_MX<*__LONG_HELP_WX1))||new_error){ if(qbevent){evnt(27532);if(r)goto S_30552;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX- 1 ; if(!qbevent)break;evnt(27532);}while(r); } S_30555:; if ((-(*__LONG_MX>*__LONG_HELP_WX2))||new_error){ if(qbevent){evnt(27533);if(r)goto S_30555;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX+ 1 ; if(!qbevent)break;evnt(27533);}while(r); } S_30558:; if ((-(*__LONG_MY<*__LONG_HELP_WY1))||new_error){ if(qbevent){evnt(27534);if(r)goto S_30558;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY- 1 ; if(!qbevent)break;evnt(27534);}while(r); } S_30561:; if ((-(*__LONG_MY>*__LONG_HELP_WY2))||new_error){ if(qbevent){evnt(27535);if(r)goto S_30561;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY+ 1 ; if(!qbevent)break;evnt(27535);}while(r); } do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(27536);}while(r); } } S_30567:; if ((*__LONG_KSHIFT)||new_error){ if(qbevent){evnt(27540);if(r)goto S_30567;} S_30568:; if ((-(*__LONG_HELP_SELECT== 0 ))||new_error){ if(qbevent){evnt(27541);if(r)goto S_30568;} do{ *__LONG_HELP_SELECT= 1 ; if(!qbevent)break;evnt(27542);}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(27543);}while(r); do{ *__LONG_HELP_CX1=*__LONG_HELP_CX; if(!qbevent)break;evnt(27544);}while(r); do{ *__LONG_HELP_CY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(27544);}while(r); } }else{ S_30575:; if (((((-(*__LONG_KB> 0 ))|(-(*__LONG_MWHEEL!= 0 ))))&(-(*__LONG_KSTATECHANGED== 0 )))||new_error){ if(qbevent){evnt(27547);if(r)goto S_30575;} do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(27547);}while(r); } } LABEL_KEEP_SELECT:; if(qbevent){evnt(27549);r=0;} S_30579:; if ((-(*__LONG_KB== 21248 ))||new_error){ if(qbevent){evnt(27551);if(r)goto S_30579;} S_30580:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HELP_SEARCH_STR->len))||new_error){ if(qbevent){evnt(27552);if(r)goto S_30580;} do{ *_FUNC_IDE2_LONG_NOREP= 1 ; if(!qbevent)break;evnt(27552);}while(r); do{ goto LABEL_DELSRCHAGAIN; if(!qbevent)break;evnt(27552);}while(r); } } S_30585:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_K->len== 1 ))&(-(*__LONG_KCONTROL== 0 ))))||new_error){ if(qbevent){evnt(27555);if(r)goto S_30585;} do{ *_FUNC_IDE2_LONG_K=qbs_asc(__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27556);}while(r); S_30587:; if ((((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((*_FUNC_IDE2_LONG_K)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(*_FUNC_IDE2_LONG_K== 36 ))|(-(*_FUNC_IDE2_LONG_K== 32 )))||new_error){ if(qbevent){evnt(27557);if(r)goto S_30587;} do{ *_FUNC_IDE2_LONG_NOREP= 0 ; if(!qbevent)break;evnt(27558);}while(r); do{ *_FUNC_IDE2_DOUBLE_T=func_timer( 0.001E+0 ,1); if(!qbevent)break;evnt(27559);}while(r); do{ *_FUNC_IDE2_LONG_OLDK= 0 ; if(!qbevent)break;evnt(27560);}while(r); S_30591:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HELP_SEARCH_STR->len))||new_error){ if(qbevent){evnt(27560);if(r)goto S_30591;} do{ *_FUNC_IDE2_LONG_OLDK=qbs_asc(__STRING_HELP_SEARCH_STR,__STRING_HELP_SEARCH_STR->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27560);}while(r); } S_30594:; if ((qbs_cleanup(qbs_tmp_base,(-(((double)(*_FUNC_IDE2_DOUBLE_T))>((double)((*__DOUBLE_HELP_SEARCH_TIME+ 1 )))))|(-(((double)(*_FUNC_IDE2_DOUBLE_T))<((double)(*__DOUBLE_HELP_SEARCH_TIME))))|(((-(*_FUNC_IDE2_LONG_K==*_FUNC_IDE2_LONG_OLDK))&(-(__STRING_HELP_SEARCH_STR->len== 1 ))))))||new_error){ if(qbevent){evnt(27561);if(r)goto S_30594;} S_30595:; if ((-(*_FUNC_IDE2_LONG_K==*_FUNC_IDE2_LONG_OLDK))||new_error){ if(qbevent){evnt(27562);if(r)goto S_30595;} do{ *_FUNC_IDE2_LONG_NOREP= 1 ; if(!qbevent)break;evnt(27562);}while(r); } do{ qbs_set(__STRING_HELP_SEARCH_STR,__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27563);}while(r); }else{ do{ qbs_set(__STRING_HELP_SEARCH_STR,qbs_add(__STRING_HELP_SEARCH_STR,__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27565);}while(r); } do{ *__DOUBLE_HELP_SEARCH_TIME=*_FUNC_IDE2_DOUBLE_T; if(!qbevent)break;evnt(27567);}while(r); LABEL_DELSRCHAGAIN:; if(qbevent){evnt(27569);r=0;} do{ *_FUNC_IDE2_LONG_OX=*__LONG_HELP_CX; if(!qbevent)break;evnt(27570);}while(r); do{ *_FUNC_IDE2_LONG_OY=*__LONG_HELP_CY; if(!qbevent)break;evnt(27571);}while(r); S_30605:; if ((-(*_FUNC_IDE2_LONG_OY>*__LONG_HELP_H))||new_error){ if(qbevent){evnt(27572);if(r)goto S_30605;} do{ *_FUNC_IDE2_LONG_OY= 1 ; if(!qbevent)break;evnt(27572);}while(r); } do{ *_FUNC_IDE2_LONG_CY=*_FUNC_IDE2_LONG_OY; if(!qbevent)break;evnt(27573);}while(r); do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_OX; if(!qbevent)break;evnt(27574);}while(r); S_30610:; if ((-(*_FUNC_IDE2_LONG_NOREP== 1 ))||new_error){ if(qbevent){evnt(27575);if(r)goto S_30610;} do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_CX+ 1 ; if(!qbevent)break;evnt(27575);}while(r); } do{ *_FUNC_IDE2_LONG_LOOPED= 0 ; if(!qbevent)break;evnt(27576);}while(r); S_30614:; do{ if(qbevent){evnt(27577);if(r)goto S_30614;} do{ *_FUNC_IDE2_LONG_L=string2l(func_mid(__STRING_HELP_LINE,((*_FUNC_IDE2_LONG_CY- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27579);}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(27580);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27581);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27582);}while(r); S_30619:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(27583);if(r)goto S_30619;} do{ *_FUNC_IDE2_LONG_LNK=string2i(func_mid(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X+ 2 , 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27584);}while(r); S_30621:; if ((*_FUNC_IDE2_LONG_LNK)||new_error){ if(qbevent){evnt(27585);if(r)goto S_30621;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,func_chr(*_FUNC_IDE2_LONG_C))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27585);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27585);}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(27586);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27586);}while(r); } dl_exit_3520:; LABEL_HELPSCANROW:; if(qbevent){evnt(27589);r=0;} do{ *_FUNC_IDE2_LONG_PX=func_instr(*_FUNC_IDE2_LONG_CX,qbs_ucase(_FUNC_IDE2_STRING_A),qbs_ucase(__STRING_HELP_SEARCH_STR),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27590);}while(r); do{ *_FUNC_IDE2_LONG_PX2=func_instr(*_FUNC_IDE2_LONG_CX,qbs_ucase(_FUNC_IDE2_STRING_A),qbs_ucase(qbs_add(qbs_new_txt_len("_",1),__STRING_HELP_SEARCH_STR)),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27591);}while(r); S_30631:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDE2_LONG_PX2<*_FUNC_IDE2_LONG_PX))&(-(*_FUNC_IDE2_LONG_PX2!= 0 ))&(qbs_notequal(qbs_left(__STRING_HELP_SEARCH_STR, 1 ),qbs_new_txt_len("_",1)))))||new_error){ if(qbevent){evnt(27592);if(r)goto S_30631;} do{ *_FUNC_IDE2_LONG_PX=*_FUNC_IDE2_LONG_PX2; if(!qbevent)break;evnt(27592);}while(r); } S_30634:; if (((-(*_FUNC_IDE2_LONG_LOOPED== 1 ))&(-(*_FUNC_IDE2_LONG_CY==*_FUNC_IDE2_LONG_OY))&(-(*_FUNC_IDE2_LONG_PX== 0 )))||new_error){ if(qbevent){evnt(27594);if(r)goto S_30634;} do{ goto LABEL_STRNOTFOUND; if(!qbevent)break;evnt(27594);}while(r); } S_30637:; if ((*_FUNC_IDE2_LONG_PX)||new_error){ if(qbevent){evnt(27595);if(r)goto S_30637;} do{ *_FUNC_IDE2_LONG_L=string2l(func_mid(__STRING_HELP_LINE,((*_FUNC_IDE2_LONG_CY- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27597);}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(27598);}while(r); do{ *_FUNC_IDE2_LONG_X2= 1 ; if(!qbevent)break;evnt(27599);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27600);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27601);}while(r); do{ *_FUNC_IDE2_LONG_OLDLNK= 0 ; if(!qbevent)break;evnt(27602);}while(r); do{ *_FUNC_IDE2_LONG_LNKX1= 0 ; if(!qbevent)break;evnt(27603);}while(r); do{ *_FUNC_IDE2_LONG_LNKX2= 0 ; if(!qbevent)break;evnt(27603);}while(r); S_30646:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(27604);if(r)goto S_30646;} do{ *_FUNC_IDE2_LONG_LNK=string2i(func_mid(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X+ 2 , 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27605);}while(r); S_30648:; if (((-(*_FUNC_IDE2_LONG_LNKX1== 0 ))&(-(*_FUNC_IDE2_LONG_LNK!= 0 ))&(-(*_FUNC_IDE2_LONG_OLDLNK== 0 ))&(-(*_FUNC_IDE2_LONG_PX==*_FUNC_IDE2_LONG_X2)))||new_error){ if(qbevent){evnt(27606);if(r)goto S_30648;} do{ *_FUNC_IDE2_LONG_LNKX1=*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(27606);}while(r); } S_30651:; if (((-(*_FUNC_IDE2_LONG_LNKX1!= 0 ))&(-(*_FUNC_IDE2_LONG_LNK== 0 ))&(-(*_FUNC_IDE2_LONG_LNKX2== 0 )))||new_error){ if(qbevent){evnt(27607);if(r)goto S_30651;} do{ *_FUNC_IDE2_LONG_LNKX2=*_FUNC_IDE2_LONG_X2- 1 ; if(!qbevent)break;evnt(27607);}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(27608);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27608);}while(r); do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X2+ 1 ; if(!qbevent)break;evnt(27609);}while(r); do{ *_FUNC_IDE2_LONG_OLDLNK=*_FUNC_IDE2_LONG_LNK; if(!qbevent)break;evnt(27610);}while(r); } dl_exit_3521:; S_30659:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5])])),qbs_new_txt_len("Alphabetical",12)))|(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5])])),qbs_new_txt_len("By Usage",8)))))||new_error){ if(qbevent){evnt(27613);if(r)goto S_30659;} S_30660:; if ((-(*_FUNC_IDE2_LONG_LNKX1!= 3 ))||new_error){ if(qbevent){evnt(27614);if(r)goto S_30660;} do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_PX+ 1 ; if(!qbevent)break;evnt(27615);}while(r); do{ goto LABEL_HELPSCANROW; if(!qbevent)break;evnt(27616);}while(r); } } S_30665:; if ((*_FUNC_IDE2_LONG_LNKX1)||new_error){ if(qbevent){evnt(27620);if(r)goto S_30665;} S_30666:; if ((-(*_FUNC_IDE2_LONG_LNKX2== 0 ))||new_error){ if(qbevent){evnt(27621);if(r)goto S_30666;} do{ *_FUNC_IDE2_LONG_LNKX2=*_FUNC_IDE2_LONG_X2- 1 ; if(!qbevent)break;evnt(27621);}while(r); } do{ *__LONG_HELP_SELECT= 2 ; if(!qbevent)break;evnt(27622);}while(r); do{ *__LONG_HELP_CX1=*_FUNC_IDE2_LONG_LNKX2+ 1 ; if(!qbevent)break;evnt(27623);}while(r); do{ *__LONG_HELP_CX=*_FUNC_IDE2_LONG_LNKX1; if(!qbevent)break;evnt(27624);}while(r); do{ *__LONG_HELP_CY=*_FUNC_IDE2_LONG_CY; if(!qbevent)break;evnt(27625);}while(r); do{ *__LONG_HELP_CY1=*_FUNC_IDE2_LONG_CY; if(!qbevent)break;evnt(27626);}while(r); do{ goto LABEL_FOUNDSSTR; if(!qbevent)break;evnt(27627);}while(r); } do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_PX+ 1 ; if(!qbevent)break;evnt(27630);}while(r); do{ goto LABEL_HELPSCANROW; if(!qbevent)break;evnt(27631);}while(r); } do{ *_FUNC_IDE2_LONG_CX= 1 ; if(!qbevent)break;evnt(27633);}while(r); do{ *_FUNC_IDE2_LONG_CY=*_FUNC_IDE2_LONG_CY+ 1 ; if(!qbevent)break;evnt(27634);}while(r); S_30681:; if ((-(*_FUNC_IDE2_LONG_CY>*__LONG_HELP_H))||new_error){ if(qbevent){evnt(27635);if(r)goto S_30681;} do{ *_FUNC_IDE2_LONG_CY= 1 ; if(!qbevent)break;evnt(27635);}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(27635);}while(r); } }while(1); dl_exit_3519:; } } LABEL_FOUNDSSTR:; if(qbevent){evnt(27639);r=0;} LABEL_STRNOTFOUND:; if(qbevent){evnt(27640);r=0;} S_30688:; if (((-(*__LONG_KB== 18176 ))&*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(27642);if(r)goto S_30688;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27643);}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(27643);}while(r); } S_30692:; if (((-(*__LONG_KB== 20224 ))&*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(27645);if(r)goto S_30692;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27646);}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(27646);}while(r); } S_30696:; if (((-(*__LONG_KB== 18176 ))&(-(*__LONG_KCONTROL== 0 )))||new_error){ if(qbevent){evnt(27649);if(r)goto S_30696;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27649);}while(r); } S_30699:; if (((-(*__LONG_KB== 20224 ))&(-(*__LONG_KCONTROL== 0 )))||new_error){ if(qbevent){evnt(27650);if(r)goto S_30699;} do{ *__LONG_HELP_CX=((int32*)(__ARRAY_LONG_HELP_LINELEN[0]))[array_check((*__LONG_HELP_CY-*__LONG_HELP_SY)-__ARRAY_LONG_HELP_LINELEN[4],__ARRAY_LONG_HELP_LINELEN[5])]+ 1 ; if(!qbevent)break;evnt(27651);}while(r); } S_30702:; if ((-(*__LONG_KB== 18688 ))||new_error){ if(qbevent){evnt(27654);if(r)goto S_30702;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY-(*__LONG_HELP_WH- 1 ); if(!qbevent)break;evnt(27655);}while(r); } S_30705:; if ((-(*__LONG_KB== 20736 ))||new_error){ if(qbevent){evnt(27658);if(r)goto S_30705;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY+(*__LONG_HELP_WH- 1 ); if(!qbevent)break;evnt(27659);}while(r); } S_30708:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(27662);if(r)goto S_30708;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY+ 1 ; if(!qbevent)break;evnt(27662);}while(r); } S_30711:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(27663);if(r)goto S_30711;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY- 1 ; if(!qbevent)break;evnt(27663);}while(r); } S_30714:; if ((-(*__LONG_KB== 19200 ))||new_error){ if(qbevent){evnt(27664);if(r)goto S_30714;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX- 1 ; if(!qbevent)break;evnt(27664);}while(r); } S_30717:; if ((-(*__LONG_KB== 19712 ))||new_error){ if(qbevent){evnt(27665);if(r)goto S_30717;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX+ 1 ; if(!qbevent)break;evnt(27665);}while(r); } S_30720:; if ((-(*__LONG_MWHEEL< 0 ))||new_error){ if(qbevent){evnt(27668);if(r)goto S_30720;} do{ *__LONG_HELP_CY=*__LONG_HELP_SY; if(!qbevent)break;evnt(27668);}while(r); } S_30723:; if ((-(*__LONG_MWHEEL> 0 ))||new_error){ if(qbevent){evnt(27669);if(r)goto S_30723;} do{ *__LONG_HELP_CY=*__LONG_HELP_SY+(*__LONG_HELP_WH- 1 ); if(!qbevent)break;evnt(27669);}while(r); } do{ *__LONG_HELP_CY=*__LONG_HELP_CY+(*__LONG_MWHEEL* 3 ); if(!qbevent)break;evnt(27670);}while(r); S_30727:; if ((-(*__LONG_HELP_CX< 1 ))||new_error){ if(qbevent){evnt(27673);if(r)goto S_30727;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27673);}while(r); } S_30730:; if ((-(*__LONG_HELP_CX>(*__LONG_HELP_W+ 1 )))||new_error){ if(qbevent){evnt(27674);if(r)goto S_30730;} do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(27674);}while(r); } S_30733:; if ((-(*__LONG_HELP_CY< 1 ))||new_error){ if(qbevent){evnt(27675);if(r)goto S_30733;} do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(27675);}while(r); } S_30736:; if ((-(*__LONG_HELP_CY>(*__LONG_HELP_H+ 1 )))||new_error){ if(qbevent){evnt(27676);if(r)goto S_30736;} do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(27676);}while(r); } S_30739:; if ((-(*__LONG_HELP_CX<*__LONG_HELP_SX))||new_error){ if(qbevent){evnt(27679);if(r)goto S_30739;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX; if(!qbevent)break;evnt(27679);}while(r); } S_30742:; if ((-(*__LONG_HELP_CX>=(*__LONG_HELP_SX+*__LONG_HELP_WW)))||new_error){ if(qbevent){evnt(27680);if(r)goto S_30742;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX-*__LONG_HELP_WW+ 1 ; if(!qbevent)break;evnt(27680);}while(r); } S_30745:; if ((-(*__LONG_HELP_CY<*__LONG_HELP_SY))||new_error){ if(qbevent){evnt(27682);if(r)goto S_30745;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY; if(!qbevent)break;evnt(27682);}while(r); } S_30748:; if ((-(*__LONG_HELP_CY>=(*__LONG_HELP_SY+*__LONG_HELP_WH)))||new_error){ if(qbevent){evnt(27683);if(r)goto S_30748;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY-*__LONG_HELP_WH+ 1 ; if(!qbevent)break;evnt(27683);}while(r); } S_30751:; if ((-(*__LONG_HELP_SX< 1 ))||new_error){ if(qbevent){evnt(27686);if(r)goto S_30751;} do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(27686);}while(r); } S_30754:; if ((-(*__LONG_HELP_SY< 1 ))||new_error){ if(qbevent){evnt(27687);if(r)goto S_30754;} do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(27687);}while(r); } S_30757:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 8 ))))||new_error){ if(qbevent){evnt(27689);if(r)goto S_30757;} S_30758:; if ((-(*__LONG_HELP_BACK_POS> 1 ))||new_error){ if(qbevent){evnt(27690);if(r)goto S_30758;} do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))=*__LONG_HELP_SX; if(!qbevent)break;evnt(27691);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))=*__LONG_HELP_SY; if(!qbevent)break;evnt(27692);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))=*__LONG_HELP_CX; if(!qbevent)break;evnt(27693);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))=*__LONG_HELP_CY; if(!qbevent)break;evnt(27694);}while(r); do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS- 1 ; if(!qbevent)break;evnt(27695);}while(r); do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(27696);}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(27696);}while(r); do{ *__LONG_HELP_SX=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16)); if(!qbevent)break;evnt(27697);}while(r); do{ *__LONG_HELP_SY=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4)); if(!qbevent)break;evnt(27698);}while(r); do{ *__LONG_HELP_CX=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8)); if(!qbevent)break;evnt(27699);}while(r); do{ *__LONG_HELP_CY=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12)); if(!qbevent)break;evnt(27700);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_WIKI(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27701);}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27702);}while(r); do{ goto LABEL_NEWPAGEPARSED; if(!qbevent)break;evnt(27703);}while(r); } } S_30775:; if (((-(*__LONG_HELP_CY>= 1 ))&(-(*__LONG_HELP_CY<=*__LONG_HELP_H)))||new_error){ if(qbevent){evnt(27707);if(r)goto S_30775;} do{ *_FUNC_IDE2_LONG_L=string2l(func_mid(__STRING_HELP_LINE,((*__LONG_HELP_CY- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27708);}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(27709);}while(r); do{ *_FUNC_IDE2_LONG_X2= 1 ; if(!qbevent)break;evnt(27710);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27711);}while(r); S_30780:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(27712);if(r)goto S_30780;} S_30781:; if ((-(*_FUNC_IDE2_LONG_X2==*__LONG_HELP_CX))||new_error){ if(qbevent){evnt(27714);if(r)goto S_30781;} do{ *_FUNC_IDE2_LONG_LNK=string2i(func_mid(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X+ 2 , 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27715);}while(r); S_30783:; if ((*_FUNC_IDE2_LONG_LNK)||new_error){ if(qbevent){evnt(27716);if(r)goto S_30783;} do{ *_FUNC_IDE2_LONG_L1= 1 ; if(!qbevent)break;evnt(27718);}while(r); S_30785:; fornext_value3524= 1 ; fornext_finalvalue3524=*_FUNC_IDE2_LONG_LNK- 1 ; fornext_step3524= 1 ; if (fornext_step3524<0) fornext_step_negative3524=1; else fornext_step_negative3524=0; if (new_error) goto fornext_error3524; goto fornext_entrylabel3524; while(1){ fornext_value3524=fornext_step3524+(*_FUNC_IDE2_LONG_LX); fornext_entrylabel3524: *_FUNC_IDE2_LONG_LX=fornext_value3524; if (fornext_step_negative3524){ if (fornext_value3524fornext_finalvalue3524) break; } fornext_error3524:; if(qbevent){evnt(27719);if(r)goto S_30785;} do{ *_FUNC_IDE2_LONG_L1=func_instr(*_FUNC_IDE2_LONG_L1,__STRING_HELP_LINK,__STRING_HELP_LINK_SEP,1)+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27720);}while(r); } fornext_exit_3523:; do{ *_FUNC_IDE2_LONG_L2=func_instr(*_FUNC_IDE2_LONG_L1,__STRING_HELP_LINK,__STRING_HELP_LINK_SEP,1)- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27722);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L,func_mid(__STRING_HELP_LINK,*_FUNC_IDE2_LONG_L1,*_FUNC_IDE2_LONG_L2-*_FUNC_IDE2_LONG_L1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27723);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_right(_FUNC_IDE2_STRING_L,_FUNC_IDE2_STRING_L->len- 5 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27725);}while(r); S_30791:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_MCLICK|(qbs_equal(__STRING_K,func_chr( 13 )))))||new_error){ if(qbevent){evnt(27727);if(r)goto S_30791;} do{ *__LONG_MCLICK= 0 ; if(!qbevent)break;evnt(27728);}while(r); S_30793:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])),_FUNC_IDE2_STRING_L)))||new_error){ if(qbevent){evnt(27730);if(r)goto S_30793;} do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(27731);}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(27731);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))=*__LONG_HELP_SX; if(!qbevent)break;evnt(27734);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))=*__LONG_HELP_SY; if(!qbevent)break;evnt(27735);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))=*__LONG_HELP_CX; if(!qbevent)break;evnt(27736);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))=*__LONG_HELP_CY; if(!qbevent)break;evnt(27737);}while(r); do{ *_FUNC_IDE2_LONG_TOP=func_ubound(__ARRAY_STRING_BACK,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27739);}while(r); S_30801:; if ((-(*__LONG_HELP_BACK_POS<*_FUNC_IDE2_LONG_TOP))||new_error){ if(qbevent){evnt(27741);if(r)goto S_30801;} S_30802:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*__LONG_HELP_BACK_POS+ 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])),_FUNC_IDE2_STRING_L)))||new_error){ if(qbevent){evnt(27742);if(r)goto S_30802;} do{ goto LABEL_USENEXTENTRY; if(!qbevent)break;evnt(27743);}while(r); } } do{ *_FUNC_IDE2_LONG_TOP=*_FUNC_IDE2_LONG_TOP+ 1 ; if(!qbevent)break;evnt(27747);}while(r); do{ if (__ARRAY_STRING_BACK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_BACK)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_BACK[2]&1){ preserved_elements=__ARRAY_STRING_BACK[5]; } else preserved_elements=0; __ARRAY_STRING_BACK[4]= 0 ; __ARRAY_STRING_BACK[5]=(*_FUNC_IDE2_LONG_TOP)-__ARRAY_STRING_BACK[4]+1; __ARRAY_STRING_BACK[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_BACK[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_HELP_BACK[2]&1){ preserved_elements=__ARRAY_UDT_HELP_BACK[5]; } else preserved_elements=0; __ARRAY_UDT_HELP_BACK[4]= 0 ; __ARRAY_UDT_HELP_BACK[5]=(*_FUNC_IDE2_LONG_TOP)-__ARRAY_UDT_HELP_BACK[4]+1; __ARRAY_UDT_HELP_BACK[6]=1; if (__ARRAY_UDT_HELP_BACK[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_HELP_BACK[0]),preserved_elements*128/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_HELP_BACK[0])); tmp_long=__ARRAY_UDT_HELP_BACK[5]; __ARRAY_UDT_HELP_BACK[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*128/8+1); memcpy((void*)(__ARRAY_UDT_HELP_BACK[0]),redim_preserve_cmem_buffer,preserved_elements*128/8+1); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_BACK_NAME[2]&1){ preserved_elements=__ARRAY_STRING_BACK_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_BACK_NAME[4]= 0 ; __ARRAY_STRING_BACK_NAME[5]=(*_FUNC_IDE2_LONG_TOP)-__ARRAY_STRING_BACK_NAME[4]+1; __ARRAY_STRING_BACK_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_BACK_NAME[5]; if (tmp_longfornext_finalvalue3527) break; } fornext_error3527:; if(qbevent){evnt(27752);if(r)goto S_30810;} do{ tmp_long=array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5])]))); if(!qbevent)break;evnt(27753);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])]))); if(!qbevent)break;evnt(27754);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16)); if(!qbevent)break;evnt(27755);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4)); if(!qbevent)break;evnt(27756);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8)); if(!qbevent)break;evnt(27757);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12)); if(!qbevent)break;evnt(27758);}while(r); } fornext_exit_3526:; LABEL_USENEXTENTRY:; if(qbevent){evnt(27760);r=0;} do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS+ 1 ; if(!qbevent)break;evnt(27761);}while(r); do{ tmp_long=array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long])),_FUNC_IDE2_STRING_L); if(!qbevent)break;evnt(27762);}while(r); do{ tmp_long=array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long])),FUNC_BACK2BACKNAME(_FUNC_IDE2_STRING_L)); if(!qbevent)break;evnt(27763);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))= 1 ; if(!qbevent)break;evnt(27764);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))= 1 ; if(!qbevent)break;evnt(27765);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))= 1 ; if(!qbevent)break;evnt(27766);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))= 1 ; if(!qbevent)break;evnt(27767);}while(r); do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(27768);}while(r); do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(27768);}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27768);}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(27768);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_WIKI(_FUNC_IDE2_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27769);}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27770);}while(r); do{ goto LABEL_NEWPAGEPARSED; if(!qbevent)break;evnt(27771);}while(r); } } } } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(27777);}while(r); do{ *_FUNC_IDE2_LONG_C=qbs_asc(__STRING_HELP_TXT,*_FUNC_IDE2_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27777);}while(r); do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X2+ 1 ; if(!qbevent)break;evnt(27778);}while(r); } dl_exit_3522:; } S_30841:; if ((*__LONG_HELP_SELECT)||new_error){ if(qbevent){evnt(27782);if(r)goto S_30841;} do{ *__LONG_HELP_SELECT= 1 ; if(!qbevent)break;evnt(27783);}while(r); S_30843:; if (((-(*__LONG_HELP_CX!=*__LONG_HELP_CX1))|(-(*__LONG_HELP_CY!=*__LONG_HELP_CY1)))||new_error){ if(qbevent){evnt(27784);if(r)goto S_30843;} do{ *__LONG_HELP_SELECT= 2 ; if(!qbevent)break;evnt(27784);}while(r); } } S_30847:; if ((-(*__LONG_HELP_SELECT== 2 ))||new_error){ if(qbevent){evnt(27788);if(r)goto S_30847;} S_30848:; if ((-(*__LONG_HELP_CY==*__LONG_HELP_CY1))||new_error){ if(qbevent){evnt(27789);if(r)goto S_30848;} do{ *__LONG_HELP_SELY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(27790);}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY; if(!qbevent)break;evnt(27790);}while(r); S_30851:; if ((-(*__LONG_HELP_CX>*__LONG_HELP_CX1))||new_error){ if(qbevent){evnt(27791);if(r)goto S_30851;} do{ *__LONG_HELP_SELX1=*__LONG_HELP_CX1; if(!qbevent)break;evnt(27792);}while(r); do{ *__LONG_HELP_SELX2=*__LONG_HELP_CX- 1 ; if(!qbevent)break;evnt(27792);}while(r); }else{ do{ *__LONG_HELP_SELX1=*__LONG_HELP_CX; if(!qbevent)break;evnt(27794);}while(r); do{ *__LONG_HELP_SELX2=*__LONG_HELP_CX1- 1 ; if(!qbevent)break;evnt(27794);}while(r); } }else{ do{ *__LONG_HELP_SELX1= 1 ; if(!qbevent)break;evnt(27797);}while(r); do{ *__LONG_HELP_SELX2= 10000000 ; if(!qbevent)break;evnt(27797);}while(r); S_30861:; if ((-(*__LONG_HELP_CY>*__LONG_HELP_CY1))||new_error){ if(qbevent){evnt(27798);if(r)goto S_30861;} do{ *__LONG_HELP_SELY1=*__LONG_HELP_CY1; if(!qbevent)break;evnt(27799);}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY; if(!qbevent)break;evnt(27799);}while(r); S_30864:; if ((-(*__LONG_HELP_CX== 1 ))||new_error){ if(qbevent){evnt(27800);if(r)goto S_30864;} do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY- 1 ; if(!qbevent)break;evnt(27800);}while(r); } }else{ do{ *__LONG_HELP_SELY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(27802);}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY1; if(!qbevent)break;evnt(27802);}while(r); } } } LABEL_NEWPAGEPARSED:; if(qbevent){evnt(27807);r=0;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27808);}while(r); } S_30875:; if ((-(*__LONG_KB== 15104 ))||new_error){ if(qbevent){evnt(27813);if(r)goto S_30875;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27815);}while(r); do{ *_FUNC_IDE2_LONG_X=*__LONG_IDECX; if(!qbevent)break;evnt(27816);}while(r); S_30878:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(27817);if(r)goto S_30878;} S_30879:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(27818);if(r)goto S_30879;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(27819);}while(r); S_30881:; while((-(*_FUNC_IDE2_LONG_X1> 1 ))||new_error){ if(qbevent){evnt(27820);if(r)goto S_30881;} S_30882:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X1- 1 ))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X1- 1 )== 36 ))))||new_error){ if(qbevent){evnt(27821);if(r)goto S_30882;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X1- 1 ; if(!qbevent)break;evnt(27821);}while(r); }else{ do{ goto dl_exit_3529; if(!qbevent)break;evnt(27821);}while(r); } } dl_exit_3529:; do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(27823);}while(r); S_30889:; while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X2<_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(27824);if(r)goto S_30889;} S_30890:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X2+ 1 ))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X2+ 1 )== 36 ))))||new_error){ if(qbevent){evnt(27825);if(r)goto S_30890;} do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X2+ 1 ; if(!qbevent)break;evnt(27825);}while(r); }else{ do{ goto dl_exit_3531; if(!qbevent)break;evnt(27825);}while(r); } } dl_exit_3531:; do{ qbs_set(_FUNC_IDE2_STRING_A2,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X1,*_FUNC_IDE2_LONG_X2-*_FUNC_IDE2_LONG_X1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27827);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,func_chr(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27829);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_ucase(_FUNC_IDE2_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27831);}while(r); do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(27833);}while(r); do{ sub_open(qbs_new_txt_len("internal\\help\\links.bin",23), 3 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27834);}while(r); do{ *_FUNC_IDE2_LONG_LNKS= 0 ; if(!qbevent)break;evnt(27835);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LNKS,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27835);}while(r); S_30905:; while((!(func_eof(*_FUNC_IDE2_LONG_FH)))||new_error){ if(qbevent){evnt(27836);if(r)goto S_30905;} do{ tmp_fileno=*_FUNC_IDE2_LONG_FH; if (new_error) goto skip3533; sub_file_line_input_string(tmp_fileno,_FUNC_IDE2_STRING_L); if (new_error) goto skip3533; skip3533: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27837);}while(r); do{ *_FUNC_IDE2_LONG_C=func_instr(NULL,_FUNC_IDE2_STRING_L,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27838);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L1,qbs_left(_FUNC_IDE2_STRING_L,*_FUNC_IDE2_LONG_C- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27838);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L2,qbs_right(_FUNC_IDE2_STRING_L,_FUNC_IDE2_STRING_L->len-*_FUNC_IDE2_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27838);}while(r); S_30910:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_A2,qbs_ucase(_FUNC_IDE2_STRING_L1))))||new_error){ if(qbevent){evnt(27839);if(r)goto S_30910;} S_30911:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDE2_STRING_LNKS,qbs_add(qbs_add(func_chr( 0 ),_FUNC_IDE2_STRING_L2),func_chr( 0 )),0)== 0 )))||new_error){ if(qbevent){evnt(27840);if(r)goto S_30911;} do{ *_FUNC_IDE2_LONG_LNKS=*_FUNC_IDE2_LONG_LNKS+ 1 ; if(!qbevent)break;evnt(27841);}while(r); S_30913:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_L2,_FUNC_IDE2_STRING_L1)))||new_error){ if(qbevent){evnt(27842);if(r)goto S_30913;} do{ qbs_set(_FUNC_IDE2_STRING_LNKS,qbs_add(qbs_add(func_chr( 0 ),_FUNC_IDE2_STRING_L2),_FUNC_IDE2_STRING_LNKS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27843);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_LNKS,qbs_add(qbs_add(_FUNC_IDE2_STRING_LNKS,_FUNC_IDE2_STRING_L2),func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27845);}while(r); } } } } dl_exit_3532:; do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(27850);}while(r); S_30922:; if ((*_FUNC_IDE2_LONG_LNKS)||new_error){ if(qbevent){evnt(27852);if(r)goto S_30922;} do{ qbs_set(_FUNC_IDE2_STRING_LNKS,func_mid(_FUNC_IDE2_STRING_LNKS, 2 ,_FUNC_IDE2_STRING_LNKS->len- 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27853);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LNK,_FUNC_IDE2_STRING_LNKS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27854);}while(r); S_30925:; if ((-(*_FUNC_IDE2_LONG_LNKS> 1 ))||new_error){ if(qbevent){evnt(27855);if(r)goto S_30925;} do{ qbs_set(_FUNC_IDE2_STRING_LNK,FUNC_IDEF1BOX(_FUNC_IDE2_STRING_LNKS,_FUNC_IDE2_LONG_LNKS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27857);}while(r); } LABEL_OPENHELPLNK:; if(qbevent){evnt(27861);r=0;} do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))=*__LONG_HELP_SX; if(!qbevent)break;evnt(27864);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))=*__LONG_HELP_SY; if(!qbevent)break;evnt(27865);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))=*__LONG_HELP_CX; if(!qbevent)break;evnt(27866);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))=*__LONG_HELP_CY; if(!qbevent)break;evnt(27867);}while(r); do{ *_FUNC_IDE2_LONG_TOP=func_ubound(__ARRAY_STRING_BACK,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27869);}while(r); S_30933:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])),_FUNC_IDE2_STRING_LNK)))||new_error){ if(qbevent){evnt(27872);if(r)goto S_30933;} do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS- 1 ; if(!qbevent)break;evnt(27872);}while(r); do{ goto LABEL_USENEXTENTRY2; if(!qbevent)break;evnt(27872);}while(r); } S_30937:; if ((-(*__LONG_HELP_BACK_POS<*_FUNC_IDE2_LONG_TOP))||new_error){ if(qbevent){evnt(27873);if(r)goto S_30937;} S_30938:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*__LONG_HELP_BACK_POS+ 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])),_FUNC_IDE2_STRING_LNK)))||new_error){ if(qbevent){evnt(27874);if(r)goto S_30938;} do{ goto LABEL_USENEXTENTRY2; if(!qbevent)break;evnt(27875);}while(r); } } do{ *_FUNC_IDE2_LONG_TOP=*_FUNC_IDE2_LONG_TOP+ 1 ; if(!qbevent)break;evnt(27880);}while(r); do{ if (__ARRAY_STRING_BACK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_BACK)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_BACK[2]&1){ preserved_elements=__ARRAY_STRING_BACK[5]; } else preserved_elements=0; __ARRAY_STRING_BACK[4]= 0 ; __ARRAY_STRING_BACK[5]=(*_FUNC_IDE2_LONG_TOP)-__ARRAY_STRING_BACK[4]+1; __ARRAY_STRING_BACK[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_BACK[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_HELP_BACK[2]&1){ preserved_elements=__ARRAY_UDT_HELP_BACK[5]; } else preserved_elements=0; __ARRAY_UDT_HELP_BACK[4]= 0 ; __ARRAY_UDT_HELP_BACK[5]=(*_FUNC_IDE2_LONG_TOP)-__ARRAY_UDT_HELP_BACK[4]+1; __ARRAY_UDT_HELP_BACK[6]=1; if (__ARRAY_UDT_HELP_BACK[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_HELP_BACK[0]),preserved_elements*128/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_HELP_BACK[0])); tmp_long=__ARRAY_UDT_HELP_BACK[5]; __ARRAY_UDT_HELP_BACK[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*128/8+1); memcpy((void*)(__ARRAY_UDT_HELP_BACK[0]),redim_preserve_cmem_buffer,preserved_elements*128/8+1); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_BACK_NAME[2]&1){ preserved_elements=__ARRAY_STRING_BACK_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_BACK_NAME[4]= 0 ; __ARRAY_STRING_BACK_NAME[5]=(*_FUNC_IDE2_LONG_TOP)-__ARRAY_STRING_BACK_NAME[4]+1; __ARRAY_STRING_BACK_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_BACK_NAME[5]; if (tmp_longfornext_finalvalue3537) break; } fornext_error3537:; if(qbevent){evnt(27885);if(r)goto S_30946;} do{ tmp_long=array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5])]))); if(!qbevent)break;evnt(27886);}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])]))); if(!qbevent)break;evnt(27887);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16)); if(!qbevent)break;evnt(27888);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4)); if(!qbevent)break;evnt(27889);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8)); if(!qbevent)break;evnt(27890);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X+ 1 )-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))=*(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12)); if(!qbevent)break;evnt(27891);}while(r); } fornext_exit_3536:; LABEL_USENEXTENTRY2:; if(qbevent){evnt(27893);r=0;} do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS+ 1 ; if(!qbevent)break;evnt(27894);}while(r); do{ tmp_long=array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[tmp_long])),_FUNC_IDE2_STRING_LNK); if(!qbevent)break;evnt(27895);}while(r); do{ tmp_long=array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK_NAME[4],__ARRAY_STRING_BACK_NAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_BACK_NAME[0]))[tmp_long])),FUNC_BACK2BACKNAME(_FUNC_IDE2_STRING_LNK)); if(!qbevent)break;evnt(27896);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16))= 1 ; if(!qbevent)break;evnt(27897);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+4))= 1 ; if(!qbevent)break;evnt(27898);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+8))= 1 ; if(!qbevent)break;evnt(27899);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_HELP_BACK[0])+((array_check((*__LONG_HELP_BACK_POS)-__ARRAY_UDT_HELP_BACK[4],__ARRAY_UDT_HELP_BACK[5]))*16+12))= 1 ; if(!qbevent)break;evnt(27900);}while(r); do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(27901);}while(r); do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(27901);}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(27901);}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(27901);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_WIKI(_FUNC_IDE2_STRING_LNK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27903);}while(r); S_30966:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(27905);if(r)goto S_30966;} S_30967:; if ((*__LONG_IDESUBWINDOW)||new_error){ if(qbevent){evnt(27906);if(r)goto S_30967;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(27906);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(27906);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(27906);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(27906);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(27906);}while(r); } do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(27907);}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(27907);}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(27908);}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(27908);}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(27908);}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(27908);}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(27908);}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(27908);}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27909);}while(r); do{ *__LONG_IDEHELP= 1 ; if(!qbevent)break;evnt(27910);}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(27911);}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27912);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(27913);}while(r); do{ goto LABEL_REDRAWEVERYTHING2; if(!qbevent)break;evnt(27913);}while(r); } do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(27916);}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(27917);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27918);}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27923);}while(r); } S_30996:; if ((*__LONG_KALT&(-(*__LONG_KB== 19200 )))||new_error){ if(qbevent){evnt(27928);if(r)goto S_30996;} do{ *_FUNC_IDE2_LONG_BMKREMOVED= 0 ; if(!qbevent)break;evnt(27929);}while(r); LABEL_BMKREMOVE:; if(qbevent){evnt(27930);r=0;} S_30998:; fornext_value3539= 1 ; fornext_finalvalue3539=*__LONG_IDEBMKN; fornext_step3539= 1 ; if (fornext_step3539<0) fornext_step_negative3539=1; else fornext_step_negative3539=0; if (new_error) goto fornext_error3539; goto fornext_entrylabel3539; while(1){ fornext_value3539=fornext_step3539+(*_FUNC_IDE2_LONG_B); fornext_entrylabel3539: *_FUNC_IDE2_LONG_B=fornext_value3539; if (fornext_step_negative3539){ if (fornext_value3539fornext_finalvalue3539) break; } fornext_error3539:; if(qbevent){evnt(27931);if(r)goto S_30998;} S_30999:; if ((-(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))==*__LONG_IDECY))||new_error){ if(qbevent){evnt(27932);if(r)goto S_30999;} S_31000:; fornext_value3541=*_FUNC_IDE2_LONG_B; fornext_finalvalue3541=*__LONG_IDEBMKN- 1 ; fornext_step3541= 1 ; if (fornext_step3541<0) fornext_step_negative3541=1; else fornext_step_negative3541=0; if (new_error) goto fornext_error3541; goto fornext_entrylabel3541; while(1){ fornext_value3541=fornext_step3541+(*_FUNC_IDE2_LONG_B2); fornext_entrylabel3541: *_FUNC_IDE2_LONG_B2=fornext_value3541; if (fornext_step_negative3541){ if (fornext_value3541fornext_finalvalue3541) break; } fornext_error3541:; if(qbevent){evnt(27933);if(r)goto S_31000;} do{ memcpy((((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)),(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2+ 1 )-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)),16); if(!qbevent)break;evnt(27934);}while(r); } fornext_exit_3540:; do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN- 1 ; if(!qbevent)break;evnt(27936);}while(r); do{ *_FUNC_IDE2_LONG_BMKREMOVED= 1 ; if(!qbevent)break;evnt(27937);}while(r); do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(27938);}while(r); do{ goto LABEL_BMKREMOVE; if(!qbevent)break;evnt(27939);}while(r); } } fornext_exit_3538:; S_31009:; if ((-(*_FUNC_IDE2_LONG_BMKREMOVED== 0 ))||new_error){ if(qbevent){evnt(27942);if(r)goto S_31009;} do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN+ 1 ; if(!qbevent)break;evnt(27943);}while(r); S_31011:; if ((-(*__LONG_IDEBMKN>func_ubound(__ARRAY_UDT_IDEBMK,1,1)))||new_error){ if(qbevent){evnt(27944);if(r)goto S_31011;} do{ *_FUNC_IDE2_LONG_X=func_ubound(__ARRAY_UDT_IDEBMK,1,1)* 2 ; if(!qbevent)break;evnt(27944);}while(r); do{ if (__ARRAY_UDT_IDEBMK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDEBMK)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_IDEBMK[2]&1){ preserved_elements=__ARRAY_UDT_IDEBMK[5]; } else preserved_elements=0; __ARRAY_UDT_IDEBMK[4]= 0 ; __ARRAY_UDT_IDEBMK[5]=(*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_IDEBMK[4]+1; __ARRAY_UDT_IDEBMK[6]=1; if (__ARRAY_UDT_IDEBMK[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_IDEBMK[0]),preserved_elements*128/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDEBMK[0])); tmp_long=__ARRAY_UDT_IDEBMK[5]; __ARRAY_UDT_IDEBMK[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*128/8+1); memcpy((void*)(__ARRAY_UDT_IDEBMK[0]),redim_preserve_cmem_buffer,preserved_elements*128/8+1); if (preserved_elements*__LONG_IDEN))||new_error){ if(qbevent){evnt(27974);if(r)goto S_31060;} do{ *_FUNC_IDE2_LONG_L= 1 ; if(!qbevent)break;evnt(27974);}while(r); } S_31063:; fornext_value3546= 1 ; fornext_finalvalue3546=*__LONG_IDEBMKN; fornext_step3546= 1 ; if (fornext_step3546<0) fornext_step_negative3546=1; else fornext_step_negative3546=0; if (new_error) goto fornext_error3546; goto fornext_entrylabel3546; while(1){ fornext_value3546=fornext_step3546+(*_FUNC_IDE2_LONG_B); fornext_entrylabel3546: *_FUNC_IDE2_LONG_B=fornext_value3546; if (fornext_step_negative3546){ if (fornext_value3546fornext_finalvalue3546) break; } fornext_error3546:; if(qbevent){evnt(27975);if(r)goto S_31063;} S_31064:; if ((-(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))==*_FUNC_IDE2_LONG_L))||new_error){ if(qbevent){evnt(27976);if(r)goto S_31064;} do{ goto dl_exit_3544; if(!qbevent)break;evnt(27976);}while(r); } } fornext_exit_3545:; }while(1); dl_exit_3544:; do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(27979);}while(r); do{ *__LONG_IDECX=*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+4)); if(!qbevent)break;evnt(27980);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(27981);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27982);}while(r); } S_31074:; if ((*__LONG_KALT&(-(*__LONG_KB== 19712 )))||new_error){ if(qbevent){evnt(27985);if(r)goto S_31074;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(27987);}while(r); } S_31077:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(27991);if(r)goto S_31077;} S_31078:; if (((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(27992);if(r)goto S_31078;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(27993);}while(r); do{ *__LONG_IDECX=*__LONG_MX- 1 +*__LONG_IDESX- 1 ; if(!qbevent)break;evnt(27994);}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(27995);}while(r); S_31082:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(27996);if(r)goto S_31082;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(27996);}while(r); } do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(27997);}while(r); do{ *__LONG_IDESELECTX1=*__LONG_IDECX; if(!qbevent)break;evnt(27997);}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(27997);}while(r); do{ *__LONG_IDEMOUSESELECT= 1 ; if(!qbevent)break;evnt(27998);}while(r); } } S_31091:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(28002);if(r)goto S_31091;} S_31092:; if ((-(*__LONG_MX==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(28003);if(r)goto S_31092;} S_31093:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(28004);if(r)goto S_31093;} do{ *_FUNC_IDE2_LONG_Y=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3547= 3 ),&(pass3548=*__LONG_IDEWY- 8 ),__LONG_IDECY,__LONG_IDEN); if(!qbevent)break;evnt(28005);}while(r); S_31095:; if ((-(*_FUNC_IDE2_LONG_Y==*__LONG_MY))||new_error){ if(qbevent){evnt(28006);if(r)goto S_31095;} do{ *__LONG_IDEMOUSESELECT= 2 ; if(!qbevent)break;evnt(28007);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28008);}while(r); } } } } S_31102:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(28014);if(r)goto S_31102;} S_31103:; if ((-(*__LONG_MY==(*__LONG_IDEWY- 5 )))||new_error){ if(qbevent){evnt(28015);if(r)goto S_31103;} do{ *_FUNC_IDE2_LONG_X=FUNC_IDEHBAR(&(pass3549= 2 ),&(pass3550=*__LONG_IDEWY- 5 ),&(pass3551=*__LONG_IDEWX- 2 ),__LONG_IDESX,&(pass3552= 608 )); if(!qbevent)break;evnt(28016);}while(r); S_31105:; if ((-(*_FUNC_IDE2_LONG_X==*__LONG_MX))||new_error){ if(qbevent){evnt(28017);if(r)goto S_31105;} do{ *__LONG_IDEMOUSESELECT= 3 ; if(!qbevent)break;evnt(28018);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28019);}while(r); } } } S_31111:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 0 )))||new_error){ if(qbevent){evnt(28024);if(r)goto S_31111;} S_31112:; if (((-(*__LONG_MX==*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(28025);if(r)goto S_31112;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28026);}while(r); S_31114:; if ((-(*__LONG_MY== 3 ))||new_error){ if(qbevent){evnt(28027);if(r)goto S_31114;} do{ *__LONG_KB= 18432 ; if(!qbevent)break;evnt(28027);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28027);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28027);}while(r); } S_31119:; if ((-(*__LONG_MY==(*__LONG_IDEWY- 6 )))||new_error){ if(qbevent){evnt(28028);if(r)goto S_31119;} do{ *__LONG_KB= 20480 ; if(!qbevent)break;evnt(28028);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28028);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28028);}while(r); } S_31124:; if (((-(*__LONG_MY> 3 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 6 ))))||new_error){ if(qbevent){evnt(28029);if(r)goto S_31124;} S_31125:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(28031);if(r)goto S_31125;} do{ *_FUNC_IDE2_LONG_Y=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3553= 3 ),&(pass3554=*__LONG_IDEWY- 8 ),__LONG_IDECY,__LONG_IDEN); if(!qbevent)break;evnt(28032);}while(r); S_31127:; if ((-(*_FUNC_IDE2_LONG_Y!=*__LONG_MY))||new_error){ if(qbevent){evnt(28033);if(r)goto S_31127;} S_31128:; if ((-(*__LONG_MY<*_FUNC_IDE2_LONG_Y))||new_error){ if(qbevent){evnt(28034);if(r)goto S_31128;} do{ *__LONG_KB= 18688 ; if(!qbevent)break;evnt(28035);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28035);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28035);}while(r); }else{ do{ *__LONG_KB= 20736 ; if(!qbevent)break;evnt(28037);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28037);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28037);}while(r); } } } } } } S_31142:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 0 )))||new_error){ if(qbevent){evnt(28045);if(r)goto S_31142;} S_31143:; if (((-(*__LONG_MY==(*__LONG_IDEWY- 5 )))&(-(*__LONG_MX> 1 ))&(-(*__LONG_MX<*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(28046);if(r)goto S_31143;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28047);}while(r); S_31145:; if ((-(*__LONG_MX== 2 ))||new_error){ if(qbevent){evnt(28048);if(r)goto S_31145;} do{ *__LONG_KB= 19200 ; if(!qbevent)break;evnt(28048);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28048);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28048);}while(r); } S_31150:; if ((-(*__LONG_MX==(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(28049);if(r)goto S_31150;} do{ *__LONG_KB= 19712 ; if(!qbevent)break;evnt(28049);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28049);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28049);}while(r); } S_31155:; if (((-(*__LONG_MX> 2 ))&(-(*__LONG_MX<(*__LONG_IDEWX- 1 ))))||new_error){ if(qbevent){evnt(28050);if(r)goto S_31155;} do{ *_FUNC_IDE2_LONG_X=FUNC_IDEHBAR(&(pass3555= 2 ),&(pass3556=*__LONG_IDEWY- 5 ),&(pass3557=*__LONG_IDEWX- 2 ),__LONG_IDESX,&(pass3558= 608 )); if(!qbevent)break;evnt(28052);}while(r); S_31157:; if ((-(*_FUNC_IDE2_LONG_X!=*__LONG_MX))||new_error){ if(qbevent){evnt(28053);if(r)goto S_31157;} S_31158:; if ((-(*__LONG_MX<*_FUNC_IDE2_LONG_X))||new_error){ if(qbevent){evnt(28054);if(r)goto S_31158;} do{ *__LONG_IDECX=*__LONG_IDECX- 8 ; if(!qbevent)break;evnt(28055);}while(r); S_31160:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(28056);if(r)goto S_31160;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28056);}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28057);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28057);}while(r); }else{ do{ *__LONG_IDECX=*__LONG_IDECX+ 8 ; if(!qbevent)break;evnt(28059);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28060);}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(28060);}while(r); } } } } } S_31174:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 2 )))||new_error){ if(qbevent){evnt(28068);if(r)goto S_31174;} S_31175:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(28070);if(r)goto S_31175;} S_31176:; if ((-(*__LONG_MY<= 4 ))||new_error){ if(qbevent){evnt(28071);if(r)goto S_31176;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(28071);}while(r); } S_31179:; if ((-(*__LONG_MY>=(*__LONG_IDEWY- 7 )))||new_error){ if(qbevent){evnt(28072);if(r)goto S_31179;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28072);}while(r); } S_31182:; if (((-(*__LONG_MY> 4 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 7 ))))||new_error){ if(qbevent){evnt(28073);if(r)goto S_31182;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY; if(!qbevent)break;evnt(28074);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_Y- 3 - 2 + 0.5E+0 ; if(!qbevent)break;evnt(28075);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ ((*__LONG_IDEWY- 8 )- 4 ); if(!qbevent)break;evnt(28076);}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P*(*__LONG_IDEN- 1 ))+( 1 )); if(!qbevent)break;evnt(28077);}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(28078);}while(r); } } } S_31191:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 3 )))||new_error){ if(qbevent){evnt(28083);if(r)goto S_31191;} S_31192:; if ((-(*__LONG_MX<= 3 ))||new_error){ if(qbevent){evnt(28085);if(r)goto S_31192;} do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(28085);}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(28085);}while(r); } S_31196:; if ((-(*__LONG_MX>=(*__LONG_IDEWX- 2 )))||new_error){ if(qbevent){evnt(28086);if(r)goto S_31196;} do{ *__LONG_IDESX= 608 ; if(!qbevent)break;evnt(28086);}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(28086);}while(r); } S_31200:; if (((-(*__LONG_MX> 3 ))&(-(*__LONG_MX<(*__LONG_IDEWX- 2 ))))||new_error){ if(qbevent){evnt(28087);if(r)goto S_31200;} do{ *_FUNC_IDE2_LONG_X=*__LONG_MX; if(!qbevent)break;evnt(28088);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_X- 2 - 2 + 0.5E+0 ; if(!qbevent)break;evnt(28089);}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ ((*__LONG_IDEWX- 2 )- 4 ); if(!qbevent)break;evnt(28090);}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P*( 608 - 1 ))+( 1 )); if(!qbevent)break;evnt(28091);}while(r); do{ *__LONG_IDESX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(28092);}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(28093);}while(r); } } S_31209:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT<= 1 )))||new_error){ if(qbevent){evnt(28097);if(r)goto S_31209;} S_31210:; if (((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(28098);if(r)goto S_31210;} S_31211:; if ((-(*__LONG_IDEMOUSESELECT== 1 ))||new_error){ if(qbevent){evnt(28099);if(r)goto S_31211;} do{ *__LONG_IDECX=*__LONG_MX- 1 +*__LONG_IDESX- 1 ; if(!qbevent)break;evnt(28100);}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(28101);}while(r); S_31214:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(28102);if(r)goto S_31214;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28102);}while(r); } } } } S_31220:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(28107);if(r)goto S_31220;} S_31221:; if (((-(*__LONG_MX== 1 ))|(-(*__LONG_MX==*__LONG_IDEWX))|(-(*__LONG_MY<= 2 ))|(-(*__LONG_MY>=(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(28108);if(r)goto S_31221;} S_31222:; if ((-(*__LONG_IDEMOUSESELECT== 1 ))||new_error){ if(qbevent){evnt(28109);if(r)goto S_31222;} S_31223:; if ((-(*__LONG_MY>=(*__LONG_IDEWY- 5 )))||new_error){ if(qbevent){evnt(28112);if(r)goto S_31223;} do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(28112);}while(r); S_31225:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(28112);if(r)goto S_31225;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28112);}while(r); } } S_31229:; if ((-(*__LONG_MY<= 2 ))||new_error){ if(qbevent){evnt(28113);if(r)goto S_31229;} do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(28113);}while(r); S_31231:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(28113);if(r)goto S_31231;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(28113);}while(r); } } S_31235:; if ((-(*__LONG_MX== 1 ))||new_error){ if(qbevent){evnt(28114);if(r)goto S_31235;} do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(28114);}while(r); S_31237:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(28114);if(r)goto S_31237;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28114);}while(r); } } S_31241:; if ((-(*__LONG_MX==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(28115);if(r)goto S_31241;} do{ *__LONG_IDECX=*__LONG_IDECX+ 1 ; if(!qbevent)break;evnt(28115);}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(28116);}while(r); } } } S_31248:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("A",1)))))||new_error){ if(qbevent){evnt(28127);if(r)goto S_31248;} LABEL_IDEMSELECTALL:; if(qbevent){evnt(28128);r=0;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(28129);}while(r); do{ *__LONG_IDESELECTX1= 1 ; if(!qbevent)break;evnt(28129);}while(r); do{ *__LONG_IDESELECTY1= 1 ; if(!qbevent)break;evnt(28129);}while(r); do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28130);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28131);}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28132);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28133);}while(r); } S_31257:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 60 ))))))||new_error){ if(qbevent){evnt(28136);if(r)goto S_31257;} do{ goto LABEL_IDESUBSJMP; if(!qbevent)break;evnt(28137);}while(r); } S_31260:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Z",1)))))||new_error){ if(qbevent){evnt(28140);if(r)goto S_31260;} LABEL_IDEMUNDO:; if(qbevent){evnt(28141);r=0;} S_31261:; if ((*__LONG_IDEUNDOPOS)||new_error){ if(qbevent){evnt(28142);if(r)goto S_31261;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("undo2.bin",9)), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28143);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28144);}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28144);}while(r); do{ *_FUNC_IDE2_LONG_P1=string2l(func_mid(_FUNC_IDE2_STRING_H, 1 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28144);}while(r); do{ *_FUNC_IDE2_LONG_P2=string2l(func_mid(_FUNC_IDE2_STRING_H, 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28144);}while(r); do{ *_FUNC_IDE2_LONG_PLAST=string2l(func_mid(_FUNC_IDE2_STRING_H, 9 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28144);}while(r); do{ *_FUNC_IDE2_LONG_U= 0 ; if(!qbevent)break;evnt(28147);}while(r); S_31269:; if ((-(*_FUNC_IDE2_LONG_P2>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(28148);if(r)goto S_31269;} S_31270:; if ((-(*__LONG_IDEUNDOPOS>*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(28150);if(r)goto S_31270;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_3560),1); if(!qbevent)break;evnt(28151);}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS- 4 -*_FUNC_IDE2_LONG_UPL- 4 ; if(!qbevent)break;evnt(28152);}while(r); } }else{ S_31275:; if ((-(*__LONG_IDEUNDOPOS>*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(28156);if(r)goto S_31275;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_3561),1); if(!qbevent)break;evnt(28157);}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS- 4 -*_FUNC_IDE2_LONG_UPL- 4 ; if(!qbevent)break;evnt(28158);}while(r); } S_31279:; if ((-(*__LONG_IDEUNDOPOS<=*_FUNC_IDE2_LONG_P2))||new_error){ if(qbevent){evnt(28160);if(r)goto S_31279;} S_31280:; if ((-(*__LONG_IDEUNDOPOS== 13 ))||new_error){ if(qbevent){evnt(28161);if(r)goto S_31280;} do{ *_FUNC_IDE2_LONG_U=*_FUNC_IDE2_LONG_PLAST; if(!qbevent)break;evnt(28162);}while(r); }else{ do{ sub_get( 150 ,*__LONG_IDEUNDOPOS- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_3562),1); if(!qbevent)break;evnt(28164);}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS- 4 -*_FUNC_IDE2_LONG_UPL- 4 ; if(!qbevent)break;evnt(28165);}while(r); } } } S_31288:; if ((*_FUNC_IDE2_LONG_U)||new_error){ if(qbevent){evnt(28170);if(r)goto S_31288;} S_31289:; if ((-(*__LONG_IDEUNDOPOS==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(28172);if(r)goto S_31289;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28175);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_WHAT,FUNC_IDEYESNOBOX(qbs_new_txt_len("Undo",4),qbs_new_txt_len("Undo through previous program content?",38))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28176);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28177);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(28177);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(28177);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(28177);}while(r); S_31296:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_WHAT,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(28178);if(r)goto S_31296;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(28179);}while(r); do{ goto LABEL_SKIPUNDO; if(!qbevent)break;evnt(28180);}while(r); } S_31300:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDEUNSAVED== 1 ))&(qbs_notequal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(28182);if(r)goto S_31300;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28183);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28184);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28185);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(28185);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(28185);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(28185);}while(r); S_31307:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(28186);if(r)goto S_31307;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(28186);}while(r); do{ goto LABEL_SKIPUNDO; if(!qbevent)break;evnt(28186);}while(r); } S_31311:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(28187);if(r)goto S_31311;} do{ SUB_IDESAVE(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28188);}while(r); } } do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(28191);}while(r); do{ qbs_set(__STRING_IDEPROGNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28192);}while(r); do{ sub__title(qbs_new_txt_len("QB64",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28193);}while(r); do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(28194);}while(r); } do{ *__LONG_IDEUNDOPOS=*_FUNC_IDE2_LONG_U; if(!qbevent)break;evnt(28197);}while(r); do{ sub_seek( 150 ,*_FUNC_IDE2_LONG_U); if(!qbevent)break;evnt(28200);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_L2,4,byte_element_3563),0); if(!qbevent)break;evnt(28201);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESX,4,byte_element_3564),0); if(!qbevent)break;evnt(28202);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESY,4,byte_element_3565),0); if(!qbevent)break;evnt(28202);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECX,4,byte_element_3566),0); if(!qbevent)break;evnt(28203);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECY,4,byte_element_3567),0); if(!qbevent)break;evnt(28203);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECT,4,byte_element_3568),0); if(!qbevent)break;evnt(28204);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTX1,4,byte_element_3569),0); if(!qbevent)break;evnt(28204);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTY1,4,byte_element_3570),0); if(!qbevent)break;evnt(28204);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEN,4,byte_element_3571),0); if(!qbevent)break;evnt(28205);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEL,4,byte_element_3572),0); if(!qbevent)break;evnt(28206);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDELI,4,byte_element_3573),0); if(!qbevent)break;evnt(28207);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEBMKN,4,byte_element_3574),0); if(!qbevent)break;evnt(28209);}while(r); do{ if (__ARRAY_UDT_IDEBMK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDEBMK)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_IDEBMK[2]&1){ if (__ARRAY_UDT_IDEBMK[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDEBMK[0])); }else{ free((void*)(__ARRAY_UDT_IDEBMK[0])); } } __ARRAY_UDT_IDEBMK[4]= 0 ; __ARRAY_UDT_IDEBMK[5]=(*__LONG_IDEBMKN+ 1 )-__ARRAY_UDT_IDEBMK[4]+1; __ARRAY_UDT_IDEBMK[6]=1; if (__ARRAY_UDT_IDEBMK[2]&4){ __ARRAY_UDT_IDEBMK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_IDEBMK[5]*128/8+1); memset((void*)(__ARRAY_UDT_IDEBMK[0]),0,__ARRAY_UDT_IDEBMK[5]*128/8+1); }else{ __ARRAY_UDT_IDEBMK[0]=(ptrszint)calloc(__ARRAY_UDT_IDEBMK[5]*128/8+1,1); if (!__ARRAY_UDT_IDEBMK[0]) error(257); } __ARRAY_UDT_IDEBMK[2]|=1; } if(!qbevent)break;evnt(28209);}while(r); S_31335:; fornext_value3576= 1 ; fornext_finalvalue3576=*__LONG_IDEBMKN; fornext_step3576= 1 ; if (fornext_step3576<0) fornext_step_negative3576=1; else fornext_step_negative3576=0; if (new_error) goto fornext_error3576; goto fornext_entrylabel3576; while(1){ fornext_value3576=fornext_step3576+(*_FUNC_IDE2_LONG_BI); fornext_entrylabel3576: *_FUNC_IDE2_LONG_BI=fornext_value3576; if (fornext_step_negative3576){ if (fornext_value3576fornext_finalvalue3576) break; } fornext_error3576:; if(qbevent){evnt(28210);if(r)goto S_31335;} do{ sub_get( 150 ,NULL,byte_element((uint64)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)),4,byte_element_3577),0); if(!qbevent)break;evnt(28210);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+4)),4,byte_element_3578),0); if(!qbevent)break;evnt(28210);}while(r); } fornext_exit_3575:; do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_X,4,byte_element_3579),0); if(!qbevent)break;evnt(28211);}while(r); do{ qbs_set(__STRING_IDET,func_space(*_FUNC_IDE2_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28211);}while(r); do{ sub_get2( 150 ,NULL,__STRING_IDET,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28211);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28213);}while(r); do{ *__LONG_IDENOUNDO= 1 ; if(!qbevent)break;evnt(28213);}while(r); } LABEL_SKIPUNDO:; if(qbevent){evnt(28217);r=0;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(28218);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28220);}while(r); } S_31349:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1)))))||new_error){ if(qbevent){evnt(28225);if(r)goto S_31349;} LABEL_IDEMREDO:; if(qbevent){evnt(28226);r=0;} S_31350:; if ((*__LONG_IDEUNDOPOS)||new_error){ if(qbevent){evnt(28227);if(r)goto S_31350;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("undo2.bin",9)), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28228);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28229);}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28229);}while(r); do{ *_FUNC_IDE2_LONG_P1=string2l(func_mid(_FUNC_IDE2_STRING_H, 1 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28229);}while(r); do{ *_FUNC_IDE2_LONG_P2=string2l(func_mid(_FUNC_IDE2_STRING_H, 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28229);}while(r); do{ *_FUNC_IDE2_LONG_PLAST=string2l(func_mid(_FUNC_IDE2_STRING_H, 9 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28229);}while(r); do{ *_FUNC_IDE2_LONG_U= 0 ; if(!qbevent)break;evnt(28232);}while(r); S_31358:; if ((-(*_FUNC_IDE2_LONG_P2>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(28233);if(r)goto S_31358;} S_31359:; if ((-(*__LONG_IDEUNDOPOS<*_FUNC_IDE2_LONG_P2))||new_error){ if(qbevent){evnt(28235);if(r)goto S_31359;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_3580),1); if(!qbevent)break;evnt(28236);}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS+ 4 +*_FUNC_IDE2_LONG_UPL+ 4 ; if(!qbevent)break;evnt(28237);}while(r); } }else{ S_31364:; if ((-(*__LONG_IDEUNDOPOS>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(28241);if(r)goto S_31364;} S_31365:; if ((-(*__LONG_IDEUNDOPOS==*_FUNC_IDE2_LONG_PLAST))||new_error){ if(qbevent){evnt(28242);if(r)goto S_31365;} do{ *_FUNC_IDE2_LONG_U= 13 ; if(!qbevent)break;evnt(28243);}while(r); }else{ do{ sub_get( 150 ,*__LONG_IDEUNDOPOS,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_3581),1); if(!qbevent)break;evnt(28245);}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS+ 4 +*_FUNC_IDE2_LONG_UPL+ 4 ; if(!qbevent)break;evnt(28246);}while(r); } }else{ S_31372:; if ((-(*__LONG_IDEUNDOPOS<*_FUNC_IDE2_LONG_P2))||new_error){ if(qbevent){evnt(28249);if(r)goto S_31372;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_3582),1); if(!qbevent)break;evnt(28250);}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS+ 4 +*_FUNC_IDE2_LONG_UPL+ 4 ; if(!qbevent)break;evnt(28251);}while(r); } } } S_31378:; if ((*_FUNC_IDE2_LONG_U)||new_error){ if(qbevent){evnt(28256);if(r)goto S_31378;} do{ *__LONG_IDEUNDOPOS=*_FUNC_IDE2_LONG_U; if(!qbevent)break;evnt(28258);}while(r); do{ sub_seek( 150 ,*_FUNC_IDE2_LONG_U); if(!qbevent)break;evnt(28261);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_L2,4,byte_element_3583),0); if(!qbevent)break;evnt(28262);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESX,4,byte_element_3584),0); if(!qbevent)break;evnt(28263);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESY,4,byte_element_3585),0); if(!qbevent)break;evnt(28263);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECX,4,byte_element_3586),0); if(!qbevent)break;evnt(28264);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECY,4,byte_element_3587),0); if(!qbevent)break;evnt(28264);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECT,4,byte_element_3588),0); if(!qbevent)break;evnt(28265);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTX1,4,byte_element_3589),0); if(!qbevent)break;evnt(28265);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTY1,4,byte_element_3590),0); if(!qbevent)break;evnt(28265);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEN,4,byte_element_3591),0); if(!qbevent)break;evnt(28266);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEL,4,byte_element_3592),0); if(!qbevent)break;evnt(28267);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDELI,4,byte_element_3593),0); if(!qbevent)break;evnt(28268);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEBMKN,4,byte_element_3594),0); if(!qbevent)break;evnt(28270);}while(r); do{ if (__ARRAY_UDT_IDEBMK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDEBMK)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_IDEBMK[2]&1){ if (__ARRAY_UDT_IDEBMK[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDEBMK[0])); }else{ free((void*)(__ARRAY_UDT_IDEBMK[0])); } } __ARRAY_UDT_IDEBMK[4]= 0 ; __ARRAY_UDT_IDEBMK[5]=(*__LONG_IDEBMKN+ 1 )-__ARRAY_UDT_IDEBMK[4]+1; __ARRAY_UDT_IDEBMK[6]=1; if (__ARRAY_UDT_IDEBMK[2]&4){ __ARRAY_UDT_IDEBMK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_IDEBMK[5]*128/8+1); memset((void*)(__ARRAY_UDT_IDEBMK[0]),0,__ARRAY_UDT_IDEBMK[5]*128/8+1); }else{ __ARRAY_UDT_IDEBMK[0]=(ptrszint)calloc(__ARRAY_UDT_IDEBMK[5]*128/8+1,1); if (!__ARRAY_UDT_IDEBMK[0]) error(257); } __ARRAY_UDT_IDEBMK[2]|=1; } if(!qbevent)break;evnt(28270);}while(r); S_31394:; fornext_value3596= 1 ; fornext_finalvalue3596=*__LONG_IDEBMKN; fornext_step3596= 1 ; if (fornext_step3596<0) fornext_step_negative3596=1; else fornext_step_negative3596=0; if (new_error) goto fornext_error3596; goto fornext_entrylabel3596; while(1){ fornext_value3596=fornext_step3596+(*_FUNC_IDE2_LONG_BI); fornext_entrylabel3596: *_FUNC_IDE2_LONG_BI=fornext_value3596; if (fornext_step_negative3596){ if (fornext_value3596fornext_finalvalue3596) break; } fornext_error3596:; if(qbevent){evnt(28271);if(r)goto S_31394;} do{ sub_get( 150 ,NULL,byte_element((uint64)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)),4,byte_element_3597),0); if(!qbevent)break;evnt(28271);}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_BI)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+4)),4,byte_element_3598),0); if(!qbevent)break;evnt(28271);}while(r); } fornext_exit_3595:; do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_X,4,byte_element_3599),0); if(!qbevent)break;evnt(28272);}while(r); do{ qbs_set(__STRING_IDET,func_space(*_FUNC_IDE2_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28272);}while(r); do{ sub_get2( 150 ,NULL,__STRING_IDET,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28272);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28274);}while(r); do{ *__LONG_IDENOUNDO= 1 ; if(!qbevent)break;evnt(28274);}while(r); } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(28278);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28280);}while(r); } S_31408:; if ((qbs_cleanup(qbs_tmp_base,(((*__LONG_KSHIFT&(-(*__LONG_KB== 21248 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("X",1))))))&(-(*__LONG_IDESELECT== 1 ))))||new_error){ if(qbevent){evnt(28284);if(r)goto S_31408;} LABEL_IDEMCUT:; if(qbevent){evnt(28285);r=0;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28286);}while(r); do{ goto LABEL_COPY2CLIP; if(!qbevent)break;evnt(28287);}while(r); } S_31412:; if (((-(*__LONG_KB== 21248 ))&(-(*__LONG_IDESELECT== 1 )))||new_error){ if(qbevent){evnt(28290);if(r)goto S_31412;} S_31413:; if (((-(*__LONG_IDESELECTY1!=*__LONG_IDECY))|(-(*__LONG_IDESELECTX1!=*__LONG_IDECX)))||new_error){ if(qbevent){evnt(28291);if(r)goto S_31413;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28292);}while(r); do{ return_point[next_return_point++]=1; if (next_return_point>=return_points) more_return_points(); goto LABEL_DELSELECT; RETURN_1:; if(!qbevent)break;evnt(28293);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28294);}while(r); }else{ do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28296);}while(r); } } S_31421:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("V",1))))))||new_error){ if(qbevent){evnt(28301);if(r)goto S_31421;} LABEL_IDEMPASTE:; if(qbevent){evnt(28302);r=0;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28304);}while(r); S_31423:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_CLIP->len))||new_error){ if(qbevent){evnt(28306);if(r)goto S_31423;} S_31424:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(28307);if(r)goto S_31424;} do{ return_point[next_return_point++]=2; if (next_return_point>=return_points) more_return_points(); goto LABEL_DELSELECT; RETURN_2:; if(!qbevent)break;evnt(28307);}while(r); } S_31427:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_CLIP,func_chr( 13 ),0)|func_instr(NULL,_FUNC_IDE2_STRING_CLIP,func_chr( 10 ),0)))||new_error){ if(qbevent){evnt(28308);if(r)goto S_31427;} do{ *__LONG_IDELAYOUTALLOW= 2 ; if(!qbevent)break;evnt(28312);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28313);}while(r); do{ *_FUNC_IDE2_LONG_X3= 1 ; if(!qbevent)break;evnt(28314);}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(28315);}while(r); LABEL_FULLPASTENEXTLINE:; if(qbevent){evnt(28317);r=0;} do{ *_FUNC_IDE2_LONG_X=func_instr(*_FUNC_IDE2_LONG_X3,_FUNC_IDE2_STRING_A,func_chr( 13 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28319);}while(r); do{ *_FUNC_IDE2_LONG_X2=func_instr(*_FUNC_IDE2_LONG_X3,_FUNC_IDE2_STRING_A,func_chr( 10 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28320);}while(r); S_31434:; if ((-(*_FUNC_IDE2_LONG_X== 0 ))||new_error){ if(qbevent){evnt(28321);if(r)goto S_31434;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(28321);}while(r); } S_31437:; if ((-(*_FUNC_IDE2_LONG_X2== 0 ))||new_error){ if(qbevent){evnt(28322);if(r)goto S_31437;} do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(28322);}while(r); } S_31440:; if ((-(*_FUNC_IDE2_LONG_X2<*_FUNC_IDE2_LONG_X))||new_error){ if(qbevent){evnt(28323);if(r)goto S_31440;} do{ swap_32(&*_FUNC_IDE2_LONG_X,&*_FUNC_IDE2_LONG_X2); if(!qbevent)break;evnt(28323);}while(r); } S_31443:; if ((-(*_FUNC_IDE2_LONG_X2>(*_FUNC_IDE2_LONG_X+ 1 )))||new_error){ if(qbevent){evnt(28324);if(r)goto S_31443;} do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(28324);}while(r); } S_31446:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(28327);if(r)goto S_31446;} do{ SUB_IDEINSLINE(&(pass3601=*__LONG_IDECY+*_FUNC_IDE2_LONG_I),FUNC_CONVERTTABS(func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X3,*_FUNC_IDE2_LONG_X-*_FUNC_IDE2_LONG_X3,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28328);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(28329);}while(r); do{ *_FUNC_IDE2_LONG_X3=*_FUNC_IDE2_LONG_X2+ 1 ; if(!qbevent)break;evnt(28330);}while(r); }else{ do{ SUB_IDEINSLINE(&(pass3602=*__LONG_IDECY+*_FUNC_IDE2_LONG_I),FUNC_CONVERTTABS(func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X3,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_X3+ 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28332);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(28333);}while(r); do{ *_FUNC_IDE2_LONG_X3=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28334);}while(r); } S_31455:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X3<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28337);if(r)goto S_31455;} do{ goto LABEL_FULLPASTENEXTLINE; if(!qbevent)break;evnt(28337);}while(r); } }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28342);}while(r); S_31460:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDE2_STRING_A->len)<(*__LONG_IDECX- 1 ))))||new_error){ if(qbevent){evnt(28343);if(r)goto S_31460;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,func_space(*__LONG_IDECX- 1 -_FUNC_IDE2_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28343);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX- 1 ),_FUNC_IDE2_STRING_CLIP),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28344);}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,FUNC_CONVERTTABS(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28345);}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28349);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28351);}while(r); } S_31470:; if ((qbs_cleanup(qbs_tmp_base,(((*__LONG_KCTRL&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1))))))&(-(*__LONG_IDESELECT== 1 ))))||new_error){ if(qbevent){evnt(28354);if(r)goto S_31470;} LABEL_COPY2CLIP:; if(qbevent){evnt(28355);r=0;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28356);}while(r); do{ *_FUNC_IDE2_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(28357);}while(r); do{ *_FUNC_IDE2_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(28358);}while(r); S_31474:; if ((-(*_FUNC_IDE2_LONG_SY1>*_FUNC_IDE2_LONG_SY2))||new_error){ if(qbevent){evnt(28359);if(r)goto S_31474;} do{ swap_32(&*_FUNC_IDE2_LONG_SY1,&*_FUNC_IDE2_LONG_SY2); if(!qbevent)break;evnt(28359);}while(r); } do{ *_FUNC_IDE2_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(28360);}while(r); do{ *_FUNC_IDE2_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(28361);}while(r); S_31479:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(28362);if(r)goto S_31479;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(28362);}while(r); } S_31482:; fornext_value3610=*_FUNC_IDE2_LONG_SY1; fornext_finalvalue3610=*_FUNC_IDE2_LONG_SY2; fornext_step3610= 1 ; if (fornext_step3610<0) fornext_step_negative3610=1; else fornext_step_negative3610=0; if (new_error) goto fornext_error3610; goto fornext_entrylabel3610; while(1){ fornext_value3610=fornext_step3610+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel3610: *_FUNC_IDE2_LONG_Y=fornext_value3610; if (fornext_step_negative3610){ if (fornext_value3610fornext_finalvalue3610) break; } fornext_error3610:; if(qbevent){evnt(28363);if(r)goto S_31482;} S_31483:; if ((-(*_FUNC_IDE2_LONG_Y<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(28364);if(r)goto S_31483;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28365);}while(r); S_31485:; if ((-(*_FUNC_IDE2_LONG_SY1==*_FUNC_IDE2_LONG_SY2))||new_error){ if(qbevent){evnt(28366);if(r)goto S_31485;} S_31486:; fornext_value3612=*_FUNC_IDE2_LONG_SX1; fornext_finalvalue3612=*_FUNC_IDE2_LONG_SX2- 1 ; fornext_step3612= 1 ; if (fornext_step3612<0) fornext_step_negative3612=1; else fornext_step_negative3612=0; if (new_error) goto fornext_error3612; goto fornext_entrylabel3612; while(1){ fornext_value3612=fornext_step3612+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3612: *_FUNC_IDE2_LONG_X=fornext_value3612; if (fornext_step_negative3612){ if (fornext_value3612fornext_finalvalue3612) break; } fornext_error3612:; if(qbevent){evnt(28367);if(r)goto S_31486;} S_31487:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28368);if(r)goto S_31487;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_add(_FUNC_IDE2_STRING_CLIP,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28368);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_add(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28368);}while(r); } } fornext_exit_3611:; }else{ S_31494:; if (((-(*__LONG_IDECX== 1 ))&(-(*_FUNC_IDE2_LONG_Y==*_FUNC_IDE2_LONG_SY2))&(-(*__LONG_IDECY>*_FUNC_IDE2_LONG_SY1)))||new_error){ if(qbevent){evnt(28371);if(r)goto S_31494;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_add(qbs_add(_FUNC_IDE2_STRING_CLIP,func_chr( 13 )),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28371);}while(r); do{ goto LABEL_NOFINALCOPY; if(!qbevent)break;evnt(28371);}while(r); } S_31498:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(28372);if(r)goto S_31498;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28372);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_CLIP,func_chr( 13 )),func_chr( 10 )),_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28372);}while(r); } LABEL_NOFINALCOPY:; if(qbevent){evnt(28373);r=0;} } } } fornext_exit_3609:; S_31506:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(28377);if(r)goto S_31506;} do{ sub__clipboard(_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28377);}while(r); } S_31509:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),qbs_new_txt_len("S",1)))))|(*__LONG_KSHIFT&(-(*__LONG_KB== 21248 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("X",1))))))||new_error){ if(qbevent){evnt(28378);if(r)goto S_31509;} do{ return_point[next_return_point++]=3; if (next_return_point>=return_points) more_return_points(); goto LABEL_DELSELECT; RETURN_3:; if(!qbevent)break;evnt(28378);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28379);}while(r); } S_31514:; if ((-(*__LONG_KB== 20992 ))||new_error){ if(qbevent){evnt(28382);if(r)goto S_31514;} do{ *__INTEGER_IDEINSERT=*__INTEGER_IDEINSERT+ 1 ; if(!qbevent)break;evnt(28383);}while(r); S_31516:; if ((-(*__INTEGER_IDEINSERT== 2 ))||new_error){ if(qbevent){evnt(28384);if(r)goto S_31516;} do{ *__INTEGER_IDEINSERT= 0 ; if(!qbevent)break;evnt(28384);}while(r); } } S_31520:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(28387);if(r)goto S_31520;} do{ return_point[next_return_point++]=4; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_4:; if(!qbevent)break;evnt(28388);}while(r); do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(28389);}while(r); S_31523:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(28390);if(r)goto S_31523;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(28390);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28391);}while(r); } S_31528:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(28394);if(r)goto S_31528;} do{ return_point[next_return_point++]=5; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_5:; if(!qbevent)break;evnt(28395);}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(28396);}while(r); S_31531:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(28397);if(r)goto S_31531;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28397);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28398);}while(r); } S_31536:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(28401);if(r)goto S_31536;} do{ return_point[next_return_point++]=6; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_6:; if(!qbevent)break;evnt(28402);}while(r); S_31538:; if ((-(*__LONG_MWHEEL< 0 ))||new_error){ if(qbevent){evnt(28404);if(r)goto S_31538;} do{ *__LONG_IDECY=*__LONG_IDESY; if(!qbevent)break;evnt(28404);}while(r); } S_31541:; if ((-(*__LONG_MWHEEL> 0 ))||new_error){ if(qbevent){evnt(28405);if(r)goto S_31541;} do{ *__LONG_IDECY=*__LONG_IDESY+(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(28405);}while(r); } do{ *__LONG_IDECY=*__LONG_IDECY+(*__LONG_MWHEEL* 3 ); if(!qbevent)break;evnt(28406);}while(r); S_31545:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(28407);if(r)goto S_31545;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(28407);}while(r); } S_31548:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(28408);if(r)goto S_31548;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28408);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28409);}while(r); } S_31553:; if ((-(*__LONG_KB== 19200 ))||new_error){ if(qbevent){evnt(28412);if(r)goto S_31553;} do{ return_point[next_return_point++]=7; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_7:; if(!qbevent)break;evnt(28413);}while(r); S_31555:; if ((*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(28415);if(r)goto S_31555;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28417);}while(r); S_31557:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28418);if(r)goto S_31557;} do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28418);}while(r); } do{ *_FUNC_IDE2_LONG_SKIPPING= 1 ; if(!qbevent)break;evnt(28420);}while(r); S_31561:; do{ if(qbevent){evnt(28421);if(r)goto S_31561;} do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(28423);}while(r); S_31563:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(28425);if(r)goto S_31563;} S_31564:; do{ if(qbevent){evnt(28426);if(r)goto S_31564;} S_31565:; if ((-(*__LONG_IDECY== 1 ))||new_error){ if(qbevent){evnt(28427);if(r)goto S_31565;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28427);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28427);}while(r); } do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(28428);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28429);}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28430);}while(r); S_31572:; }while((!(qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len)))&&(!new_error)); dl_exit_3617:; if(qbevent){evnt(28431);if(r)goto S_31572;} } S_31574:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_IDE2_STRING_A,*__LONG_IDECX))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(28434);if(r)goto S_31574;} S_31575:; if ((-(*__LONG_IDECX== 1 ))||new_error){ if(qbevent){evnt(28435);if(r)goto S_31575;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28435);}while(r); } do{ *_FUNC_IDE2_LONG_X=*__LONG_IDECX; if(!qbevent)break;evnt(28436);}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDECY; if(!qbevent)break;evnt(28436);}while(r); do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(28437);}while(r); }else{ S_31582:; if ((-(*_FUNC_IDE2_LONG_SKIPPING== 0 ))||new_error){ if(qbevent){evnt(28439);if(r)goto S_31582;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(28439);}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(28439);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28439);}while(r); } } }while(1); dl_exit_3616:; }else{ do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(28445);}while(r); S_31591:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(28446);if(r)goto S_31591;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28446);}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28450);}while(r); } S_31597:; if ((-(*__LONG_KB== 19712 ))||new_error){ if(qbevent){evnt(28453);if(r)goto S_31597;} do{ return_point[next_return_point++]=8; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_8:; if(!qbevent)break;evnt(28454);}while(r); S_31599:; if ((*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(28456);if(r)goto S_31599;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28458);}while(r); do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(28459);}while(r); do{ *_FUNC_IDE2_LONG_FIRST= 1 ; if(!qbevent)break;evnt(28460);}while(r); S_31603:; do{ if(qbevent){evnt(28461);if(r)goto S_31603;} S_31604:; if ((-(*_FUNC_IDE2_LONG_FIRST== 0 ))||new_error){ if(qbevent){evnt(28463);if(r)goto S_31604;} do{ *__LONG_IDECX=*__LONG_IDECX+ 1 ; if(!qbevent)break;evnt(28463);}while(r); } S_31607:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28465);if(r)goto S_31607;} S_31608:; do{ if(qbevent){evnt(28466);if(r)goto S_31608;} S_31609:; if ((-(*__LONG_IDECY==*__LONG_IDEN))||new_error){ if(qbevent){evnt(28467);if(r)goto S_31609;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28467);}while(r); } do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(28468);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28468);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28469);}while(r); S_31615:; }while((!(qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len)))&&(!new_error)); dl_exit_3622:; if(qbevent){evnt(28470);if(r)goto S_31615;} do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(28471);}while(r); do{ *_FUNC_IDE2_LONG_FIRST= 0 ; if(!qbevent)break;evnt(28472);}while(r); } S_31619:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_IDE2_STRING_A,*__LONG_IDECX))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(28475);if(r)goto S_31619;} S_31620:; if ((*_FUNC_IDE2_LONG_FIRST)||new_error){ if(qbevent){evnt(28476);if(r)goto S_31620;} do{ *_FUNC_IDE2_LONG_SKIPPING= 1 ; if(!qbevent)break;evnt(28477);}while(r); }else{ S_31623:; if ((-(*_FUNC_IDE2_LONG_SKIPPING== 0 ))||new_error){ if(qbevent){evnt(28479);if(r)goto S_31623;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28479);}while(r); } } }else{ do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(28482);}while(r); } do{ *_FUNC_IDE2_LONG_FIRST= 0 ; if(!qbevent)break;evnt(28484);}while(r); }while(1); dl_exit_3620:; }else{ do{ *__LONG_IDECX=*__LONG_IDECX+ 1 ; if(!qbevent)break;evnt(28489);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28493);}while(r); } S_31637:; if ((*__LONG_KCONTROL&(-(*__LONG_KB== 18176 )))||new_error){ if(qbevent){evnt(28496);if(r)goto S_31637;} do{ return_point[next_return_point++]=9; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_9:; if(!qbevent)break;evnt(28497);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28498);}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(28499);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28500);}while(r); } S_31643:; if ((*__LONG_KCONTROL&(-(*__LONG_KB== 20224 )))||new_error){ if(qbevent){evnt(28503);if(r)goto S_31643;} do{ return_point[next_return_point++]=10; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_10:; if(!qbevent)break;evnt(28504);}while(r); do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28505);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28506);}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28507);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28508);}while(r); } S_31650:; if ((-(*__LONG_KB== 18176 ))||new_error){ if(qbevent){evnt(28511);if(r)goto S_31650;} do{ return_point[next_return_point++]=11; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_11:; if(!qbevent)break;evnt(28512);}while(r); S_31652:; if ((-(*__LONG_IDECX!= 1 ))||new_error){ if(qbevent){evnt(28513);if(r)goto S_31652;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28514);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28516);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28517);}while(r); S_31657:; fornext_value3626= 1 ; fornext_finalvalue3626=_FUNC_IDE2_STRING_A->len; fornext_step3626= 1 ; if (fornext_step3626<0) fornext_step_negative3626=1; else fornext_step_negative3626=0; if (new_error) goto fornext_error3626; goto fornext_entrylabel3626; while(1){ fornext_value3626=fornext_step3626+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3626: *_FUNC_IDE2_LONG_X=fornext_value3626; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3626){ if (fornext_value3626fornext_finalvalue3626) break; } fornext_error3626:; if(qbevent){evnt(28518);if(r)goto S_31657;} S_31658:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X)!= 32 )))||new_error){ if(qbevent){evnt(28519);if(r)goto S_31658;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(28519);}while(r); do{ goto fornext_exit_3625; if(!qbevent)break;evnt(28519);}while(r); } } fornext_exit_3625:; } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28522);}while(r); } S_31666:; if ((-(*__LONG_KB== 20224 ))||new_error){ if(qbevent){evnt(28525);if(r)goto S_31666;} do{ return_point[next_return_point++]=12; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_12:; if(!qbevent)break;evnt(28526);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28527);}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28528);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28529);}while(r); } S_31672:; if ((-(*__LONG_KB== 18688 ))||new_error){ if(qbevent){evnt(28532);if(r)goto S_31672;} do{ return_point[next_return_point++]=13; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_13:; if(!qbevent)break;evnt(28533);}while(r); do{ *__LONG_IDECY=*__LONG_IDECY-(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(28534);}while(r); S_31675:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(28535);if(r)goto S_31675;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(28535);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28536);}while(r); } S_31680:; if ((-(*__LONG_KB== 20736 ))||new_error){ if(qbevent){evnt(28539);if(r)goto S_31680;} do{ return_point[next_return_point++]=14; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_14:; if(!qbevent)break;evnt(28540);}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(28541);}while(r); S_31683:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(28542);if(r)goto S_31683;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(28542);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28543);}while(r); } do{ goto LABEL_SKIPGOSUBS; if(!qbevent)break;evnt(28546);}while(r); LABEL_SELECTCHECK:; if(qbevent){evnt(28548);r=0;} S_31689:; if ((*__LONG_KSHIFT&(-(*__LONG_IDESELECT== 0 )))||new_error){ if(qbevent){evnt(28549);if(r)goto S_31689;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(28549);}while(r); do{ *__LONG_IDESELECTX1=*__LONG_IDECX; if(!qbevent)break;evnt(28549);}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(28549);}while(r); } S_31694:; if ((-(*__LONG_KSHIFT== 0 ))||new_error){ if(qbevent){evnt(28550);if(r)goto S_31694;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28550);}while(r); } do{ #include "ret84.txt" if(!qbevent)break;evnt(28551);}while(r); LABEL_DELSELECT:; if(qbevent){evnt(28553);r=0;} do{ *_FUNC_IDE2_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(28554);}while(r); do{ *_FUNC_IDE2_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(28555);}while(r); S_31700:; if ((-(*_FUNC_IDE2_LONG_SY1>*_FUNC_IDE2_LONG_SY2))||new_error){ if(qbevent){evnt(28556);if(r)goto S_31700;} do{ swap_32(&*_FUNC_IDE2_LONG_SY1,&*_FUNC_IDE2_LONG_SY2); if(!qbevent)break;evnt(28556);}while(r); } do{ *_FUNC_IDE2_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(28557);}while(r); do{ *_FUNC_IDE2_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(28558);}while(r); S_31705:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(28559);if(r)goto S_31705;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(28559);}while(r); } do{ *_FUNC_IDE2_LONG_NOLASTLINEDEL= 0 ; if(!qbevent)break;evnt(28560);}while(r); S_31709:; if (((-(*_FUNC_IDE2_LONG_SY1!=*_FUNC_IDE2_LONG_SY2))&(-(*__LONG_IDECX== 1 ))&(-(*__LONG_IDECY>*_FUNC_IDE2_LONG_SY1)))||new_error){ if(qbevent){evnt(28561);if(r)goto S_31709;} do{ *_FUNC_IDE2_LONG_SY2=*_FUNC_IDE2_LONG_SY2- 1 ; if(!qbevent)break;evnt(28561);}while(r); do{ *_FUNC_IDE2_LONG_NOLASTLINEDEL= 1 ; if(!qbevent)break;evnt(28561);}while(r); } S_31713:; fornext_value3630=*_FUNC_IDE2_LONG_SY2; fornext_finalvalue3630=*_FUNC_IDE2_LONG_SY1; fornext_step3630= -1 ; if (fornext_step3630<0) fornext_step_negative3630=1; else fornext_step_negative3630=0; if (new_error) goto fornext_error3630; goto fornext_entrylabel3630; while(1){ fornext_value3630=fornext_step3630+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel3630: *_FUNC_IDE2_LONG_Y=fornext_value3630; if (fornext_step_negative3630){ if (fornext_value3630fornext_finalvalue3630) break; } fornext_error3630:; if(qbevent){evnt(28570);if(r)goto S_31713;} S_31714:; if (((-(*_FUNC_IDE2_LONG_SY1==*_FUNC_IDE2_LONG_SY2))&(-(*_FUNC_IDE2_LONG_NOLASTLINEDEL== 0 )))||new_error){ if(qbevent){evnt(28571);if(r)goto S_31714;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28572);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28573);}while(r); S_31717:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_SX1<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28574);if(r)goto S_31717;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28574);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28574);}while(r); } S_31722:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_SX2<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28575);if(r)goto S_31722;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_SX2+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28575);}while(r); } do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28576);}while(r); }else{ S_31727:; if (((-(*__LONG_IDEN== 1 ))&(-(*_FUNC_IDE2_LONG_Y== 1 )))||new_error){ if(qbevent){evnt(28580);if(r)goto S_31727;} do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28580);}while(r); }else{ do{ SUB_IDEDELLINE(_FUNC_IDE2_LONG_Y); if(!qbevent)break;evnt(28580);}while(r); } } } fornext_exit_3629:; do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_SX1; if(!qbevent)break;evnt(28587);}while(r); S_31735:; if (((-(*_FUNC_IDE2_LONG_SY1!=*_FUNC_IDE2_LONG_SY2))|(-(*_FUNC_IDE2_LONG_NOLASTLINEDEL== 1 )))||new_error){ if(qbevent){evnt(28587);if(r)goto S_31735;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28587);}while(r); } do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_SY1; if(!qbevent)break;evnt(28588);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28589);}while(r); do{ #include "ret84.txt" if(!qbevent)break;evnt(28590);}while(r); LABEL_SKIPGOSUBS:; if(qbevent){evnt(28592);r=0;} S_31741:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 13 ))))||new_error){ if(qbevent){evnt(28594);if(r)goto S_31741;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28595);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28596);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28598);}while(r); S_31745:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28599);if(r)goto S_31745;} do{ SUB_IDEINSLINE(&(pass3635=*__LONG_IDECY+ 1 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28600);}while(r); }else{ do{ SUB_IDESETLINE(__LONG_IDECY,qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28602);}while(r); do{ SUB_IDEINSLINE(&(pass3636=*__LONG_IDECY+ 1 ),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28603);}while(r); } S_31751:; if ((-(*__LONG_IDECX== 1 ))||new_error){ if(qbevent){evnt(28606);if(r)goto S_31751;} S_31752:; fornext_value3639= 1 ; fornext_finalvalue3639=*__LONG_IDEBMKN; fornext_step3639= 1 ; if (fornext_step3639<0) fornext_step_negative3639=1; else fornext_step_negative3639=0; if (new_error) goto fornext_error3639; goto fornext_entrylabel3639; while(1){ fornext_value3639=fornext_step3639+(*_FUNC_IDE2_LONG_B); fornext_entrylabel3639: *_FUNC_IDE2_LONG_B=fornext_value3639; if (fornext_step_negative3639){ if (fornext_value3639fornext_finalvalue3639) break; } fornext_error3639:; if(qbevent){evnt(28607);if(r)goto S_31752;} S_31753:; if ((-(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))==*__LONG_IDECY))||new_error){ if(qbevent){evnt(28608);if(r)goto S_31753;} do{ *(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))=*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))+ 1 ; if(!qbevent)break;evnt(28608);}while(r); } } fornext_exit_3638:; } do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(28612);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(28613);}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28614);}while(r); } S_31762:; if ((-(*__LONG_KB== 21248 ))||new_error){ if(qbevent){evnt(28617);if(r)goto S_31762;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28618);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28619);}while(r); S_31765:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(28620);if(r)goto S_31765;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX- 1 ),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28621);}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28622);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,func_space(*__LONG_IDECX-_FUNC_IDE2_STRING_A->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28624);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(&(pass3643=*__LONG_IDECY+ 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28625);}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28626);}while(r); do{ SUB_IDEDELLINE(&(pass3644=*__LONG_IDECY+ 1 )); if(!qbevent)break;evnt(28627);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28629);}while(r); } S_31776:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 8 ))))||new_error){ if(qbevent){evnt(28632);if(r)goto S_31776;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(28633);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28634);}while(r); S_31779:; if ((-(*__LONG_IDEUNDOCOMBOCHR!= 8 ))||new_error){ if(qbevent){evnt(28637);if(r)goto S_31779;} do{ *__LONG_IDEUNDOCOMBO= 2 ; if(!qbevent)break;evnt(28638);}while(r); }else{ do{ *__LONG_IDEUNDOCOMBO=*__LONG_IDEUNDOCOMBO+ 1 ; if(!qbevent)break;evnt(28640);}while(r); S_31783:; if ((-(*__LONG_IDEUNDOCOMBO== 2 ))||new_error){ if(qbevent){evnt(28641);if(r)goto S_31783;} do{ *__LONG_IDEMERGEUNDO= 1 ; if(!qbevent)break;evnt(28641);}while(r); } } do{ *__LONG_IDEUNDOCOMBOCHR= 8 ; if(!qbevent)break;evnt(28643);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28645);}while(r); S_31789:; if ((-(*__LONG_IDECX== 1 ))||new_error){ if(qbevent){evnt(28646);if(r)goto S_31789;} S_31790:; if ((-(*__LONG_IDECY> 1 ))||new_error){ if(qbevent){evnt(28647);if(r)goto S_31790;} do{ qbs_set(_FUNC_IDE2_STRING_A2,FUNC_IDEGETLINE(&(pass3645=*__LONG_IDECY- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28648);}while(r); do{ SUB_IDESETLINE(&(pass3646=*__LONG_IDECY- 1 ),qbs_add(_FUNC_IDE2_STRING_A2,_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28649);}while(r); do{ SUB_IDEDELLINE(__LONG_IDECY); if(!qbevent)break;evnt(28650);}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A2->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28651);}while(r); do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(28652);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28654);}while(r); } S_31799:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>(_FUNC_IDE2_STRING_A->len+ 1 ))))||new_error){ if(qbevent){evnt(28656);if(r)goto S_31799;} do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28657);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX- 2 ),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28659);}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28660);}while(r); do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(28661);}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28663);}while(r); } S_31808:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len!= 1 )))||new_error){ if(qbevent){evnt(28675);if(r)goto S_31808;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28675);}while(r); } S_31811:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 9 ))))||new_error){ if(qbevent){evnt(28676);if(r)goto S_31811;} do{ goto LABEL_IDEFORCEINPUT; if(!qbevent)break;evnt(28676);}while(r); } S_31814:; if ((qbs_cleanup(qbs_tmp_base,((int16*)(__ARRAY_INTEGER_BLOCK_CHR[0]))[array_check((qbs_asc(__STRING_K))-__ARRAY_INTEGER_BLOCK_CHR[4],__ARRAY_INTEGER_BLOCK_CHR[5])]))||new_error){ if(qbevent){evnt(28677);if(r)goto S_31814;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(28677);}while(r); } LABEL_IDEFORCEINPUT:; if(qbevent){evnt(28678);r=0;} S_31817:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 9 ))))||new_error){ if(qbevent){evnt(28680);if(r)goto S_31817;} do{ *_FUNC_IDE2_LONG_X= 4 ; if(!qbevent)break;evnt(28681);}while(r); S_31819:; if (((-(*__LONG_IDEAUTOINDENT!= 0 ))&(-(*__LONG_IDEAUTOINDENTSIZE!= 0 )))||new_error){ if(qbevent){evnt(28682);if(r)goto S_31819;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDEAUTOINDENTSIZE; if(!qbevent)break;evnt(28682);}while(r); } do{ qbs_set(__STRING_K,func_space(*_FUNC_IDE2_LONG_X-((*__LONG_IDECX- 1 )%*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28683);}while(r); } S_31824:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(28687);if(r)goto S_31824;} do{ return_point[next_return_point++]=15; if (next_return_point>=return_points) more_return_points(); goto LABEL_DELSELECT; RETURN_15:; if(!qbevent)break;evnt(28687);}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(28688);}while(r); S_31828:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(28691);if(r)goto S_31828;} do{ *_FUNC_IDE2_LONG_ASCK=qbs_asc(__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28692);}while(r); S_31830:; if ((((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((*_FUNC_IDE2_LONG_ASCK)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(*__LONG_IDEUNDOCOMBOCHR==*_FUNC_IDE2_LONG_ASCK)))||new_error){ if(qbevent){evnt(28693);if(r)goto S_31830;} S_31831:; if ((-(*__LONG_IDEUNDOCOMBOCHR== 8 ))||new_error){ if(qbevent){evnt(28694);if(r)goto S_31831;} do{ *__LONG_IDEUNDOCOMBO= 0 ; if(!qbevent)break;evnt(28694);}while(r); } S_31834:; if ((-(*__LONG_IDEUNDOCOMBO== 0 ))||new_error){ if(qbevent){evnt(28695);if(r)goto S_31834;} do{ *__LONG_IDEUNDOCOMBO= 2 ; if(!qbevent)break;evnt(28696);}while(r); }else{ do{ *__LONG_IDEUNDOCOMBO=*__LONG_IDEUNDOCOMBO+ 1 ; if(!qbevent)break;evnt(28698);}while(r); S_31838:; if ((-(*__LONG_IDEUNDOCOMBO== 2 ))||new_error){ if(qbevent){evnt(28699);if(r)goto S_31838;} do{ *__LONG_IDEMERGEUNDO= 1 ; if(!qbevent)break;evnt(28699);}while(r); } } } do{ *__LONG_IDEUNDOCOMBOCHR=*_FUNC_IDE2_LONG_ASCK; if(!qbevent)break;evnt(28702);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28705);}while(r); S_31846:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDE2_STRING_A->len)<(*__LONG_IDECX- 1 ))))||new_error){ if(qbevent){evnt(28706);if(r)goto S_31846;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,func_space(*__LONG_IDECX- 1 -_FUNC_IDE2_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28706);}while(r); } S_31849:; if ((*__INTEGER_IDEINSERT)||new_error){ if(qbevent){evnt(28708);if(r)goto S_31849;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28709);}while(r); S_31851:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A2->len))||new_error){ if(qbevent){evnt(28710);if(r)goto S_31851;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28710);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX- 1 ),__STRING_K),_FUNC_IDE2_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28711);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX- 1 ),__STRING_K),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28713);}while(r); } do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28716);}while(r); do{ *__LONG_IDECX=*__LONG_IDECX+__STRING_K->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28717);}while(r); LABEL_SPECIALCHAR:; if(qbevent){evnt(28718);r=0;} }while(1); dl_exit_3388:; LABEL_STARTMENU:; if(qbevent){evnt(28724);r=0;} do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(28725);}while(r); LABEL_STARTMENU2:; if(qbevent){evnt(28726);r=0;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(28727);}while(r); S_31863:; do{ if(qbevent){evnt(28729);if(r)goto S_31863;} do{ qbg_sub_locate( 1 , 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28731);}while(r); S_31865:; fornext_value3662= 1 ; fornext_finalvalue3662=*__INTEGER_MENUS; fornext_step3662= 1 ; if (fornext_step3662<0) fornext_step_negative3662=1; else fornext_step_negative3662=0; if (new_error) goto fornext_error3662; goto fornext_entrylabel3662; while(1){ fornext_value3662=fornext_step3662+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3662: *_FUNC_IDE2_LONG_I=fornext_value3662; if (fornext_step_negative3662){ if (fornext_value3662fornext_finalvalue3662) break; } fornext_error3662:; if(qbevent){evnt(28732);if(r)goto S_31865;} S_31866:; if ((-(*_FUNC_IDE2_LONG_M==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(28733);if(r)goto S_31866;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(28733);}while(r); }else{ do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(28733);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len(" ",1),qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 1 ))); if (new_error) goto skip3663; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3663: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28734);}while(r); S_31872:; if ((-(*_FUNC_IDE2_LONG_M==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(28735);if(r)goto S_31872;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(28735);}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28735);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_right(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len- 1 ),qbs_new_txt_len(" ",1))); if (new_error) goto skip3664; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3664: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28736);}while(r); S_31878:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(28737);if(r)goto S_31878;} do{ qbg_sub_locate( 1 ,*__LONG_IDEWX-((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_MENUS)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len- 2 ,NULL,NULL,NULL,3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28737);}while(r); } } fornext_exit_3661:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28740);}while(r); S_31883:; do{ if(qbevent){evnt(28741);if(r)goto S_31883;} do{ *_FUNC_IDE2_LONG_LASTALTHELD=*_FUNC_IDE2_LONG_ALTHELD; if(!qbevent)break;evnt(28743);}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(28745);}while(r); S_31886:; if ((-(*__LONG_ICHANGED== 0 ))||new_error){ if(qbevent){evnt(28746);if(r)goto S_31886;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(28746);}while(r); } S_31889:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(28748);if(r)goto S_31889;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(28748);}while(r); }else{ do{ *_FUNC_IDE2_LONG_ALTHELD= 0 ; if(!qbevent)break;evnt(28748);}while(r); } S_31894:; if (((-(*_FUNC_IDE2_LONG_ALTHELD!= 0 ))&(-(*_FUNC_IDE2_LONG_LASTALTHELD== 0 )))||new_error){ if(qbevent){evnt(28750);if(r)goto S_31894;} S_31895:; do{ if(qbevent){evnt(28751);if(r)goto S_31895;} do{ sub__limit( 1000 ); if(!qbevent)break;evnt(28751);}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(28751);}while(r); S_31898:; }while((!(-(*__LONG_KALT== 0 )))&&(!new_error)); dl_exit_3668:; if(qbevent){evnt(28751);if(r)goto S_31898;} do{ *__LONG_KB= 27 ; if(!qbevent)break;evnt(28752);}while(r); } S_31901:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(28755);if(r)goto S_31901;} S_31902:; if ((-(*__LONG_MY== 1 ))||new_error){ if(qbevent){evnt(28756);if(r)goto S_31902;} do{ *_FUNC_IDE2_LONG_X= 3 ; if(!qbevent)break;evnt(28757);}while(r); S_31904:; fornext_value3670= 1 ; fornext_finalvalue3670=*__INTEGER_MENUS; fornext_step3670= 1 ; if (fornext_step3670<0) fornext_step_negative3670=1; else fornext_step_negative3670=0; if (new_error) goto fornext_error3670; goto fornext_entrylabel3670; while(1){ fornext_value3670=fornext_step3670+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3670: *_FUNC_IDE2_LONG_I=fornext_value3670; if (fornext_step_negative3670){ if (fornext_value3670fornext_finalvalue3670) break; } fornext_error3670:; if(qbevent){evnt(28758);if(r)goto S_31904;} do{ *_FUNC_IDE2_LONG_X2=((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28759);}while(r); S_31906:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<(*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2))))||new_error){ if(qbevent){evnt(28760);if(r)goto S_31906;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(28761);}while(r); do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28762);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28762);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3672; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3672: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28762);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28763);}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(28764);}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(28766);}while(r); } fornext_exit_3669:; } do{ *__LONG_KB= 27 ; if(!qbevent)break;evnt(28769);}while(r); } S_31919:; }while((!(*__LONG_KB))&&(!new_error)); dl_exit_3667:; if(qbevent){evnt(28771);if(r)goto S_31919;} do{ qbs_set(__STRING_K,qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28773);}while(r); S_31921:; fornext_value3674= 1 ; fornext_finalvalue3674=*__INTEGER_MENUS; fornext_step3674= 1 ; if (fornext_step3674<0) fornext_step_negative3674=1; else fornext_step_negative3674=0; if (new_error) goto fornext_error3674; goto fornext_entrylabel3674; while(1){ fornext_value3674=fornext_step3674+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3674: *_FUNC_IDE2_LONG_I=fornext_value3674; if (fornext_step_negative3674){ if (fornext_value3674fornext_finalvalue3674) break; } fornext_error3674:; if(qbevent){evnt(28774);if(r)goto S_31921;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_ucase(qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28775);}while(r); S_31923:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,_FUNC_IDE2_STRING_A)))||new_error){ if(qbevent){evnt(28776);if(r)goto S_31923;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(28777);}while(r); do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28778);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28778);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3675; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3675: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28778);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28779);}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(28780);}while(r); } } fornext_exit_3673:; S_31932:; if ((-(*__LONG_KB== 19200 ))||new_error){ if(qbevent){evnt(28784);if(r)goto S_31932;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M- 1 ; if(!qbevent)break;evnt(28784);}while(r); } S_31935:; if ((-(*__LONG_KB== 19712 ))||new_error){ if(qbevent){evnt(28785);if(r)goto S_31935;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(28785);}while(r); } S_31938:; if ((-(*__LONG_KB== 27 ))||new_error){ if(qbevent){evnt(28786);if(r)goto S_31938;} do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28787);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28787);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3676; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3676: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28787);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(28788);}while(r); } S_31944:; if ((-(*_FUNC_IDE2_LONG_M< 1 ))||new_error){ if(qbevent){evnt(28790);if(r)goto S_31944;} do{ *_FUNC_IDE2_LONG_M=*__INTEGER_MENUS; if(!qbevent)break;evnt(28790);}while(r); } S_31947:; if ((-(*_FUNC_IDE2_LONG_M>*__INTEGER_MENUS))||new_error){ if(qbevent){evnt(28791);if(r)goto S_31947;} do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(28791);}while(r); } S_31950:; if (((-(*__LONG_KB== 18432 ))|(-(*__LONG_KB== 20480 ))|(-(*__LONG_KB== 13 )))||new_error){ if(qbevent){evnt(28792);if(r)goto S_31950;} do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28793);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28793);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3677; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3677: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28793);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28794);}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(28795);}while(r); } S_31957:; if (((-(*__LONG_KB> 0 ))&(-(*__LONG_KB<= 255 )))||new_error){ if(qbevent){evnt(28799);if(r)goto S_31957;} S_31958:; if ((-(*__LONG_KALT== 0 ))||new_error){ if(qbevent){evnt(28800);if(r)goto S_31958;} do{ *__LONG_ICHECKLATER= 1 ; if(!qbevent)break;evnt(28801);}while(r); do{ qbg_sub_locate( 1 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28802);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28802);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_MENUBAR); if (new_error) goto skip3678; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3678: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28802);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(28803);}while(r); } } }while(1); dl_exit_3660:; LABEL_SHOWMENU:; if(qbevent){evnt(28811);r=0;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(28812);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(28813);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(28814);}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(28815);}while(r); S_31971:; do{ if(qbevent){evnt(28816);if(r)goto S_31971;} do{ sub_pcopy( 2 , 1 ); if(!qbevent)break;evnt(28817);}while(r); do{ *_FUNC_IDE2_LONG_X= 4 ; if(!qbevent)break;evnt(28820);}while(r); S_31974:; fornext_value3681= 1 ; fornext_finalvalue3681=*_FUNC_IDE2_LONG_M- 1 ; fornext_step3681= 1 ; if (fornext_step3681<0) fornext_step_negative3681=1; else fornext_step_negative3681=0; if (new_error) goto fornext_error3681; goto fornext_entrylabel3681; while(1){ fornext_value3681=fornext_step3681+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3681: *_FUNC_IDE2_LONG_I=fornext_value3681; if (fornext_step_negative3681){ if (fornext_value3681fornext_finalvalue3681) break; } fornext_error3681:; if(qbevent){evnt(28820);if(r)goto S_31974;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28820);}while(r); S_31976:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(28821);if(r)goto S_31976;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDEWX-((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_MENUS)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28821);}while(r); } } fornext_exit_3680:; do{ *_FUNC_IDE2_LONG_XX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(28822);}while(r); do{ qbg_sub_locate( 1 ,*_FUNC_IDE2_LONG_XX- 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28823);}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(28823);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))),qbs_new_txt_len(" ",1))); if (new_error) goto skip3684; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3684: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28823);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28824);}while(r); do{ *_FUNC_IDE2_LONG_W= 0 ; if(!qbevent)break;evnt(28826);}while(r); S_31986:; fornext_value3686= 1 ; fornext_finalvalue3686=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; fornext_step3686= 1 ; if (fornext_step3686<0) fornext_step_negative3686=1; else fornext_step_negative3686=0; if (new_error) goto fornext_error3686; goto fornext_entrylabel3686; while(1){ fornext_value3686=fornext_step3686+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3686: *_FUNC_IDE2_LONG_I=fornext_value3686; if (fornext_step_negative3686){ if (fornext_value3686fornext_finalvalue3686) break; } fornext_error3686:; if(qbevent){evnt(28827);if(r)goto S_31986;} do{ qbs_set(_FUNC_IDE2_STRING_M,((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28828);}while(r); do{ *_FUNC_IDE2_LONG_L=_FUNC_IDE2_STRING_M->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28829);}while(r); S_31989:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_M,qbs_new_txt_len("#",1),0)))||new_error){ if(qbevent){evnt(28830);if(r)goto S_31989;} do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L- 1 ; if(!qbevent)break;evnt(28830);}while(r); } S_31992:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_M,qbs_new_txt_len(" ",2),0)))||new_error){ if(qbevent){evnt(28831);if(r)goto S_31992;} do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 2 ; if(!qbevent)break;evnt(28831);}while(r); } S_31995:; if ((-(*_FUNC_IDE2_LONG_L>*_FUNC_IDE2_LONG_W))||new_error){ if(qbevent){evnt(28832);if(r)goto S_31995;} do{ *_FUNC_IDE2_LONG_W=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(28832);}while(r); } } fornext_exit_3685:; S_31999:; if ((-(*_FUNC_IDE2_LONG_XX>(*__LONG_IDEWX-*_FUNC_IDE2_LONG_W- 3 )))||new_error){ if(qbevent){evnt(28834);if(r)goto S_31999;} do{ *_FUNC_IDE2_LONG_XX=*__LONG_IDEWX-*_FUNC_IDE2_LONG_W- 3 ; if(!qbevent)break;evnt(28834);}while(r); } do{ SUB_IDEBOXSHADOW(&(pass3688=*_FUNC_IDE2_LONG_XX- 2 ),&(pass3689= 2 ),&(pass3690=*_FUNC_IDE2_LONG_W+ 4 ),&(pass3691=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+ 2 )); if(!qbevent)break;evnt(28835);}while(r); S_32003:; fornext_value3693= 1 ; fornext_finalvalue3693=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; fornext_step3693= 1 ; if (fornext_step3693<0) fornext_step_negative3693=1; else fornext_step_negative3693=0; if (new_error) goto fornext_error3693; goto fornext_entrylabel3693; while(1){ fornext_value3693=fornext_step3693+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3693: *_FUNC_IDE2_LONG_I=fornext_value3693; if (fornext_step_negative3693){ if (fornext_value3693fornext_finalvalue3693) break; } fornext_error3693:; if(qbevent){evnt(28839);if(r)goto S_32003;} do{ qbs_set(_FUNC_IDE2_STRING_M,((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28840);}while(r); S_32005:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_M,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(28841);if(r)goto S_32005;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28842);}while(r); do{ qbg_sub_locate(*_FUNC_IDE2_LONG_I+ 2 ,*_FUNC_IDE2_LONG_XX- 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28842);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("\303",1),func_string(*_FUNC_IDE2_LONG_W+ 2 ,(qbs_new_txt_len("\304",1)->chr[0]))),qbs_new_txt_len("\264",1))); if (new_error) goto skip3694; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3694: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28842);}while(r); }else{ S_32010:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(28844);if(r)goto S_32010;} do{ qbg_sub_locate(*_FUNC_IDE2_LONG_I+ 2 ,*_FUNC_IDE2_LONG_XX- 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28844);}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(28844);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*_FUNC_IDE2_LONG_W+ 2 )); if (new_error) goto skip3695; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3695: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28844);}while(r); } do{ qbg_sub_locate(*_FUNC_IDE2_LONG_I+ 2 ,*_FUNC_IDE2_LONG_XX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(28845);}while(r); do{ *_FUNC_IDE2_LONG_H= -1 ; if(!qbevent)break;evnt(28846);}while(r); do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,_FUNC_IDE2_STRING_M,qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28846);}while(r); S_32018:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(28846);if(r)goto S_32018;} do{ *_FUNC_IDE2_LONG_H=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(28846);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_M,qbs_add(qbs_left(_FUNC_IDE2_STRING_M,*_FUNC_IDE2_LONG_X- 1 ),qbs_right(_FUNC_IDE2_STRING_M,_FUNC_IDE2_STRING_M->len-*_FUNC_IDE2_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28846);}while(r); } do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,_FUNC_IDE2_STRING_M,qbs_new_txt_len(" ",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28847);}while(r); S_32023:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(28847);if(r)goto S_32023;} do{ qbs_set(_FUNC_IDE2_STRING_M1,qbs_left(_FUNC_IDE2_STRING_M,*_FUNC_IDE2_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28847);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_M2,qbs_right(_FUNC_IDE2_STRING_M,_FUNC_IDE2_STRING_M->len-*_FUNC_IDE2_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28847);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_M,qbs_add(qbs_add(_FUNC_IDE2_STRING_M1,func_space(*_FUNC_IDE2_LONG_W-_FUNC_IDE2_STRING_M1->len-_FUNC_IDE2_STRING_M2->len)),_FUNC_IDE2_STRING_M2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28847);}while(r); } S_32028:; fornext_value3701= 1 ; fornext_finalvalue3701=_FUNC_IDE2_STRING_M->len; fornext_step3701= 1 ; if (fornext_step3701<0) fornext_step_negative3701=1; else fornext_step_negative3701=0; if (new_error) goto fornext_error3701; goto fornext_entrylabel3701; while(1){ fornext_value3701=fornext_step3701+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3701: *_FUNC_IDE2_LONG_X=fornext_value3701; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3701){ if (fornext_value3701fornext_finalvalue3701) break; } fornext_error3701:; if(qbevent){evnt(28848);if(r)goto S_32028;} S_32029:; if ((-(*_FUNC_IDE2_LONG_X==*_FUNC_IDE2_LONG_H))||new_error){ if(qbevent){evnt(28849);if(r)goto S_32029;} S_32030:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(28850);if(r)goto S_32030;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(28850);}while(r); }else{ do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(28850);}while(r); } }else{ S_32036:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(28852);if(r)goto S_32036;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(28852);}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(28852);}while(r); } } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_mid(_FUNC_IDE2_STRING_M,*_FUNC_IDE2_LONG_X, 1 ,1)); if (new_error) goto skip3703; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3703: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28854);}while(r); } fornext_exit_3700:; } } fornext_exit_3692:; do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(28864);}while(r); do{ *_FUNC_IDE2_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(28866);}while(r); S_32048:; do{ if(qbevent){evnt(28867);if(r)goto S_32048;} do{ *_FUNC_IDE2_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(28868);}while(r); do{ *_FUNC_IDE2_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(28868);}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(28869);}while(r); do{ *_FUNC_IDE2_LONG_LASTALTHELD=*_FUNC_IDE2_LONG_ALTHELD; if(!qbevent)break;evnt(28870);}while(r); S_32053:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(28870);if(r)goto S_32053;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(28870);}while(r); }else{ do{ *_FUNC_IDE2_LONG_ALTHELD= 0 ; if(!qbevent)break;evnt(28870);}while(r); } S_32058:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(28871);if(r)goto S_32058;} S_32059:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(28872);if(r)goto S_32059;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(28872);}while(r); } S_32062:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(28873);if(r)goto S_32062;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(28873);}while(r); do{ *_FUNC_IDE2_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(28873);}while(r); } S_32066:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(28874);if(r)goto S_32066;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(28874);}while(r); do{ *_FUNC_IDE2_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(28874);}while(r); } } S_32071:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(28876);if(r)goto S_32071;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(28876);}while(r); } S_32074:; if (((-(*_FUNC_IDE2_LONG_ALTHELD!= 0 ))&(-(*_FUNC_IDE2_LONG_LASTALTHELD== 0 )))||new_error){ if(qbevent){evnt(28878);if(r)goto S_32074;} S_32075:; do{ if(qbevent){evnt(28879);if(r)goto S_32075;} do{ sub__limit( 1000 ); if(!qbevent)break;evnt(28879);}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(28879);}while(r); S_32078:; }while((!(-(*__LONG_KALT== 0 )))&&(!new_error)); dl_exit_3705:; if(qbevent){evnt(28879);if(r)goto S_32078;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28880);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(28880);}while(r); do{ goto LABEL_STARTMENU2; if(!qbevent)break;evnt(28881);}while(r); } do{ sub__limit( 100 ); if(!qbevent)break;evnt(28883);}while(r); S_32084:; }while((!(*_FUNC_IDE2_LONG_CHANGE))&&(!new_error)); dl_exit_3704:; if(qbevent){evnt(28884);if(r)goto S_32084;} do{ *_FUNC_IDE2_LONG_S= 0 ; if(!qbevent)break;evnt(28886);}while(r); S_32086:; if ((*_FUNC_IDE2_LONG_MOUSEUP)||new_error){ if(qbevent){evnt(28889);if(r)goto S_32086;} S_32087:; if (((-(*__LONG_MX>=(*_FUNC_IDE2_LONG_XX- 2 )))&(-(*__LONG_MX<(*_FUNC_IDE2_LONG_XX- 2 +*_FUNC_IDE2_LONG_W+ 4 ))))||new_error){ if(qbevent){evnt(28891);if(r)goto S_32087;} S_32088:; if (((-(*__LONG_MY> 2 ))&(-(*__LONG_MY<=(((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+ 2 ))))||new_error){ if(qbevent){evnt(28892);if(r)goto S_32088;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY- 2 ; if(!qbevent)break;evnt(28893);}while(r); S_32090:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_Y)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(28894);if(r)goto S_32090;} do{ *_FUNC_IDE2_LONG_S=*_FUNC_IDE2_LONG_R; if(!qbevent)break;evnt(28895);}while(r); } } } S_32095:; if (((-(*__LONG_MX<(*_FUNC_IDE2_LONG_XX- 2 )))|(-(*__LONG_MX>=(*_FUNC_IDE2_LONG_XX- 2 +*_FUNC_IDE2_LONG_W+ 4 )))|(-(*__LONG_MY>(((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+ 3 ))))||new_error){ if(qbevent){evnt(28900);if(r)goto S_32095;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28901);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(28901);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(28902);}while(r); } } S_32101:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(28907);if(r)goto S_32101;} S_32102:; if ((-(*__LONG_MY== 1 ))||new_error){ if(qbevent){evnt(28910);if(r)goto S_32102;} do{ *_FUNC_IDE2_LONG_LASTM=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(28911);}while(r); do{ *_FUNC_IDE2_LONG_X= 3 ; if(!qbevent)break;evnt(28912);}while(r); S_32105:; fornext_value3707= 1 ; fornext_finalvalue3707=*__INTEGER_MENUS; fornext_step3707= 1 ; if (fornext_step3707<0) fornext_step_negative3707=1; else fornext_step_negative3707=0; if (new_error) goto fornext_error3707; goto fornext_entrylabel3707; while(1){ fornext_value3707=fornext_step3707+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3707: *_FUNC_IDE2_LONG_I=fornext_value3707; if (fornext_step_negative3707){ if (fornext_value3707fornext_finalvalue3707) break; } fornext_error3707:; if(qbevent){evnt(28913);if(r)goto S_32105;} do{ *_FUNC_IDE2_LONG_X2=((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28914);}while(r); S_32107:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<(*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2))))||new_error){ if(qbevent){evnt(28915);if(r)goto S_32107;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(28916);}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(28917);}while(r); S_32110:; if (((-(*_FUNC_IDE2_LONG_LASTM==*_FUNC_IDE2_LONG_M))&(-(*_FUNC_IDE2_LONG_MOUSEDOWN== 1 )))||new_error){ if(qbevent){evnt(28918);if(r)goto S_32110;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28918);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(28918);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(28918);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(28918);}while(r); } do{ goto fornext_exit_3706; if(!qbevent)break;evnt(28919);}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(28921);}while(r); S_32119:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(28922);if(r)goto S_32119;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDEWX-((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_MENUS)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check(( 0 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))->len- 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28922);}while(r); } } fornext_exit_3706:; } S_32124:; if (((-(*__LONG_MX>=(*_FUNC_IDE2_LONG_XX- 2 )))&(-(*__LONG_MX<(*_FUNC_IDE2_LONG_XX- 2 +*_FUNC_IDE2_LONG_W+ 4 ))))||new_error){ if(qbevent){evnt(28927);if(r)goto S_32124;} S_32125:; if (((-(*__LONG_MY> 2 ))&(-(*__LONG_MY<=(((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+ 2 ))))||new_error){ if(qbevent){evnt(28928);if(r)goto S_32125;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY- 2 ; if(!qbevent)break;evnt(28929);}while(r); S_32127:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_Y)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(28930);if(r)goto S_32127;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(28930);}while(r); } } } } S_32133:; if ((-(*__LONG_KB== 19200 ))||new_error){ if(qbevent){evnt(28936);if(r)goto S_32133;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M- 1 ; if(!qbevent)break;evnt(28936);}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(28936);}while(r); } S_32137:; if ((-(*__LONG_KB== 19712 ))||new_error){ if(qbevent){evnt(28937);if(r)goto S_32137;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(28937);}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(28937);}while(r); } S_32141:; if ((-(*_FUNC_IDE2_LONG_M< 1 ))||new_error){ if(qbevent){evnt(28938);if(r)goto S_32141;} do{ *_FUNC_IDE2_LONG_M=*__INTEGER_MENUS; if(!qbevent)break;evnt(28938);}while(r); } S_32144:; if ((-(*_FUNC_IDE2_LONG_M>*__INTEGER_MENUS))||new_error){ if(qbevent){evnt(28939);if(r)goto S_32144;} do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(28939);}while(r); } S_32147:; if ((-(*__LONG_KB== 27 ))||new_error){ if(qbevent){evnt(28940);if(r)goto S_32147;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(28941);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(28941);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(28942);}while(r); } S_32152:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(28944);if(r)goto S_32152;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R+ 1 ; if(!qbevent)break;evnt(28945);}while(r); S_32154:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_R)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(28946);if(r)goto S_32154;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R+ 1 ; if(!qbevent)break;evnt(28946);}while(r); } S_32157:; if ((-(*_FUNC_IDE2_LONG_R>((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]))||new_error){ if(qbevent){evnt(28947);if(r)goto S_32157;} do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(28947);}while(r); } } S_32161:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(28950);if(r)goto S_32161;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R- 1 ; if(!qbevent)break;evnt(28951);}while(r); S_32163:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_R)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(28952);if(r)goto S_32163;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R- 1 ; if(!qbevent)break;evnt(28952);}while(r); } S_32166:; if ((-(*_FUNC_IDE2_LONG_R< 1 ))||new_error){ if(qbevent){evnt(28953);if(r)goto S_32166;} do{ *_FUNC_IDE2_LONG_R=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; if(!qbevent)break;evnt(28953);}while(r); } } S_32170:; if ((-(*__LONG_KB== 13 ))||new_error){ if(qbevent){evnt(28959);if(r)goto S_32170;} do{ *_FUNC_IDE2_LONG_S=*_FUNC_IDE2_LONG_R; if(!qbevent)break;evnt(28960);}while(r); } do{ qbs_set(__STRING_K,qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28964);}while(r); S_32174:; fornext_value3711= 1 ; fornext_finalvalue3711=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; fornext_step3711= 1 ; if (fornext_step3711<0) fornext_step_negative3711=1; else fornext_step_negative3711=0; if (new_error) goto fornext_error3711; goto fornext_entrylabel3711; while(1){ fornext_value3711=fornext_step3711+(*_FUNC_IDE2_LONG_R2); fornext_entrylabel3711: *_FUNC_IDE2_LONG_R2=fornext_value3711; if (fornext_step_negative3711){ if (fornext_value3711fornext_finalvalue3711) break; } fornext_error3711:; if(qbevent){evnt(28965);if(r)goto S_32174;} do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_R2)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28966);}while(r); S_32176:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(28967);if(r)goto S_32176;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_R2)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),*_FUNC_IDE2_LONG_X+ 1 , 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28968);}while(r); S_32178:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,_FUNC_IDE2_STRING_A)))||new_error){ if(qbevent){evnt(28969);if(r)goto S_32178;} do{ *_FUNC_IDE2_LONG_S=*_FUNC_IDE2_LONG_R2; if(!qbevent)break;evnt(28969);}while(r); do{ goto fornext_exit_3710; if(!qbevent)break;evnt(28969);}while(r); } } } fornext_exit_3710:; S_32184:; if ((*_FUNC_IDE2_LONG_S)||new_error){ if(qbevent){evnt(28973);if(r)goto S_32184;} S_32185:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(28975);if(r)goto S_32185;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(28975);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(28975);}while(r); } S_32190:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Comment (add ')",15))))||new_error){ if(qbevent){evnt(28977);if(r)goto S_32190;} do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(28978);}while(r); do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y1; if(!qbevent)break;evnt(28978);}while(r); S_32193:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(28979);if(r)goto S_32193;} do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(28980);}while(r); S_32195:; if (((-(*__LONG_IDECY>*__LONG_IDESELECTY1))&(-(*__LONG_IDECX== 1 )))||new_error){ if(qbevent){evnt(28981);if(r)goto S_32195;} do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y2- 1 ; if(!qbevent)break;evnt(28981);}while(r); } S_32198:; if ((-(*_FUNC_IDE2_LONG_Y1>*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(28982);if(r)goto S_32198;} do{ swap_32(&*_FUNC_IDE2_LONG_Y1,&*_FUNC_IDE2_LONG_Y2); if(!qbevent)break;evnt(28982);}while(r); } } do{ *_FUNC_IDE2_LONG_LHS= 10000000 ; if(!qbevent)break;evnt(28985);}while(r); S_32203:; fornext_value3713=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue3713=*_FUNC_IDE2_LONG_Y2; fornext_step3713= 1 ; if (fornext_step3713<0) fornext_step_negative3713=1; else fornext_step_negative3713=0; if (new_error) goto fornext_error3713; goto fornext_entrylabel3713; while(1){ fornext_value3713=fornext_step3713+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel3713: *_FUNC_IDE2_LONG_Y=fornext_value3713; if (fornext_step_negative3713){ if (fornext_value3713fornext_finalvalue3713) break; } fornext_error3713:; if(qbevent){evnt(28986);if(r)goto S_32203;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28987);}while(r); S_32205:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(28988);if(r)goto S_32205;} do{ qbs_set(_FUNC_IDE2_STRING_TA,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28989);}while(r); do{ *_FUNC_IDE2_LONG_T=_FUNC_IDE2_STRING_A->len-_FUNC_IDE2_STRING_TA->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28990);}while(r); S_32208:; if ((-(*_FUNC_IDE2_LONG_T<*_FUNC_IDE2_LONG_LHS))||new_error){ if(qbevent){evnt(28991);if(r)goto S_32208;} do{ *_FUNC_IDE2_LONG_LHS=*_FUNC_IDE2_LONG_T; if(!qbevent)break;evnt(28991);}while(r); } } } fornext_exit_3712:; S_32213:; fornext_value3718=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue3718=*_FUNC_IDE2_LONG_Y2; fornext_step3718= 1 ; if (fornext_step3718<0) fornext_step_negative3718=1; else fornext_step_negative3718=0; if (new_error) goto fornext_error3718; goto fornext_entrylabel3718; while(1){ fornext_value3718=fornext_step3718+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel3718: *_FUNC_IDE2_LONG_Y=fornext_value3718; if (fornext_step_negative3718){ if (fornext_value3718fornext_finalvalue3718) break; } fornext_error3718:; if(qbevent){evnt(28995);if(r)goto S_32213;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28996);}while(r); S_32215:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(28997);if(r)goto S_32215;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_LHS),qbs_new_txt_len("'",1)),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_LHS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28998);}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(28999);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29000);}while(r); } } fornext_exit_3717:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29003);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29003);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29003);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29003);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29004);}while(r); } S_32227:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Uncomment (remove ')",20))))||new_error){ if(qbevent){evnt(29007);if(r)goto S_32227;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29008);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29008);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29008);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29008);}while(r); do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(29009);}while(r); do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y1; if(!qbevent)break;evnt(29009);}while(r); S_32234:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(29010);if(r)goto S_32234;} do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(29011);}while(r); S_32236:; if (((-(*__LONG_IDECY>*__LONG_IDESELECTY1))&(-(*__LONG_IDECX== 1 )))||new_error){ if(qbevent){evnt(29012);if(r)goto S_32236;} do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y2- 1 ; if(!qbevent)break;evnt(29012);}while(r); } S_32239:; if ((-(*_FUNC_IDE2_LONG_Y1>*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(29013);if(r)goto S_32239;} do{ swap_32(&*_FUNC_IDE2_LONG_Y1,&*_FUNC_IDE2_LONG_Y2); if(!qbevent)break;evnt(29013);}while(r); } } S_32243:; fornext_value3722=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue3722=*_FUNC_IDE2_LONG_Y2; fornext_step3722= 1 ; if (fornext_step3722<0) fornext_step_negative3722=1; else fornext_step_negative3722=0; if (new_error) goto fornext_error3722; goto fornext_entrylabel3722; while(1){ fornext_value3722=fornext_step3722+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel3722: *_FUNC_IDE2_LONG_Y=fornext_value3722; if (fornext_step_negative3722){ if (fornext_value3722fornext_finalvalue3722) break; } fornext_error3722:; if(qbevent){evnt(29016);if(r)goto S_32243;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29017);}while(r); S_32245:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(29018);if(r)goto S_32245;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29019);}while(r); S_32247:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A2->len))||new_error){ if(qbevent){evnt(29020);if(r)goto S_32247;} S_32248:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_A2, 1 )== 39 )))||new_error){ if(qbevent){evnt(29021);if(r)goto S_32248;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(func_space(_FUNC_IDE2_STRING_A->len-_FUNC_IDE2_STRING_A2->len),qbs_right(_FUNC_IDE2_STRING_A2,_FUNC_IDE2_STRING_A2->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29022);}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29023);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29024);}while(r); } } } } fornext_exit_3721:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29029);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29029);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29029);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29029);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29030);}while(r); } S_32262:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Language...",12))))||new_error){ if(qbevent){evnt(29033);if(r)goto S_32262;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29034);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDELANGUAGEBOX(); if(!qbevent)break;evnt(29035);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29036);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29036);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29036);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29036);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29037);}while(r); } S_32271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Display...",11))))||new_error){ if(qbevent){evnt(29040);if(r)goto S_32271;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29041);}while(r); S_32273:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(29042);if(r)goto S_32273;} do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEDISPLAYBOX(); if(!qbevent)break;evnt(29043);}while(r); S_32275:; if ((-(*_FUNC_IDE2_LONG_RETVAL== 1 ))||new_error){ if(qbevent){evnt(29044);if(r)goto S_32275;} do{ qbsub_width(NULL,*__LONG_IDEWX,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,3); if(!qbevent)break;evnt(29046);}while(r); S_32277:; if ((*__LONG_IDECUSTOMFONT)||new_error){ if(qbevent){evnt(29047);if(r)goto S_32277;} do{ sub__font(*__LONG_IDECUSTOMFONTHANDLE,NULL,0); if(!qbevent)break;evnt(29048);}while(r); }else{ do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(29050);}while(r); } do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(29052);}while(r); do{ goto LABEL_REDRAWEVERYTHING; if(!qbevent)break;evnt(29053);}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29056);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29056);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29056);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29056);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29057);}while(r); } S_32292:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Advanced...",12))))||new_error){ if(qbevent){evnt(29060);if(r)goto S_32292;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29061);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEADVANCEDBOX(); if(!qbevent)break;evnt(29062);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29064);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29064);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29064);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29064);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29065);}while(r); } S_32301:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Code layout...",15))))||new_error){ if(qbevent){evnt(29068);if(r)goto S_32301;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29069);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDELAYOUTBOX(); if(!qbevent)break;evnt(29070);}while(r); S_32304:; if ((*_FUNC_IDE2_LONG_RETVAL)||new_error){ if(qbevent){evnt(29071);if(r)goto S_32304;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29071);}while(r); do{ *__LONG_IDELAYOUTALLOW= 2 ; if(!qbevent)break;evnt(29071);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29072);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29072);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29072);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29072);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29073);}while(r); } S_32314:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Add/Remove #Bookmark ALT+Left",30))))||new_error){ if(qbevent){evnt(29076);if(r)goto S_32314;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29077);}while(r); do{ *_FUNC_IDE2_LONG_BMKREMOVED= 0 ; if(!qbevent)break;evnt(29078);}while(r); LABEL_BMKREMOVEB:; if(qbevent){evnt(29079);r=0;} S_32317:; fornext_value3729= 1 ; fornext_finalvalue3729=*__LONG_IDEBMKN; fornext_step3729= 1 ; if (fornext_step3729<0) fornext_step_negative3729=1; else fornext_step_negative3729=0; if (new_error) goto fornext_error3729; goto fornext_entrylabel3729; while(1){ fornext_value3729=fornext_step3729+(*_FUNC_IDE2_LONG_B); fornext_entrylabel3729: *_FUNC_IDE2_LONG_B=fornext_value3729; if (fornext_step_negative3729){ if (fornext_value3729fornext_finalvalue3729) break; } fornext_error3729:; if(qbevent){evnt(29080);if(r)goto S_32317;} S_32318:; if ((-(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))==*__LONG_IDECY))||new_error){ if(qbevent){evnt(29081);if(r)goto S_32318;} S_32319:; fornext_value3731=*_FUNC_IDE2_LONG_B; fornext_finalvalue3731=*__LONG_IDEBMKN- 1 ; fornext_step3731= 1 ; if (fornext_step3731<0) fornext_step_negative3731=1; else fornext_step_negative3731=0; if (new_error) goto fornext_error3731; goto fornext_entrylabel3731; while(1){ fornext_value3731=fornext_step3731+(*_FUNC_IDE2_LONG_B2); fornext_entrylabel3731: *_FUNC_IDE2_LONG_B2=fornext_value3731; if (fornext_step_negative3731){ if (fornext_value3731fornext_finalvalue3731) break; } fornext_error3731:; if(qbevent){evnt(29082);if(r)goto S_32319;} do{ memcpy((((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)),(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2+ 1 )-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)),16); if(!qbevent)break;evnt(29083);}while(r); } fornext_exit_3730:; do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN- 1 ; if(!qbevent)break;evnt(29085);}while(r); do{ *_FUNC_IDE2_LONG_BMKREMOVED= 1 ; if(!qbevent)break;evnt(29086);}while(r); do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(29087);}while(r); do{ goto LABEL_BMKREMOVEB; if(!qbevent)break;evnt(29088);}while(r); } } fornext_exit_3728:; S_32328:; if ((-(*_FUNC_IDE2_LONG_BMKREMOVED== 0 ))||new_error){ if(qbevent){evnt(29091);if(r)goto S_32328;} do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN+ 1 ; if(!qbevent)break;evnt(29092);}while(r); S_32330:; if ((-(*__LONG_IDEBMKN>func_ubound(__ARRAY_UDT_IDEBMK,1,1)))||new_error){ if(qbevent){evnt(29093);if(r)goto S_32330;} do{ *_FUNC_IDE2_LONG_X=func_ubound(__ARRAY_UDT_IDEBMK,1,1)* 2 ; if(!qbevent)break;evnt(29093);}while(r); do{ if (__ARRAY_UDT_IDEBMK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_IDEBMK)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_IDEBMK[2]&1){ preserved_elements=__ARRAY_UDT_IDEBMK[5]; } else preserved_elements=0; __ARRAY_UDT_IDEBMK[4]= 0 ; __ARRAY_UDT_IDEBMK[5]=(*_FUNC_IDE2_LONG_X)-__ARRAY_UDT_IDEBMK[4]+1; __ARRAY_UDT_IDEBMK[6]=1; if (__ARRAY_UDT_IDEBMK[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_IDEBMK[0]),preserved_elements*128/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDEBMK[0])); tmp_long=__ARRAY_UDT_IDEBMK[5]; __ARRAY_UDT_IDEBMK[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*128/8+1); memcpy((void*)(__ARRAY_UDT_IDEBMK[0]),redim_preserve_cmem_buffer,preserved_elements*128/8+1); if (preserved_elements*__LONG_IDEN))||new_error){ if(qbevent){evnt(29121);if(r)goto S_32377;} do{ *_FUNC_IDE2_LONG_L= 1 ; if(!qbevent)break;evnt(29121);}while(r); } S_32380:; fornext_value3734= 1 ; fornext_finalvalue3734=*__LONG_IDEBMKN; fornext_step3734= 1 ; if (fornext_step3734<0) fornext_step_negative3734=1; else fornext_step_negative3734=0; if (new_error) goto fornext_error3734; goto fornext_entrylabel3734; while(1){ fornext_value3734=fornext_step3734+(*_FUNC_IDE2_LONG_B); fornext_entrylabel3734: *_FUNC_IDE2_LONG_B=fornext_value3734; if (fornext_step_negative3734){ if (fornext_value3734fornext_finalvalue3734) break; } fornext_error3734:; if(qbevent){evnt(29122);if(r)goto S_32380;} S_32381:; if ((-(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))==*_FUNC_IDE2_LONG_L))||new_error){ if(qbevent){evnt(29123);if(r)goto S_32381;} do{ goto dl_exit_3732; if(!qbevent)break;evnt(29123);}while(r); } } fornext_exit_3733:; }while(1); dl_exit_3732:; do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(29126);}while(r); do{ *__LONG_IDECX=*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+4)); if(!qbevent)break;evnt(29127);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(29128);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29129);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29129);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29129);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29130);}while(r); } S_32394:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Go to line...",14))))||new_error){ if(qbevent){evnt(29138);if(r)goto S_32394;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29139);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEGOTOBOX(); if(!qbevent)break;evnt(29140);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29142);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29142);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29142);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29142);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29143);}while(r); } S_32403:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Backup/Undo...",15))))||new_error){ if(qbevent){evnt(29146);if(r)goto S_32403;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29147);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEBACKUPBOX(); if(!qbevent)break;evnt(29148);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29150);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29150);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29150);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29150);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29151);}while(r); } S_32412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Update...",10))))||new_error){ if(qbevent){evnt(29154);if(r)goto S_32412;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29155);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEUPDATEBOX(); if(!qbevent)break;evnt(29156);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29158);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29158);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29158);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29158);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29159);}while(r); } S_32421:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#About...",9))))||new_error){ if(qbevent){evnt(29162);if(r)goto S_32421;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29163);}while(r); do{ SUB_IDEMESSAGEBOX(qbs_new_txt_len("About",5),qbs_add(qbs_new_txt_len("QB64 Version ",13),__STRING_VERSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29164);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29165);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29165);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29165);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29165);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29166);}while(r); } S_32430:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("ASCII c#hart",12))))||new_error){ if(qbevent){evnt(29170);if(r)goto S_32430;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29171);}while(r); do{ SUB_IDEASCIIBOX(); if(!qbevent)break;evnt(29172);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29173);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29173);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29173);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29173);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29174);}while(r); } S_32439:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Contents page",14))))||new_error){ if(qbevent){evnt(29177);if(r)goto S_32439;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29178);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29178);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29178);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29178);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LNK,qbs_new_txt_len("QB64 Help Menu",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29179);}while(r); do{ goto LABEL_OPENHELPLNK; if(!qbevent)break;evnt(29180);}while(r); } S_32447:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Keyword #index",14))))||new_error){ if(qbevent){evnt(29182);if(r)goto S_32447;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29183);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29183);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29183);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29183);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LNK,qbs_new_txt_len("Keyword Reference - Alphabetical",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29184);}while(r); do{ goto LABEL_OPENHELPLNK; if(!qbevent)break;evnt(29185);}while(r); } S_32455:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Keywords by usage",18))))||new_error){ if(qbevent){evnt(29187);if(r)goto S_32455;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29188);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29188);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29188);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29188);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LNK,qbs_new_txt_len("Keyword Reference - By usage",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29189);}while(r); do{ goto LABEL_OPENHELPLNK; if(!qbevent)break;evnt(29190);}while(r); } S_32463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#View Shift+F1",15))))||new_error){ if(qbevent){evnt(29193);if(r)goto S_32463;} S_32464:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(29195);if(r)goto S_32464;} S_32465:; if ((*__LONG_IDESUBWINDOW)||new_error){ if(qbevent){evnt(29196);if(r)goto S_32465;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29196);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29196);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29196);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29196);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29196);}while(r); } do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(29197);}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(29197);}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(29198);}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(29198);}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(29198);}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(29198);}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(29198);}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(29198);}while(r); do{ *__LONG_IDEHELP= 1 ; if(!qbevent)break;evnt(29199);}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(29200);}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(29201);}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(29202);}while(r); do{ goto LABEL_REDRAWEVERYTHING2; if(!qbevent)break;evnt(29202);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29205);}while(r); } S_32488:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Update current page",20))))||new_error){ if(qbevent){evnt(29208);if(r)goto S_32488;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29209);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29209);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29209);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29209);}while(r); S_32493:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(29210);if(r)goto S_32493;} do{ *__LONG_HELP_IGNORECACHE= 1 ; if(!qbevent)break;evnt(29211);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_WIKI(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check((*__LONG_HELP_BACK_POS)-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29212);}while(r); do{ *__LONG_HELP_IGNORECACHE= 0 ; if(!qbevent)break;evnt(29213);}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29214);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29216);}while(r); } S_32501:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Update all #pages",17))))||new_error){ if(qbevent){evnt(29219);if(r)goto S_32501;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29220);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_Q,FUNC_IDEYESNOBOX(qbs_new_txt_len("Update Help",11),qbs_new_txt_len("Redownload all cached help content? (~10 min)",45))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29221);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29222);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29222);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29222);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29222);}while(r); S_32508:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_Q,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(29223);if(r)goto S_32508;} S_32509:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(29225);if(r)goto S_32509;} do{ *_FUNC_IDE2_LONG_OLD_IDESUBWINDOW=*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(29226);}while(r); do{ *_FUNC_IDE2_LONG_OLD_IDEWY=*__LONG_IDEWY; if(!qbevent)break;evnt(29226);}while(r); do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(29227);}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(29227);}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(29228);}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(29228);}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(29228);}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(29228);}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(29228);}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(29228);}while(r); do{ *__LONG_IDESUBWINDOW=*_FUNC_IDE2_LONG_OLD_IDESUBWINDOW; if(!qbevent)break;evnt(29229);}while(r); do{ *__LONG_IDEWY=*_FUNC_IDE2_LONG_OLD_IDEWY; if(!qbevent)break;evnt(29229);}while(r); } do{ qbg_screen(NULL,NULL, 4 , 4 ,NULL,12); if(!qbevent)break;evnt(29232);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(29233);}while(r); do{ sub_cls(NULL,NULL,0); if(!qbevent)break;evnt(29234);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Generating list of cached content...",36)); if (new_error) goto skip3735; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3735: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29236);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_add(func_chr( 0 ),FUNC_IDEZFILELIST(qbs_new_txt_len("internal/help",13),&(pass3736= 1 ))),func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29239);}while(r); S_32528:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_F->len== 2 )))||new_error){ if(qbevent){evnt(29240);if(r)goto S_32528;} do{ qbs_set(_FUNC_IDE2_STRING_F,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29240);}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_add(func_chr( 0 ),qbs_new_txt_len("Keyword_Reference_-_By_usage.txt",32)),_FUNC_IDE2_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29243);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_add(func_chr( 0 ),qbs_new_txt_len("QB64_Help_Menu.txt",18)),_FUNC_IDE2_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29244);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_add(func_chr( 0 ),qbs_new_txt_len("QB64_FAQ.txt",12)),_FUNC_IDE2_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29245);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Adding core help pages added to list...",39)); if (new_error) goto skip3738; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3738: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29246);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Regenerating keyword list...",28)); if (new_error) goto skip3739; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3739: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29249);}while(r); do{ *__LONG_HELP_RECACHING= 1 ; if(!qbevent)break;evnt(29250);}while(r); do{ *__LONG_HELP_IGNORECACHE= 1 ; if(!qbevent)break;evnt(29250);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_WIKI(qbs_new_txt_len("Keyword Reference - Alphabetical",32))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29251);}while(r); do{ *__LONG_HELP_RECACHING= 0 ; if(!qbevent)break;evnt(29252);}while(r); do{ *__LONG_HELP_IGNORECACHE= 0 ; if(!qbevent)break;evnt(29252);}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29253);}while(r); do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(29256);}while(r); do{ sub_open(qbs_new_txt_len("internal\\help\\links.bin",23), 3 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29257);}while(r); S_32544:; while((!(func_eof(*_FUNC_IDE2_LONG_FH)))||new_error){ if(qbevent){evnt(29258);if(r)goto S_32544;} do{ tmp_fileno=*_FUNC_IDE2_LONG_FH; if (new_error) goto skip3741; sub_file_line_input_string(tmp_fileno,_FUNC_IDE2_STRING_L); if (new_error) goto skip3741; skip3741: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29259);}while(r); S_32546:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_L->len))||new_error){ if(qbevent){evnt(29260);if(r)goto S_32546;} do{ *_FUNC_IDE2_LONG_C=func_instr(NULL,_FUNC_IDE2_STRING_L,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29261);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_PAGENAME2,qbs_right(_FUNC_IDE2_STRING_L,_FUNC_IDE2_STRING_L->len-*_FUNC_IDE2_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29261);}while(r); S_32549:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_PAGENAME2,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(29262);if(r)goto S_32549;} do{ tqbs=_FUNC_IDE2_STRING_PAGENAME2; if (!new_error){ tmp_fileno=func_instr(NULL,_FUNC_IDE2_STRING_PAGENAME2,qbs_new_txt_len(" ",1),0); if (!new_error){ tmp_long= 95 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(29263);}while(r); } dl_exit_3744:; S_32552:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_PAGENAME2,qbs_new_txt_len("&",1),0)))||new_error){ if(qbevent){evnt(29265);if(r)goto S_32552;} do{ *_FUNC_IDE2_LONG_I=func_instr(NULL,_FUNC_IDE2_STRING_PAGENAME2,qbs_new_txt_len("&",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29266);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_PAGENAME2,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_PAGENAME2,*_FUNC_IDE2_LONG_I- 1 ),qbs_new_txt_len("%26",3)),qbs_right(_FUNC_IDE2_STRING_PAGENAME2,_FUNC_IDE2_STRING_PAGENAME2->len-*_FUNC_IDE2_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29267);}while(r); } dl_exit_3745:; S_32556:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_PAGENAME2,qbs_new_txt_len("/",1),0)))||new_error){ if(qbevent){evnt(29269);if(r)goto S_32556;} do{ *_FUNC_IDE2_LONG_I=func_instr(NULL,_FUNC_IDE2_STRING_PAGENAME2,qbs_new_txt_len("/",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29270);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_PAGENAME2,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_PAGENAME2,*_FUNC_IDE2_LONG_I- 1 ),qbs_new_txt_len("%2F",3)),qbs_right(_FUNC_IDE2_STRING_PAGENAME2,_FUNC_IDE2_STRING_PAGENAME2->len-*_FUNC_IDE2_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29271);}while(r); } dl_exit_3747:; do{ qbs_set(_FUNC_IDE2_STRING_PAGENAME2,qbs_add(_FUNC_IDE2_STRING_PAGENAME2,qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29273);}while(r); S_32561:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDE2_STRING_F,qbs_add(qbs_add(func_chr( 0 ),_FUNC_IDE2_STRING_PAGENAME2),func_chr( 0 )),0)== 0 )))||new_error){ if(qbevent){evnt(29274);if(r)goto S_32561;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_add(_FUNC_IDE2_STRING_F,_FUNC_IDE2_STRING_PAGENAME2),func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29275);}while(r); } } } dl_exit_3740:; do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(29279);}while(r); S_32567:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_F,func_chr( 0 ))))||new_error){ if(qbevent){evnt(29282);if(r)goto S_32567;} do{ *_FUNC_IDE2_LONG_C= 0 ; if(!qbevent)break;evnt(29283);}while(r); S_32569:; fornext_value3750= 2 ; fornext_finalvalue3750=_FUNC_IDE2_STRING_F->len; fornext_step3750= 1 ; if (fornext_step3750<0) fornext_step_negative3750=1; else fornext_step_negative3750=0; if (new_error) goto fornext_error3750; goto fornext_entrylabel3750; while(1){ fornext_value3750=fornext_step3750+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3750: *_FUNC_IDE2_LONG_X=fornext_value3750; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3750){ if (fornext_value3750fornext_finalvalue3750) break; } fornext_error3750:; if(qbevent){evnt(29284);if(r)goto S_32569;} S_32570:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_F,*_FUNC_IDE2_LONG_X)== 0 )))||new_error){ if(qbevent){evnt(29285);if(r)goto S_32570;} do{ *_FUNC_IDE2_LONG_C=*_FUNC_IDE2_LONG_C+ 1 ; if(!qbevent)break;evnt(29285);}while(r); } } fornext_exit_3749:; do{ *_FUNC_IDE2_LONG_C=*_FUNC_IDE2_LONG_C- 1 ; if(!qbevent)break;evnt(29287);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Updating",8)); if (new_error) goto skip3752; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_str((int32)(*_FUNC_IDE2_LONG_C)),qbs_new_txt(" "))); if (new_error) goto skip3752; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("help content files: (Press ESC to cancel)",41)); if (new_error) goto skip3752; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3752: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29288);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_right(_FUNC_IDE2_STRING_F,_FUNC_IDE2_STRING_F->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29290);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_Z,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29291);}while(r); do{ *_FUNC_IDE2_LONG_N= 0 ; if(!qbevent)break;evnt(29292);}while(r); S_32579:; while((!(qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_F->len== 0 ))))||new_error){ if(qbevent){evnt(29293);if(r)goto S_32579;} do{ *_FUNC_IDE2_LONG_X2=func_instr(NULL,_FUNC_IDE2_STRING_F,_FUNC_IDE2_STRING_Z,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29294);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F2,qbs_left(_FUNC_IDE2_STRING_F,*_FUNC_IDE2_LONG_X2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29295);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_right(_FUNC_IDE2_STRING_F,_FUNC_IDE2_STRING_F->len-*_FUNC_IDE2_LONG_X2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29295);}while(r); S_32583:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDE2_STRING_F2, 4 ),qbs_new_txt_len(".txt",4))))||new_error){ if(qbevent){evnt(29297);if(r)goto S_32583;} do{ qbs_set(_FUNC_IDE2_STRING_F2,qbs_left(_FUNC_IDE2_STRING_F2,_FUNC_IDE2_STRING_F2->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29298);}while(r); do{ *_FUNC_IDE2_LONG_N=*_FUNC_IDE2_LONG_N+ 1 ; if(!qbevent)break;evnt(29299);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_STR2(_FUNC_IDE2_LONG_N)),qbs_new_txt_len("/",1)),FUNC_STR2(_FUNC_IDE2_LONG_C)),qbs_new_txt_len(") ",2)),_FUNC_IDE2_STRING_F2)); if (new_error) goto skip3758; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3758: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29300);}while(r); do{ *__LONG_HELP_IGNORECACHE= 1 ; if(!qbevent)break;evnt(29302);}while(r); do{ *__LONG_HELP_RECACHING= 1 ; if(!qbevent)break;evnt(29302);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_IGNORE,FUNC_WIKI(_FUNC_IDE2_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29302);}while(r); do{ *__LONG_HELP_RECACHING= 0 ; if(!qbevent)break;evnt(29302);}while(r); do{ *__LONG_HELP_IGNORECACHE= 0 ; if(!qbevent)break;evnt(29302);}while(r); } do{ SUB_GETINPUT(); if(!qbevent)break;evnt(29305);}while(r); S_32594:; while((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(29306);if(r)goto S_32594;} S_32595:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(29307);if(r)goto S_32595;} do{ goto LABEL_STOPRECACHE; if(!qbevent)break;evnt(29307);}while(r); } do{ SUB_GETINPUT(); if(!qbevent)break;evnt(29308);}while(r); } dl_exit_3759:; } dl_exit_3755:; } LABEL_STOPRECACHE:; if(qbevent){evnt(29312);r=0;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29313);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29313);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29313);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29313);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29315);}while(r); } S_32609:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Update",7))))||new_error){ if(qbevent){evnt(29318);if(r)goto S_32609;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29319);}while(r); do{ *__LONG_UPDATEHANDLE=FUNC_BEGINDOWNLOAD(qbs_new_txt_len("www.qb64.net/update2.txt",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29320);}while(r); S_32612:; if ((*__LONG_UPDATEHANDLE)||new_error){ if(qbevent){evnt(29321);if(r)goto S_32612;} do{ *__SINGLE_IDEUPDATETIMERVAL=func_timer(NULL,0); if(!qbevent)break;evnt(29322);}while(r); S_32614:; while((!(-(func_abs((float)(func_timer(NULL,0)-*__SINGLE_IDEUPDATETIMERVAL))>= 5 )))||new_error){ if(qbevent){evnt(29323);if(r)goto S_32614;} do{ SUB_CONTINUEDOWNLOADS(); if(!qbevent)break;evnt(29324);}while(r); S_32616:; if ((-(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))== 2 ))||new_error){ if(qbevent){evnt(29325);if(r)goto S_32616;} do{ SUB_UPDATE(&(pass3761= 1 )); if(!qbevent)break;evnt(29326);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(29327);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29328);}while(r); } do{ sub__limit( 10 ); if(!qbevent)break;evnt(29330);}while(r); } dl_exit_3760:; do{ sub_close(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8+4)),1); if(!qbevent)break;evnt(29332);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))= 0 ; if(!qbevent)break;evnt(29332);}while(r); do{ *__LONG_UPDATEHANDLE= 0 ; if(!qbevent)break;evnt(29332);}while(r); do{ SUB_IDEMESSAGEBOX(qbs_new_txt_len("Update",6),qbs_new_txt_len("Could not connect to server.",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29333);}while(r); }else{ do{ SUB_IDEMESSAGEBOX(qbs_new_txt_len("Update",6),qbs_new_txt_len("Could not connect to server.",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29335);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29336);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29336);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29336);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29336);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29338);}while(r); } S_32636:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("New #SUB...",11))))||new_error){ if(qbevent){evnt(29341);if(r)goto S_32636;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29342);}while(r); do{ SUB_IDENEWSF(qbs_new_txt_len("SUB",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29343);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(29344);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29345);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29345);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29345);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29345);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29346);}while(r); } S_32646:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("New #FUNCTION...",16))))||new_error){ if(qbevent){evnt(29348);if(r)goto S_32646;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29349);}while(r); do{ SUB_IDENEWSF(qbs_new_txt_len("FUNCTION",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29350);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(29351);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29352);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29352);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29352);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29352);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29353);}while(r); } S_32656:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#SUBs... F2",12))))||new_error){ if(qbevent){evnt(29356);if(r)goto S_32656;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29357);}while(r); LABEL_IDESUBSJMP:; if(qbevent){evnt(29358);r=0;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESUBS()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29359);}while(r); S_32659:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29360);if(r)goto S_32659;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(29360);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29361);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29361);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29361);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29361);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29362);}while(r); } S_32668:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Find...",8))))||new_error){ if(qbevent){evnt(29367);if(r)goto S_32668;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29368);}while(r); LABEL_IDEFINDJMP:; if(qbevent){evnt(29369);r=0;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFIND()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29370);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29371);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29371);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29371);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29371);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29373);}while(r); } S_32677:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Change...",10))))||new_error){ if(qbevent){evnt(29376);if(r)goto S_32677;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29377);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDECHANGE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29378);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29379);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29379);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29379);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29379);}while(r); S_32684:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1)))|(qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(29380);if(r)goto S_32684;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29380);}while(r); } do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29382);}while(r); do{ *_FUNC_IDE2_LONG_OLDCX=*__LONG_IDECX; if(!qbevent)break;evnt(29384);}while(r); do{ *_FUNC_IDE2_LONG_OLDCY=*__LONG_IDECY; if(!qbevent)break;evnt(29384);}while(r); do{ *_FUNC_IDE2_LONG_FOUND= 0 ; if(!qbevent)break;evnt(29385);}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 0 ; if(!qbevent)break;evnt(29385);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_S,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29387);}while(r); S_32693:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(29388);if(r)goto S_32693;} do{ qbs_set(_FUNC_IDE2_STRING_S,qbs_ucase(_FUNC_IDE2_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29388);}while(r); } do{ *_FUNC_IDE2_LONG_START=*__LONG_IDECY; if(!qbevent)break;evnt(29389);}while(r); do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_START; if(!qbevent)break;evnt(29389);}while(r); do{ *_FUNC_IDE2_LONG_STARTX=*__LONG_IDECX; if(!qbevent)break;evnt(29390);}while(r); do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_STARTX; if(!qbevent)break;evnt(29390);}while(r); do{ *_FUNC_IDE2_LONG_FIRST= 1 ; if(!qbevent)break;evnt(29391);}while(r); LABEL_IDEFINDNEXT2:; if(qbevent){evnt(29392);r=0;} do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29394);}while(r); S_32702:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(29395);if(r)goto S_32702;} do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_ucase(_FUNC_IDE2_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29395);}while(r); } S_32705:; if ((-(*_FUNC_IDE2_LONG_FIRST== 1 ))||new_error){ if(qbevent){evnt(29397);if(r)goto S_32705;} do{ *_FUNC_IDE2_LONG_FIRST= 0 ; if(!qbevent)break;evnt(29398);}while(r); }else{ do{ *_FUNC_IDE2_LONG_X1= 1 ; if(!qbevent)break;evnt(29400);}while(r); S_32709:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(29401);if(r)goto S_32709;} do{ *_FUNC_IDE2_LONG_X1=_FUNC_IDE2_STRING_L->len-_FUNC_IDE2_STRING_S->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29402);}while(r); } } S_32713:; if ((-(*_FUNC_IDE2_LONG_X1< 0 ))||new_error){ if(qbevent){evnt(29405);if(r)goto S_32713;} do{ *_FUNC_IDE2_LONG_X1= 0 ; if(!qbevent)break;evnt(29405);}while(r); } LABEL_IDEFINDAGAIN2:; if(qbevent){evnt(29407);r=0;} S_32716:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(29409);if(r)goto S_32716;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(29410);}while(r); S_32718:; fornext_value3765=*_FUNC_IDE2_LONG_X1; fornext_finalvalue3765= 1 ; fornext_step3765= -1 ; if (fornext_step3765<0) fornext_step_negative3765=1; else fornext_step_negative3765=0; if (new_error) goto fornext_error3765; goto fornext_entrylabel3765; while(1){ fornext_value3765=fornext_step3765+(*_FUNC_IDE2_LONG_XX); fornext_entrylabel3765: *_FUNC_IDE2_LONG_XX=fornext_value3765; if (fornext_step_negative3765){ if (fornext_value3765fornext_finalvalue3765) break; } fornext_error3765:; if(qbevent){evnt(29411);if(r)goto S_32718;} S_32719:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_L,*_FUNC_IDE2_LONG_XX)==qbs_asc(_FUNC_IDE2_STRING_S))))||new_error){ if(qbevent){evnt(29412);if(r)goto S_32719;} do{ *_FUNC_IDE2_LONG_XXO=*_FUNC_IDE2_LONG_XX- 1 ; if(!qbevent)break;evnt(29413);}while(r); S_32721:; fornext_value3767=*_FUNC_IDE2_LONG_XX; fornext_finalvalue3767=*_FUNC_IDE2_LONG_XX+_FUNC_IDE2_STRING_S->len- 1 ; fornext_step3767= 1 ; if (fornext_step3767<0) fornext_step_negative3767=1; else fornext_step_negative3767=0; if (new_error) goto fornext_error3767; goto fornext_entrylabel3767; while(1){ fornext_value3767=fornext_step3767+(*_FUNC_IDE2_LONG_XX2); fornext_entrylabel3767: *_FUNC_IDE2_LONG_XX2=fornext_value3767; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3767){ if (fornext_value3767fornext_finalvalue3767) break; } fornext_error3767:; if(qbevent){evnt(29414);if(r)goto S_32721;} S_32722:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_L,*_FUNC_IDE2_LONG_XX2)!=qbs_asc(_FUNC_IDE2_STRING_S,*_FUNC_IDE2_LONG_XX2-*_FUNC_IDE2_LONG_XXO))))||new_error){ if(qbevent){evnt(29415);if(r)goto S_32722;} do{ goto fornext_exit_3766; if(!qbevent)break;evnt(29415);}while(r); } } fornext_exit_3766:; S_32726:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_XX2==(*_FUNC_IDE2_LONG_XX+_FUNC_IDE2_STRING_S->len))))||new_error){ if(qbevent){evnt(29417);if(r)goto S_32726;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_XX; if(!qbevent)break;evnt(29419);}while(r); do{ goto fornext_exit_3764; if(!qbevent)break;evnt(29420);}while(r); } } } fornext_exit_3764:; S_32732:; if (((-(*_FUNC_IDE2_LONG_Y==*_FUNC_IDE2_LONG_START))&(-(*_FUNC_IDE2_LONG_LOOPED== 1 ))&(-(*_FUNC_IDE2_LONG_X<=*_FUNC_IDE2_LONG_STARTX)))||new_error){ if(qbevent){evnt(29424);if(r)goto S_32732;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(29424);}while(r); } }else{ do{ *_FUNC_IDE2_LONG_X=func_instr(*_FUNC_IDE2_LONG_X1,_FUNC_IDE2_STRING_L,_FUNC_IDE2_STRING_S,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29426);}while(r); S_32737:; if (((-(*_FUNC_IDE2_LONG_Y==*_FUNC_IDE2_LONG_START))&(-(*_FUNC_IDE2_LONG_LOOPED== 1 ))&(-(*_FUNC_IDE2_LONG_X>=*_FUNC_IDE2_LONG_STARTX)))||new_error){ if(qbevent){evnt(29427);if(r)goto S_32737;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(29427);}while(r); } } S_32741:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(29430);if(r)goto S_32741;} S_32742:; if ((*__INTEGER_IDEFINDWHOLEWORD)||new_error){ if(qbevent){evnt(29431);if(r)goto S_32742;} do{ *_FUNC_IDE2_LONG_WHOLE= 1 ; if(!qbevent)break;evnt(29432);}while(r); S_32744:; if ((-(*_FUNC_IDE2_LONG_X> 1 ))||new_error){ if(qbevent){evnt(29433);if(r)goto S_32744;} do{ *_FUNC_IDE2_LONG_C=qbs_asc(qbs_ucase(func_mid(_FUNC_IDE2_STRING_L,*_FUNC_IDE2_LONG_X- 1 , 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29434);}while(r); S_32746:; if (((-(*_FUNC_IDE2_LONG_C>= 65 ))&(-(*_FUNC_IDE2_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(29435);if(r)goto S_32746;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29435);}while(r); } S_32749:; if (((-(*_FUNC_IDE2_LONG_C>= 48 ))&(-(*_FUNC_IDE2_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(29436);if(r)goto S_32749;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29436);}while(r); } } S_32753:; if ((qbs_cleanup(qbs_tmp_base,-((*_FUNC_IDE2_LONG_X+_FUNC_IDE2_STRING_S->len)<=(_FUNC_IDE2_STRING_L->len))))||new_error){ if(qbevent){evnt(29438);if(r)goto S_32753;} do{ *_FUNC_IDE2_LONG_C=qbs_asc(qbs_ucase(func_mid(_FUNC_IDE2_STRING_L,*_FUNC_IDE2_LONG_X+_FUNC_IDE2_STRING_S->len, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29439);}while(r); S_32755:; if (((-(*_FUNC_IDE2_LONG_C>= 65 ))&(-(*_FUNC_IDE2_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(29440);if(r)goto S_32755;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29440);}while(r); } S_32758:; if (((-(*_FUNC_IDE2_LONG_C>= 48 ))&(-(*_FUNC_IDE2_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(29441);if(r)goto S_32758;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29441);}while(r); } } S_32762:; if ((-(*_FUNC_IDE2_LONG_WHOLE== 0 ))||new_error){ if(qbevent){evnt(29443);if(r)goto S_32762;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(29444);}while(r); S_32764:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(29444);if(r)goto S_32764;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X- 1 ; if(!qbevent)break;evnt(29444);}while(r); } do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(29445);}while(r); S_32768:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDE2_LONG_X1> 0 ))&(-(*_FUNC_IDE2_LONG_X1<=_FUNC_IDE2_STRING_L->len))))||new_error){ if(qbevent){evnt(29446);if(r)goto S_32768;} do{ goto LABEL_IDEFINDAGAIN2; if(!qbevent)break;evnt(29446);}while(r); } } } } S_32774:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(29451);if(r)goto S_32774;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(29452);}while(r); do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(29453);}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(29453);}while(r); do{ *__LONG_IDESELECTX1=*_FUNC_IDE2_LONG_X+_FUNC_IDE2_STRING_S->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29454);}while(r); do{ *__LONG_IDESELECTY1=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(29454);}while(r); do{ *_FUNC_IDE2_LONG_FOUND= 1 ; if(!qbevent)break;evnt(29456);}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(29457);}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(29458);}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(29458);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29458);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29459);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDECHANGEIT()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29460);}while(r); do{ SUB_IDEDELTXT(); if(!qbevent)break;evnt(29461);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29462);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29462);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29462);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29462);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(29463);}while(r); S_32793:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29464);if(r)goto S_32793;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_OLDCX; if(!qbevent)break;evnt(29464);}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_OLDCY; if(!qbevent)break;evnt(29464);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29464);}while(r); } S_32798:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(29465);if(r)goto S_32798;} do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29466);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29467);}while(r); S_32801:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_L->len>=*__LONG_IDESELECTX1)))||new_error){ if(qbevent){evnt(29468);if(r)goto S_32801;} do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_L,*__LONG_IDECX- 1 ),__STRING_IDECHANGETO),qbs_right(_FUNC_IDE2_STRING_L,_FUNC_IDE2_STRING_L->len-*__LONG_IDESELECTX1+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29469);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_add(qbs_left(_FUNC_IDE2_STRING_L,*__LONG_IDECX- 1 ),__STRING_IDECHANGETO)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29471);}while(r); } do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29473);}while(r); S_32807:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(29474);if(r)goto S_32807;} do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_ucase(_FUNC_IDE2_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29474);}while(r); } S_32810:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(29476);if(r)goto S_32810;} S_32811:; if (((-(*_FUNC_IDE2_LONG_X<=*_FUNC_IDE2_LONG_STARTX))&(-(*_FUNC_IDE2_LONG_Y==*_FUNC_IDE2_LONG_START)))||new_error){ if(qbevent){evnt(29477);if(r)goto S_32811;} do{ *_FUNC_IDE2_LONG_STARTX=*_FUNC_IDE2_LONG_STARTX-_FUNC_IDE2_STRING_S->len+__STRING_IDECHANGETO->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29477);}while(r); } }else{ S_32815:; if (((-(*_FUNC_IDE2_LONG_X<=*_FUNC_IDE2_LONG_STARTX))&(-(*_FUNC_IDE2_LONG_Y==*_FUNC_IDE2_LONG_START))&(-(*_FUNC_IDE2_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(29479);if(r)goto S_32815;} do{ *_FUNC_IDE2_LONG_STARTX=*_FUNC_IDE2_LONG_STARTX-_FUNC_IDE2_STRING_S->len+__STRING_IDECHANGETO->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29479);}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+__STRING_IDECHANGETO->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29480);}while(r); } }else{ } S_32822:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(29486);if(r)goto S_32822;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X- 1 ; if(!qbevent)break;evnt(29486);}while(r); }else{ do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(29486);}while(r); } do{ goto LABEL_IDEFINDAGAIN2; if(!qbevent)break;evnt(29487);}while(r); } S_32829:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(29490);if(r)goto S_32829;} do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y- 1 ; if(!qbevent)break;evnt(29491);}while(r); S_32831:; if (((-(*_FUNC_IDE2_LONG_Y==(*_FUNC_IDE2_LONG_START- 1 )))&(-(*_FUNC_IDE2_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(29492);if(r)goto S_32831;} do{ goto LABEL_FINISHEDCHANGE; if(!qbevent)break;evnt(29493);}while(r); } S_32834:; if ((-(*_FUNC_IDE2_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(29495);if(r)goto S_32834;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEN; if(!qbevent)break;evnt(29495);}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(29495);}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(29496);}while(r); }else{ do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y+ 1 ; if(!qbevent)break;evnt(29498);}while(r); S_32841:; if (((-(*_FUNC_IDE2_LONG_Y==(*_FUNC_IDE2_LONG_START+ 1 )))&(-(*_FUNC_IDE2_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(29499);if(r)goto S_32841;} do{ goto LABEL_FINISHEDCHANGE; if(!qbevent)break;evnt(29500);}while(r); } S_32844:; if ((-(*_FUNC_IDE2_LONG_Y>*__LONG_IDEN))||new_error){ if(qbevent){evnt(29502);if(r)goto S_32844;} do{ *_FUNC_IDE2_LONG_Y= 1 ; if(!qbevent)break;evnt(29502);}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(29502);}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(29503);}while(r); } LABEL_FINISHEDCHANGE:; if(qbevent){evnt(29508);r=0;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_OLDCX; if(!qbevent)break;evnt(29509);}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_OLDCY; if(!qbevent)break;evnt(29509);}while(r); S_32852:; if ((*_FUNC_IDE2_LONG_FOUND)||new_error){ if(qbevent){evnt(29510);if(r)goto S_32852;} do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(29511);}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(29512);}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(29512);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29512);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29513);}while(r); do{ SUB_IDECHANGED(); if(!qbevent)break;evnt(29514);}while(r); }else{ do{ SUB_IDENOMATCH(); if(!qbevent)break;evnt(29516);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29518);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29518);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29518);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29518);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29519);}while(r); } S_32868:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Repeat Last Find (Shift+) F3",30))))||new_error){ if(qbevent){evnt(29522);if(r)goto S_32868;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29523);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29523);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29523);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29523);}while(r); do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(29524);}while(r); } S_32875:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Cl#ear Del",11))))||new_error){ if(qbevent){evnt(29527);if(r)goto S_32875;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29528);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29528);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29528);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29528);}while(r); S_32880:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(29529);if(r)goto S_32880;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29530);}while(r); do{ return_point[next_return_point++]=16; if (next_return_point>=return_points) more_return_points(); goto LABEL_DELSELECT; RETURN_16:; if(!qbevent)break;evnt(29531);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29533);}while(r); } S_32886:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Paste Shift+Ins or CTRL+V",27))))||new_error){ if(qbevent){evnt(29536);if(r)goto S_32886;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29537);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29537);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29537);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29537);}while(r); do{ goto LABEL_IDEMPASTE; if(!qbevent)break;evnt(29538);}while(r); } S_32893:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Copy Ctrl+Ins or CTRL+C",25))))||new_error){ if(qbevent){evnt(29541);if(r)goto S_32893;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29542);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29542);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29542);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29542);}while(r); S_32898:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(29543);if(r)goto S_32898;} do{ goto LABEL_COPY2CLIP; if(!qbevent)break;evnt(29543);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29544);}while(r); } S_32903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Cu#t Shift+Del or CTRL+X",25))))||new_error){ if(qbevent){evnt(29547);if(r)goto S_32903;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29548);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29548);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29548);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29548);}while(r); S_32908:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(29549);if(r)goto S_32908;} do{ qbs_set(__STRING_K,qbs_add(func_chr( 0 ),qbs_new_txt_len("S",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29550);}while(r); do{ goto LABEL_IDEMCUT; if(!qbevent)break;evnt(29551);}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29553);}while(r); } S_32914:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Undo CTRL+Z",13))))||new_error){ if(qbevent){evnt(29556);if(r)goto S_32914;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29557);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29557);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29557);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29557);}while(r); do{ goto LABEL_IDEMUNDO; if(!qbevent)break;evnt(29558);}while(r); } S_32921:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Redo CTRL+Y",13))))||new_error){ if(qbevent){evnt(29561);if(r)goto S_32921;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29562);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29562);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29562);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29562);}while(r); do{ goto LABEL_IDEMREDO; if(!qbevent)break;evnt(29563);}while(r); } S_32928:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Select #All CTRL+A",19))))||new_error){ if(qbevent){evnt(29567);if(r)goto S_32928;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29568);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29568);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29568);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29568);}while(r); do{ goto LABEL_IDEMSELECTALL; if(!qbevent)break;evnt(29569);}while(r); } do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Select #All CTRL+A",19)); if(!qbevent)break;evnt(29572);}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(29572);}while(r); S_32937:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Start F5",10))))||new_error){ if(qbevent){evnt(29574);if(r)goto S_32937;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29575);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29575);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29575);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29575);}while(r); do{ goto LABEL_IDEMRUN; if(!qbevent)break;evnt(29576);}while(r); } S_32944:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Start (#Detached) Ctrl+F5",26))))||new_error){ if(qbevent){evnt(29579);if(r)goto S_32944;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29580);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29580);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29580);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29580);}while(r); do{ goto LABEL_IDEMDETACHED; if(!qbevent)break;evnt(29581);}while(r); } S_32951:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Make E#XE Only F11",19)))|(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Make E#xecutable Only F11",26)))))||new_error){ if(qbevent){evnt(29584);if(r)goto S_32951;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29585);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29585);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29585);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29585);}while(r); do{ goto LABEL_IDEMEXE; if(!qbevent)break;evnt(29586);}while(r); } S_32958:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("E#xit",5))))||new_error){ if(qbevent){evnt(29589);if(r)goto S_32958;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29590);}while(r); LABEL_QUICKEXIT:; if(qbevent){evnt(29591);r=0;} S_32960:; if ((-(*__LONG_IDEUNSAVED== 1 ))||new_error){ if(qbevent){evnt(29592);if(r)goto S_32960;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29593);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29594);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29594);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29594);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29594);}while(r); S_32966:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29595);if(r)goto S_32966;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29595);}while(r); } S_32969:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(29596);if(r)goto S_32969;} S_32970:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(29597);if(r)goto S_32970;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVEAS(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29598);}while(r); S_32972:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29599);if(r)goto S_32972;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29600);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29600);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29600);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29600);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29600);}while(r); } }else{ do{ SUB_IDESAVE(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29603);}while(r); } } } do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(29608);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("autosave.bin",12)), 4 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29608);}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(29608);}while(r); do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(29609);}while(r); } S_32989:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#New",4))))||new_error){ if(qbevent){evnt(29612);if(r)goto S_32989;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29613);}while(r); S_32991:; if ((-(*__LONG_IDEUNSAVED== 1 ))||new_error){ if(qbevent){evnt(29614);if(r)goto S_32991;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29615);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29616);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29616);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29616);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29616);}while(r); S_32997:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29617);if(r)goto S_32997;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29617);}while(r); } S_33000:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(29618);if(r)goto S_33000;} S_33001:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(29619);if(r)goto S_33001;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVEAS(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29620);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29621);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29621);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29621);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29621);}while(r); S_33007:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29622);if(r)goto S_33007;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29622);}while(r); } }else{ do{ SUB_IDESAVE(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29624);}while(r); } } } do{ *__LONG_IDEUNSAVED= -1 ; if(!qbevent)break;evnt(29628);}while(r); do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29630);}while(r); do{ *__LONG_IDEL= 1 ; if(!qbevent)break;evnt(29630);}while(r); do{ *__LONG_IDELI= 1 ; if(!qbevent)break;evnt(29630);}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(29630);}while(r); do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(29630);}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(29631);}while(r); do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(29632);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(29633);}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(29634);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(29635);}while(r); do{ qbs_set(__STRING_IDEPROGNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29636);}while(r); do{ sub__title(qbs_new_txt_len("QB64",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29637);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29638);}while(r); do{ *__LONG_IDEUNDOBASE= 0 ; if(!qbevent)break;evnt(29639);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29640);}while(r); } S_33032:; fornext_value3783= 1 ; fornext_finalvalue3783= 4 ; fornext_step3783= 1 ; if (fornext_step3783<0) fornext_step_negative3783=1; else fornext_step_negative3783=0; if (new_error) goto fornext_error3783; goto fornext_entrylabel3783; while(1){ fornext_value3783=fornext_step3783+(*_FUNC_IDE2_LONG_ML); fornext_entrylabel3783: *_FUNC_IDE2_LONG_ML=fornext_value3783; if (fornext_step_negative3783){ if (fornext_value3783fornext_finalvalue3783) break; } fornext_error3783:; if(qbevent){evnt(29643);if(r)goto S_33032;} S_33033:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[array_check((*_FUNC_IDE2_LONG_ML)-__ARRAY_STRING_IDERECENTLINK[8],__ARRAY_STRING_IDERECENTLINK[9])+array_check(( 1 )-__ARRAY_STRING_IDERECENTLINK[4],__ARRAY_STRING_IDERECENTLINK[5])*__ARRAY_STRING_IDERECENTLINK[6]]))->len))||new_error){ if(qbevent){evnt(29644);if(r)goto S_33033;} S_33034:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[array_check((*_FUNC_IDE2_LONG_ML)-__ARRAY_STRING_IDERECENTLINK[8],__ARRAY_STRING_IDERECENTLINK[9])+array_check(( 1 )-__ARRAY_STRING_IDERECENTLINK[4],__ARRAY_STRING_IDERECENTLINK[5])*__ARRAY_STRING_IDERECENTLINK[6]])))))||new_error){ if(qbevent){evnt(29645);if(r)goto S_33034;} do{ qbs_set(__STRING_IDEOPENFILE,((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[array_check((*_FUNC_IDE2_LONG_ML)-__ARRAY_STRING_IDERECENTLINK[8],__ARRAY_STRING_IDERECENTLINK[9])+array_check(( 2 )-__ARRAY_STRING_IDERECENTLINK[4],__ARRAY_STRING_IDERECENTLINK[5])*__ARRAY_STRING_IDERECENTLINK[6]]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29646);}while(r); do{ goto LABEL_DIRECTOPEN; if(!qbevent)break;evnt(29647);}while(r); } } } fornext_exit_3782:; S_33040:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Recent...",10))))||new_error){ if(qbevent){evnt(29653);if(r)goto S_33040;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29654);}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,FUNC_IDERECENTBOX()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29655);}while(r); S_33043:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_F->len))||new_error){ if(qbevent){evnt(29656);if(r)goto S_33043;} do{ qbs_set(__STRING_IDEOPENFILE,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29657);}while(r); do{ goto LABEL_DIRECTOPEN; if(!qbevent)break;evnt(29658);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29660);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29660);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29660);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29660);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29661);}while(r); } S_33053:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Open...",8))))||new_error){ if(qbevent){evnt(29664);if(r)goto S_33053;} do{ qbs_set(__STRING_IDEOPENFILE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29665);}while(r); LABEL_DIRECTOPEN:; if(qbevent){evnt(29666);r=0;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29667);}while(r); S_33056:; if ((*__LONG_IDEUNSAVED)||new_error){ if(qbevent){evnt(29668);if(r)goto S_33056;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29669);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29670);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29670);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29670);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29670);}while(r); S_33062:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29671);if(r)goto S_33062;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29671);}while(r); } S_33065:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(29672);if(r)goto S_33065;} S_33066:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(29673);if(r)goto S_33066;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVEAS(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29674);}while(r); S_33068:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29675);if(r)goto S_33068;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29675);}while(r); } }else{ do{ SUB_IDESAVE(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29677);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29679);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29679);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29679);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29679);}while(r); } } do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEOPEN()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29682);}while(r); S_33081:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(29683);if(r)goto S_33081;} do{ *__LONG_IDEUNSAVED= -1 ; if(!qbevent)break;evnt(29683);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29683);}while(r); do{ *__LONG_IDELAYOUTALLOW= 2 ; if(!qbevent)break;evnt(29683);}while(r); do{ *__LONG_IDEUNDOBASE= 0 ; if(!qbevent)break;evnt(29683);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29684);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29684);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29684);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29684);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29684);}while(r); } S_33093:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Save",5))))||new_error){ if(qbevent){evnt(29687);if(r)goto S_33093;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29688);}while(r); S_33095:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(29689);if(r)goto S_33095;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDESAVEAS(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29690);}while(r); }else{ do{ SUB_IDESAVE(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29692);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29694);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29694);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29694);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29694);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29694);}while(r); } S_33106:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Save #As...",11))))||new_error){ if(qbevent){evnt(29698);if(r)goto S_33106;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(29699);}while(r); S_33108:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(29700);if(r)goto S_33108;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDESAVEAS(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29701);}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDESAVEAS(__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29703);}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(29705);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(29705);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(29705);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(29705);}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(29705);}while(r); } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(29711);}while(r); do{ sub_cls(NULL,NULL,0); if(!qbevent)break;evnt(29712);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("MENU ITEM [",11),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_FUNC_IDE2_LONG_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]]))),qbs_new_txt_len("] NOT IMPLEMENTED!",18))); if (new_error) goto skip3786; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip3786: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29712);}while(r); do{ sub_end(); if(!qbevent)break;evnt(29712);}while(r); } do{ sub__limit( 100 ); if(!qbevent)break;evnt(29716);}while(r); }while(1); dl_exit_3679:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free84.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDE2_LONG_IDE2; } void SUB_IDEBOX(int32*_SUB_IDEBOX_LONG_X,int32*_SUB_IDEBOX_LONG_Y,int32*_SUB_IDEBOX_LONG_W,int32*_SUB_IDEBOX_LONG_H){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data85.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbg_sub_locate(*_SUB_IDEBOX_LONG_Y,*_SUB_IDEBOX_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29725);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("\332",1),func_string(*_SUB_IDEBOX_LONG_W- 2 ,(qbs_new_txt_len("\304",1)->chr[0]))),qbs_new_txt_len("\277",1))); if (new_error) goto skip3787; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3787: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29725);}while(r); S_33128:; fornext_value3789=*_SUB_IDEBOX_LONG_Y+ 1 ; fornext_finalvalue3789=*_SUB_IDEBOX_LONG_Y+*_SUB_IDEBOX_LONG_H- 2 ; fornext_step3789= 1 ; if (fornext_step3789<0) fornext_step_negative3789=1; else fornext_step_negative3789=0; if (new_error) goto fornext_error3789; goto fornext_entrylabel3789; while(1){ fornext_value3789=fornext_step3789+(*_SUB_IDEBOX_LONG_Y2); fornext_entrylabel3789: *_SUB_IDEBOX_LONG_Y2=fornext_value3789; if (fornext_step_negative3789){ if (fornext_value3789fornext_finalvalue3789) break; } fornext_error3789:; if(qbevent){evnt(29726);if(r)goto S_33128;} do{ qbg_sub_locate(*_SUB_IDEBOX_LONG_Y2,*_SUB_IDEBOX_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29727);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("\263",1),func_space(*_SUB_IDEBOX_LONG_W- 2 )),qbs_new_txt_len("\263",1))); if (new_error) goto skip3790; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3790: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29727);}while(r); } fornext_exit_3788:; do{ qbg_sub_locate(*_SUB_IDEBOX_LONG_Y+*_SUB_IDEBOX_LONG_H- 1 ,*_SUB_IDEBOX_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29729);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("\300",1),func_string(*_SUB_IDEBOX_LONG_W- 2 ,(qbs_new_txt_len("\304",1)->chr[0]))),qbs_new_txt_len("\331",1))); if (new_error) goto skip3791; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3791: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29729);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free85.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEBOXSHADOW(int32*_SUB_IDEBOXSHADOW_LONG_X,int32*_SUB_IDEBOXSHADOW_LONG_Y,int32*_SUB_IDEBOXSHADOW_LONG_W,int32*_SUB_IDEBOXSHADOW_LONG_H){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data86.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbg_sub_locate(*_SUB_IDEBOXSHADOW_LONG_Y,*_SUB_IDEBOXSHADOW_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29734);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("\332",1),func_string(*_SUB_IDEBOXSHADOW_LONG_W- 2 ,(qbs_new_txt_len("\304",1)->chr[0]))),qbs_new_txt_len("\277",1))); if (new_error) goto skip3792; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3792: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29734);}while(r); S_33136:; fornext_value3794=*_SUB_IDEBOXSHADOW_LONG_Y+ 1 ; fornext_finalvalue3794=*_SUB_IDEBOXSHADOW_LONG_Y+*_SUB_IDEBOXSHADOW_LONG_H- 2 ; fornext_step3794= 1 ; if (fornext_step3794<0) fornext_step_negative3794=1; else fornext_step_negative3794=0; if (new_error) goto fornext_error3794; goto fornext_entrylabel3794; while(1){ fornext_value3794=fornext_step3794+(*_SUB_IDEBOXSHADOW_LONG_Y2); fornext_entrylabel3794: *_SUB_IDEBOXSHADOW_LONG_Y2=fornext_value3794; if (fornext_step_negative3794){ if (fornext_value3794fornext_finalvalue3794) break; } fornext_error3794:; if(qbevent){evnt(29735);if(r)goto S_33136;} do{ qbg_sub_locate(*_SUB_IDEBOXSHADOW_LONG_Y2,*_SUB_IDEBOXSHADOW_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29736);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("\263",1),func_space(*_SUB_IDEBOXSHADOW_LONG_W- 2 )),qbs_new_txt_len("\263",1))); if (new_error) goto skip3795; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3795: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29736);}while(r); } fornext_exit_3793:; do{ qbg_sub_locate(*_SUB_IDEBOXSHADOW_LONG_Y+*_SUB_IDEBOXSHADOW_LONG_H- 1 ,*_SUB_IDEBOXSHADOW_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29738);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("\300",1),func_string(*_SUB_IDEBOXSHADOW_LONG_W- 2 ,(qbs_new_txt_len("\304",1)->chr[0]))),qbs_new_txt_len("\331",1))); if (new_error) goto skip3796; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3796: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29738);}while(r); do{ qbg_sub_color( 8 , 0 ,NULL,3); if(!qbevent)break;evnt(29740);}while(r); S_33143:; fornext_value3798=*_SUB_IDEBOXSHADOW_LONG_Y+ 1 ; fornext_finalvalue3798=*_SUB_IDEBOXSHADOW_LONG_Y+*_SUB_IDEBOXSHADOW_LONG_H- 1 ; fornext_step3798= 1 ; if (fornext_step3798<0) fornext_step_negative3798=1; else fornext_step_negative3798=0; if (new_error) goto fornext_error3798; goto fornext_entrylabel3798; while(1){ fornext_value3798=fornext_step3798+(*_SUB_IDEBOXSHADOW_LONG_Y2); fornext_entrylabel3798: *_SUB_IDEBOXSHADOW_LONG_Y2=fornext_value3798; if (fornext_step_negative3798){ if (fornext_value3798fornext_finalvalue3798) break; } fornext_error3798:; if(qbevent){evnt(29741);if(r)goto S_33143;} S_33144:; fornext_value3800=*_SUB_IDEBOXSHADOW_LONG_X+*_SUB_IDEBOXSHADOW_LONG_W; fornext_finalvalue3800=*_SUB_IDEBOXSHADOW_LONG_X+*_SUB_IDEBOXSHADOW_LONG_W+ 1 ; fornext_step3800= 1 ; if (fornext_step3800<0) fornext_step_negative3800=1; else fornext_step_negative3800=0; if (new_error) goto fornext_error3800; goto fornext_entrylabel3800; while(1){ fornext_value3800=fornext_step3800+(*_SUB_IDEBOXSHADOW_LONG_X2); fornext_entrylabel3800: *_SUB_IDEBOXSHADOW_LONG_X2=fornext_value3800; if (fornext_step_negative3800){ if (fornext_value3800fornext_finalvalue3800) break; } fornext_error3800:; if(qbevent){evnt(29742);if(r)goto S_33144;} S_33145:; if (((-(*_SUB_IDEBOXSHADOW_LONG_X2<=*__LONG_IDEWX))&(-(*_SUB_IDEBOXSHADOW_LONG_Y2<=*__LONG_IDEWY)))||new_error){ if(qbevent){evnt(29743);if(r)goto S_33145;} do{ qbg_sub_locate(*_SUB_IDEBOXSHADOW_LONG_Y2,*_SUB_IDEBOXSHADOW_LONG_X2,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29744);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(func_screen(*_SUB_IDEBOXSHADOW_LONG_Y2,*_SUB_IDEBOXSHADOW_LONG_X2,NULL,0))); if (new_error) goto skip3801; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3801: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29744);}while(r); } } fornext_exit_3799:; } fornext_exit_3797:; do{ *_SUB_IDEBOXSHADOW_LONG_Y2=*_SUB_IDEBOXSHADOW_LONG_Y+*_SUB_IDEBOXSHADOW_LONG_H; if(!qbevent)break;evnt(29749);}while(r); S_33152:; if ((-(*_SUB_IDEBOXSHADOW_LONG_Y2<=*__LONG_IDEWY))||new_error){ if(qbevent){evnt(29750);if(r)goto S_33152;} S_33153:; fornext_value3803=*_SUB_IDEBOXSHADOW_LONG_X+ 2 ; fornext_finalvalue3803=*_SUB_IDEBOXSHADOW_LONG_X+*_SUB_IDEBOXSHADOW_LONG_W+ 1 ; fornext_step3803= 1 ; if (fornext_step3803<0) fornext_step_negative3803=1; else fornext_step_negative3803=0; if (new_error) goto fornext_error3803; goto fornext_entrylabel3803; while(1){ fornext_value3803=fornext_step3803+(*_SUB_IDEBOXSHADOW_LONG_X2); fornext_entrylabel3803: *_SUB_IDEBOXSHADOW_LONG_X2=fornext_value3803; if (fornext_step_negative3803){ if (fornext_value3803fornext_finalvalue3803) break; } fornext_error3803:; if(qbevent){evnt(29751);if(r)goto S_33153;} S_33154:; if ((-(*_SUB_IDEBOXSHADOW_LONG_X2<=*__LONG_IDEWX))||new_error){ if(qbevent){evnt(29752);if(r)goto S_33154;} do{ qbg_sub_locate(*_SUB_IDEBOXSHADOW_LONG_Y2,*_SUB_IDEBOXSHADOW_LONG_X2,NULL,NULL,NULL,3); if(!qbevent)break;evnt(29753);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(func_screen(*_SUB_IDEBOXSHADOW_LONG_Y2,*_SUB_IDEBOXSHADOW_LONG_X2,NULL,0))); if (new_error) goto skip3804; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3804: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29753);}while(r); } } fornext_exit_3802:; } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free86.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDECHANGE(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data87.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(29765);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(29766);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(29767);}while(r); do{ *_FUNC_IDECHANGE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(29768);}while(r); do{ if(!qbevent)break;evnt(29769);}while(r); do{ if (_FUNC_IDECHANGE_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDECHANGE_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDECHANGE_ARRAY_UDT_O[4]= 1 ; _FUNC_IDECHANGE_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4]+1; _FUNC_IDECHANGE_ARRAY_UDT_O[6]=1; if (_FUNC_IDECHANGE_ARRAY_UDT_O[2]&4){ _FUNC_IDECHANGE_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDECHANGE_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDECHANGE_ARRAY_UDT_O[0]),0,_FUNC_IDECHANGE_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDECHANGE_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDECHANGE_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDECHANGE_ARRAY_UDT_O[0]) error(257); } _FUNC_IDECHANGE_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(29770);}while(r); do{ if(!qbevent)break;evnt(29771);}while(r); do{ if(!qbevent)break;evnt(29772);}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29773);}while(r); S_33169:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(29779);if(r)goto S_33169;} S_33170:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(29780);if(r)goto S_33170;} do{ qbs_set(_FUNC_IDECHANGE_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29781);}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29782);}while(r); do{ *_FUNC_IDECHANGE_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(29783);}while(r); do{ *_FUNC_IDECHANGE_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(29783);}while(r); S_33175:; if ((-(*_FUNC_IDECHANGE_LONG_SX2<*_FUNC_IDECHANGE_LONG_SX1))||new_error){ if(qbevent){evnt(29784);if(r)goto S_33175;} do{ swap_32(&*_FUNC_IDECHANGE_LONG_SX1,&*_FUNC_IDECHANGE_LONG_SX2); if(!qbevent)break;evnt(29784);}while(r); } S_33178:; fornext_value3806=*_FUNC_IDECHANGE_LONG_SX1; fornext_finalvalue3806=*_FUNC_IDECHANGE_LONG_SX2- 1 ; fornext_step3806= 1 ; if (fornext_step3806<0) fornext_step_negative3806=1; else fornext_step_negative3806=0; if (new_error) goto fornext_error3806; goto fornext_entrylabel3806; while(1){ fornext_value3806=fornext_step3806+(*_FUNC_IDECHANGE_LONG_X); fornext_entrylabel3806: *_FUNC_IDECHANGE_LONG_X=fornext_value3806; if (fornext_step_negative3806){ if (fornext_value3806fornext_finalvalue3806) break; } fornext_error3806:; if(qbevent){evnt(29785);if(r)goto S_33178;} S_33179:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDECHANGE_LONG_X<=_FUNC_IDECHANGE_STRING_A->len)))||new_error){ if(qbevent){evnt(29786);if(r)goto S_33179;} do{ qbs_set(_FUNC_IDECHANGE_STRING_A2,qbs_add(_FUNC_IDECHANGE_STRING_A2,func_mid(_FUNC_IDECHANGE_STRING_A,*_FUNC_IDECHANGE_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29786);}while(r); }else{ do{ qbs_set(_FUNC_IDECHANGE_STRING_A2,qbs_add(_FUNC_IDECHANGE_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29786);}while(r); } } fornext_exit_3805:; } } S_33187:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDECHANGE_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(29790);if(r)goto S_33187;} do{ qbs_set(_FUNC_IDECHANGE_STRING_A2,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29791);}while(r); } do{ *_FUNC_IDECHANGE_LONG_I= 0 ; if(!qbevent)break;evnt(29794);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDECHANGE_UDT_P)) + (0) ),&(pass3808= 60 ),&(pass3809= 12 ),qbs_new_txt_len("Change",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29795);}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(29796);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(29797);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(29798);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Find What",10)); if(!qbevent)break;evnt(29799);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDECHANGE_STRING_A2); if(!qbevent)break;evnt(29800);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDECHANGE_STRING_A2->len; if(!qbevent)break;evnt(29801);}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(29803);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(29804);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(29805);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Change #To",10)); if(!qbevent)break;evnt(29806);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(__STRING_IDECHANGETO); if(!qbevent)break;evnt(29807);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+72))=__STRING_IDECHANGETO->len; if(!qbevent)break;evnt(29808);}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(29810);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(29811);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+24))= 8 ; if(!qbevent)break;evnt(29812);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Match Upper/Lowercase",22)); if(!qbevent)break;evnt(29813);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64))=*__INTEGER_IDEFINDCASESENS; if(!qbevent)break;evnt(29814);}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(29815);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(29816);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+24))= 9 ; if(!qbevent)break;evnt(29817);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Whole Word",11)); if(!qbevent)break;evnt(29818);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64))=*__INTEGER_IDEFINDWHOLEWORD; if(!qbevent)break;evnt(29819);}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(29820);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(29821);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+24))= 10 ; if(!qbevent)break;evnt(29822);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Search Backwards",17)); if(!qbevent)break;evnt(29823);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64))=*__INTEGER_IDEFINDBACKWARDS; if(!qbevent)break;evnt(29824);}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(29826);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(29827);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+24))= 11 ; if(!qbevent)break;evnt(29828);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Find and #Verify",16),_FUNC_IDECHANGE_STRING1_SEP),qbs_new_txt_len("#Change All",11)),_FUNC_IDECHANGE_STRING1_SEP),qbs_new_txt_len("Cancel",6))); if(!qbevent)break;evnt(29829);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(29830);}while(r); S_33224:; fornext_value3813= 1 ; fornext_finalvalue3813= 100 ; fornext_step3813= 1 ; if (fornext_step3813<0) fornext_step_negative3813=1; else fornext_step_negative3813=0; if (new_error) goto fornext_error3813; goto fornext_entrylabel3813; while(1){ fornext_value3813=fornext_step3813+(*_FUNC_IDECHANGE_LONG_I); fornext_entrylabel3813: *_FUNC_IDECHANGE_LONG_I=fornext_value3813; if (fornext_step_negative3813){ if (fornext_value3813fornext_finalvalue3813) break; } fornext_error3813:; if(qbevent){evnt(29834);if(r)goto S_33224;} do{ memcpy((((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDECHANGE_UDT_P)+(0)),20); if(!qbevent)break;evnt(29834);}while(r); } fornext_exit_3812:; S_33227:; do{ if(qbevent){evnt(29837);if(r)goto S_33227;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECHANGE_UDT_P)) + (0) )); if(!qbevent)break;evnt(29841);}while(r); do{ *_FUNC_IDECHANGE_LONG_F= 1 ; if(!qbevent)break;evnt(29842);}while(r); do{ *_FUNC_IDECHANGE_LONG_CX= 0 ; if(!qbevent)break;evnt(29842);}while(r); do{ *_FUNC_IDECHANGE_LONG_CY= 0 ; if(!qbevent)break;evnt(29842);}while(r); S_33232:; fornext_value3816= 1 ; fornext_finalvalue3816= 100 ; fornext_step3816= 1 ; if (fornext_step3816<0) fornext_step_negative3816=1; else fornext_step_negative3816=0; if (new_error) goto fornext_error3816; goto fornext_entrylabel3816; while(1){ fornext_value3816=fornext_step3816+(*_FUNC_IDECHANGE_LONG_I); fornext_entrylabel3816: *_FUNC_IDECHANGE_LONG_I=fornext_value3816; if (fornext_step_negative3816){ if (fornext_value3816fornext_finalvalue3816) break; } fornext_error3816:; if(qbevent){evnt(29843);if(r)goto S_33232;} S_33233:; if ((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(29845);if(r)goto S_33233;} do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDECHANGE_LONG_FOCUS-*_FUNC_IDECHANGE_LONG_F; if(!qbevent)break;evnt(29848);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(29850);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(29850);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDECHANGE_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80) ),_FUNC_IDECHANGE_LONG_F); if(!qbevent)break;evnt(29852);}while(r); S_33238:; if ((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(29854);if(r)goto S_33238;} do{ *_FUNC_IDECHANGE_LONG_CX=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(29854);}while(r); do{ *_FUNC_IDECHANGE_LONG_CY=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(29854);}while(r); } } } fornext_exit_3815:; do{ *_FUNC_IDECHANGE_LONG_LASTFOCUS=*_FUNC_IDECHANGE_LONG_F- 1 ; if(!qbevent)break;evnt(29858);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(29865);}while(r); S_33246:; if ((*_FUNC_IDECHANGE_LONG_CX)||new_error){ if(qbevent){evnt(29866);if(r)goto S_33246;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(29866);}while(r); do{ qbg_sub_locate(*_FUNC_IDECHANGE_LONG_CY,*_FUNC_IDECHANGE_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(29866);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(29866);}while(r); } do{ *_FUNC_IDECHANGE_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(29869);}while(r); S_33252:; do{ if(qbevent){evnt(29870);if(r)goto S_33252;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(29871);}while(r); S_33254:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(29872);if(r)goto S_33254;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(29872);}while(r); } S_33257:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(29873);if(r)goto S_33257;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(29873);}while(r); } S_33260:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(29874);if(r)goto S_33260;} do{ *_FUNC_IDECHANGE_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(29874);}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(29874);}while(r); } S_33264:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(29875);if(r)goto S_33264;} do{ *_FUNC_IDECHANGE_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(29875);}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(29875);}while(r); } S_33268:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(29876);if(r)goto S_33268;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(29876);}while(r); } do{ *_FUNC_IDECHANGE_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(29877);}while(r); S_33272:; if ((-(*_FUNC_IDECHANGE_LONG_ALT!=*_FUNC_IDECHANGE_LONG_OLDALT))||new_error){ if(qbevent){evnt(29877);if(r)goto S_33272;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(29877);}while(r); } do{ *_FUNC_IDECHANGE_LONG_OLDALT=*_FUNC_IDECHANGE_LONG_ALT; if(!qbevent)break;evnt(29878);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(29879);}while(r); S_33277:; }while((!(*_FUNC_IDECHANGE_LONG_CHANGE))&&(!new_error)); dl_exit_3817:; if(qbevent){evnt(29880);if(r)goto S_33277;} S_33278:; if ((*_FUNC_IDECHANGE_LONG_ALT)||new_error){ if(qbevent){evnt(29881);if(r)goto S_33278;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(29881);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(29881);}while(r); } do{ qbs_set(_FUNC_IDECHANGE_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29883);}while(r); S_33284:; if ((*_FUNC_IDECHANGE_LONG_ALT)||new_error){ if(qbevent){evnt(29884);if(r)goto S_33284;} S_33285:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(29885);if(r)goto S_33285;} do{ *_FUNC_IDECHANGE_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29886);}while(r); S_33287:; if (((-(*_FUNC_IDECHANGE_LONG_K>= 65 ))&(-(*_FUNC_IDECHANGE_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(29887);if(r)goto S_33287;} do{ qbs_set(_FUNC_IDECHANGE_STRING_ALTLETTER,func_chr(*_FUNC_IDECHANGE_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29887);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(29890);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(29890);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(29890);}while(r); do{ *_FUNC_IDECHANGE_LONG_INFO= 0 ; if(!qbevent)break;evnt(29894);}while(r); S_33296:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(29895);if(r)goto S_33296;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29895);}while(r); } S_33299:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(29896);if(r)goto S_33299;} do{ *_FUNC_IDECHANGE_LONG_FOCUS=*_FUNC_IDECHANGE_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(29896);}while(r); } S_33302:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(29897);if(r)goto S_33302;} do{ *_FUNC_IDECHANGE_LONG_FOCUS=*_FUNC_IDECHANGE_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(29897);}while(r); } S_33305:; if ((-(*_FUNC_IDECHANGE_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(29898);if(r)goto S_33305;} do{ *_FUNC_IDECHANGE_LONG_FOCUS=*_FUNC_IDECHANGE_LONG_LASTFOCUS; if(!qbevent)break;evnt(29898);}while(r); } S_33308:; if ((-(*_FUNC_IDECHANGE_LONG_FOCUS>*_FUNC_IDECHANGE_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(29899);if(r)goto S_33308;} do{ *_FUNC_IDECHANGE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(29899);}while(r); } do{ *_FUNC_IDECHANGE_LONG_F= 1 ; if(!qbevent)break;evnt(29900);}while(r); S_33312:; fornext_value3820= 1 ; fornext_finalvalue3820= 100 ; fornext_step3820= 1 ; if (fornext_step3820<0) fornext_step_negative3820=1; else fornext_step_negative3820=0; if (new_error) goto fornext_error3820; goto fornext_entrylabel3820; while(1){ fornext_value3820=fornext_step3820+(*_FUNC_IDECHANGE_LONG_I); fornext_entrylabel3820: *_FUNC_IDECHANGE_LONG_I=fornext_value3820; if (fornext_step_negative3820){ if (fornext_value3820fornext_finalvalue3820) break; } fornext_error3820:; if(qbevent){evnt(29901);if(r)goto S_33312;} do{ *_FUNC_IDECHANGE_LONG_T=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(29902);}while(r); S_33314:; if ((*_FUNC_IDECHANGE_LONG_T)||new_error){ if(qbevent){evnt(29903);if(r)goto S_33314;} do{ *_FUNC_IDECHANGE_LONG_FOCUSOFFSET=*_FUNC_IDECHANGE_LONG_FOCUS-*_FUNC_IDECHANGE_LONG_F; if(!qbevent)break;evnt(29904);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDECHANGE_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECHANGE_LONG_I)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80) ),_FUNC_IDECHANGE_LONG_FOCUS,_FUNC_IDECHANGE_LONG_F,_FUNC_IDECHANGE_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDECHANGE_STRING_ALTLETTER,__LONG_MB,_FUNC_IDECHANGE_LONG_MOUSEDOWN,_FUNC_IDECHANGE_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDECHANGE_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29905);}while(r); } } fornext_exit_3819:; S_33319:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDECHANGE_LONG_FOCUS== 8 ))&(-(*_FUNC_IDECHANGE_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(29912);if(r)goto S_33319;} do{ qbs_set(_FUNC_IDECHANGE_STRING_IDECHANGE,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29913);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(29914);}while(r); } S_33323:; if (((-(*_FUNC_IDECHANGE_LONG_FOCUS== 7 ))&(-(*_FUNC_IDECHANGE_LONG_INFO!= 0 )))||new_error){ if(qbevent){evnt(29920);if(r)goto S_33323;} do{ *__INTEGER_IDEFINDCASESENS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(29921);}while(r); do{ *__INTEGER_IDEFINDWHOLEWORD=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(29922);}while(r); do{ *__INTEGER_IDEFINDBACKWARDS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(29923);}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_S,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29925);}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDECHANGE_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29926);}while(r); do{ qbs_set(__STRING_IDECHANGETO,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29927);}while(r); do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29928);}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGED= 0 ; if(!qbevent)break;evnt(29930);}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_S,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29932);}while(r); S_33333:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(29933);if(r)goto S_33333;} do{ qbs_set(_FUNC_IDECHANGE_STRING_S,qbs_ucase(_FUNC_IDECHANGE_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29933);}while(r); } S_33336:; fornext_value3822= 1 ; fornext_finalvalue3822=*__LONG_IDEN; fornext_step3822= 1 ; if (fornext_step3822<0) fornext_step_negative3822=1; else fornext_step_negative3822=0; if (new_error) goto fornext_error3822; goto fornext_entrylabel3822; while(1){ fornext_value3822=fornext_step3822+(*_FUNC_IDECHANGE_LONG_Y); fornext_entrylabel3822: *_FUNC_IDECHANGE_LONG_Y=fornext_value3822; if (fornext_step_negative3822){ if (fornext_value3822fornext_finalvalue3822) break; } fornext_error3822:; if(qbevent){evnt(29935);if(r)goto S_33336;} do{ qbs_set(_FUNC_IDECHANGE_STRING_L,FUNC_IDEGETLINE(_FUNC_IDECHANGE_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29936);}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_L2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29937);}while(r); do{ *_FUNC_IDECHANGE_LONG_X1= 1 ; if(!qbevent)break;evnt(29939);}while(r); LABEL_IDECHANGEALL:; if(qbevent){evnt(29940);r=0;} S_33340:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(29941);if(r)goto S_33340;} do{ qbs_set(_FUNC_IDECHANGE_STRING_L3,qbs_ucase(_FUNC_IDECHANGE_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29941);}while(r); }else{ do{ qbs_set(_FUNC_IDECHANGE_STRING_L3,_FUNC_IDECHANGE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29941);}while(r); } do{ *_FUNC_IDECHANGE_LONG_X=func_instr(*_FUNC_IDECHANGE_LONG_X1,_FUNC_IDECHANGE_STRING_L3,_FUNC_IDECHANGE_STRING_S,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29942);}while(r); S_33346:; if ((*_FUNC_IDECHANGE_LONG_X)||new_error){ if(qbevent){evnt(29944);if(r)goto S_33346;} S_33347:; if ((*__INTEGER_IDEFINDWHOLEWORD)||new_error){ if(qbevent){evnt(29945);if(r)goto S_33347;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 1 ; if(!qbevent)break;evnt(29946);}while(r); S_33349:; if ((-(*_FUNC_IDECHANGE_LONG_X> 1 ))||new_error){ if(qbevent){evnt(29947);if(r)goto S_33349;} do{ *_FUNC_IDECHANGE_LONG_C=qbs_asc(qbs_ucase(func_mid(_FUNC_IDECHANGE_STRING_L,*_FUNC_IDECHANGE_LONG_X- 1 , 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29948);}while(r); S_33351:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 65 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(29949);if(r)goto S_33351;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29949);}while(r); } S_33354:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 48 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(29950);if(r)goto S_33354;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29950);}while(r); } } S_33358:; if ((qbs_cleanup(qbs_tmp_base,-((*_FUNC_IDECHANGE_LONG_X+_FUNC_IDECHANGE_STRING_S->len)<=(_FUNC_IDECHANGE_STRING_L->len))))||new_error){ if(qbevent){evnt(29952);if(r)goto S_33358;} do{ *_FUNC_IDECHANGE_LONG_C=qbs_asc(qbs_ucase(func_mid(_FUNC_IDECHANGE_STRING_L,*_FUNC_IDECHANGE_LONG_X+_FUNC_IDECHANGE_STRING_S->len, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29953);}while(r); S_33360:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 65 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(29954);if(r)goto S_33360;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29954);}while(r); } S_33363:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 48 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(29955);if(r)goto S_33363;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(29955);}while(r); } } S_33367:; if ((-(*_FUNC_IDECHANGE_LONG_WHOLE== 0 ))||new_error){ if(qbevent){evnt(29957);if(r)goto S_33367;} S_33368:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDECHANGE_LONG_X1<=_FUNC_IDECHANGE_STRING_L->len)))||new_error){ if(qbevent){evnt(29958);if(r)goto S_33368;} do{ qbs_set(_FUNC_IDECHANGE_STRING_L2,qbs_add(_FUNC_IDECHANGE_STRING_L2,func_mid(_FUNC_IDECHANGE_STRING_L,*_FUNC_IDECHANGE_LONG_X1,*_FUNC_IDECHANGE_LONG_X-*_FUNC_IDECHANGE_LONG_X1+ 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29959);}while(r); do{ *_FUNC_IDECHANGE_LONG_X1=*_FUNC_IDECHANGE_LONG_X+ 1 ; if(!qbevent)break;evnt(29960);}while(r); do{ goto LABEL_IDECHANGEALL; if(!qbevent)break;evnt(29961);}while(r); } do{ *_FUNC_IDECHANGE_LONG_X= 0 ; if(!qbevent)break;evnt(29963);}while(r); } } } S_33377:; if ((*_FUNC_IDECHANGE_LONG_X)||new_error){ if(qbevent){evnt(29968);if(r)goto S_33377;} do{ qbs_set(_FUNC_IDECHANGE_STRING_L2,qbs_add(qbs_add(_FUNC_IDECHANGE_STRING_L2,func_mid(_FUNC_IDECHANGE_STRING_L,*_FUNC_IDECHANGE_LONG_X1,*_FUNC_IDECHANGE_LONG_X-*_FUNC_IDECHANGE_LONG_X1,1)),__STRING_IDECHANGETO)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29969);}while(r); do{ *_FUNC_IDECHANGE_LONG_X1=*_FUNC_IDECHANGE_LONG_X+_FUNC_IDECHANGE_STRING_S->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29970);}while(r); S_33380:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDECHANGE_LONG_X1<=_FUNC_IDECHANGE_STRING_L->len)))||new_error){ if(qbevent){evnt(29971);if(r)goto S_33380;} do{ goto LABEL_IDECHANGEALL; if(!qbevent)break;evnt(29971);}while(r); } } do{ qbs_set(_FUNC_IDECHANGE_STRING_L2,qbs_add(_FUNC_IDECHANGE_STRING_L2,func_mid(_FUNC_IDECHANGE_STRING_L,*_FUNC_IDECHANGE_LONG_X1,_FUNC_IDECHANGE_STRING_L->len-*_FUNC_IDECHANGE_LONG_X1+ 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29974);}while(r); S_33385:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDECHANGE_STRING_L2,_FUNC_IDECHANGE_STRING_L)))||new_error){ if(qbevent){evnt(29976);if(r)goto S_33385;} do{ SUB_IDESETLINE(_FUNC_IDECHANGE_LONG_Y,_FUNC_IDECHANGE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29976);}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGED= 1 ; if(!qbevent)break;evnt(29976);}while(r); } } fornext_exit_3821:; S_33390:; if ((-(*_FUNC_IDECHANGE_LONG_CHANGED== 0 ))||new_error){ if(qbevent){evnt(29980);if(r)goto S_33390;} do{ SUB_IDENOMATCH(); if(!qbevent)break;evnt(29980);}while(r); }else{ do{ SUB_IDECHANGED(); if(!qbevent)break;evnt(29980);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(29980);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(29981);}while(r); } S_33398:; if ((qbs_cleanup(qbs_tmp_base,(((-(*_FUNC_IDECHANGE_LONG_FOCUS== 6 ))&(-(*_FUNC_IDECHANGE_LONG_INFO!= 0 ))))|(qbs_equal(__STRING_K,func_chr( 13 )))))||new_error){ if(qbevent){evnt(29986);if(r)goto S_33398;} do{ *__INTEGER_IDEFINDCASESENS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(29987);}while(r); do{ *__INTEGER_IDEFINDWHOLEWORD=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(29988);}while(r); do{ *__INTEGER_IDEFINDBACKWARDS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(29989);}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29990);}while(r); do{ qbs_set(__STRING_IDECHANGETO,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29991);}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_IDECHANGE,qbs_new_txt_len("V",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(29992);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(29993);}while(r); } do{ *_FUNC_IDECHANGE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(30001);}while(r); do{ *_FUNC_IDECHANGE_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(30002);}while(r); }while(1); dl_exit_3814:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free87.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDECHANGE_STRING_IDECHANGE);return _FUNC_IDECHANGE_STRING_IDECHANGE; } void SUB_IDECHANGED(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data88.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(30011);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(30012);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(30013);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30014);}while(r); do{ *_SUB_IDECHANGED_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30015);}while(r); do{ if(!qbevent)break;evnt(30016);}while(r); do{ if (_SUB_IDECHANGED_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_SUB_IDECHANGED_ARRAY_UDT_O[2]&1){ error(10); }else{ _SUB_IDECHANGED_ARRAY_UDT_O[4]= 1 ; _SUB_IDECHANGED_ARRAY_UDT_O[5]=( 100 )-_SUB_IDECHANGED_ARRAY_UDT_O[4]+1; _SUB_IDECHANGED_ARRAY_UDT_O[6]=1; if (_SUB_IDECHANGED_ARRAY_UDT_O[2]&4){ _SUB_IDECHANGED_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_SUB_IDECHANGED_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_SUB_IDECHANGED_ARRAY_UDT_O[0]),0,_SUB_IDECHANGED_ARRAY_UDT_O[5]*640/8+1); }else{ _SUB_IDECHANGED_ARRAY_UDT_O[0]=(ptrszint)calloc(_SUB_IDECHANGED_ARRAY_UDT_O[5]*640/8+1,1); if (!_SUB_IDECHANGED_ARRAY_UDT_O[0]) error(257); } _SUB_IDECHANGED_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(30017);}while(r); do{ if(!qbevent)break;evnt(30018);}while(r); do{ if(!qbevent)break;evnt(30019);}while(r); do{ qbs_set(_SUB_IDECHANGED_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30020);}while(r); do{ *_SUB_IDECHANGED_LONG_I= 0 ; if(!qbevent)break;evnt(30024);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_SUB_IDECHANGED_UDT_P)) + (0) ),&(pass3830= 19 ),&(pass3831= 4 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30025);}while(r); do{ *_SUB_IDECHANGED_LONG_I=*_SUB_IDECHANGED_LONG_I+ 1 ; if(!qbevent)break;evnt(30026);}while(r); do{ *(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(30027);}while(r); do{ *(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(30028);}while(r); do{ *(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_new_txt_len("OK",2)); if(!qbevent)break;evnt(30029);}while(r); do{ *(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(30030);}while(r); S_33427:; fornext_value3833= 1 ; fornext_finalvalue3833= 100 ; fornext_step3833= 1 ; if (fornext_step3833<0) fornext_step_negative3833=1; else fornext_step_negative3833=0; if (new_error) goto fornext_error3833; goto fornext_entrylabel3833; while(1){ fornext_value3833=fornext_step3833+(*_SUB_IDECHANGED_LONG_I); fornext_entrylabel3833: *_SUB_IDECHANGED_LONG_I=fornext_value3833; if (fornext_step_negative3833){ if (fornext_value3833fornext_finalvalue3833) break; } fornext_error3833:; if(qbevent){evnt(30034);if(r)goto S_33427;} do{ memcpy((((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80)),(((char*)_SUB_IDECHANGED_UDT_P)+(0)),20); if(!qbevent)break;evnt(30034);}while(r); } fornext_exit_3832:; S_33430:; do{ if(qbevent){evnt(30037);if(r)goto S_33430;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_SUB_IDECHANGED_UDT_P)) + (0) )); if(!qbevent)break;evnt(30040);}while(r); do{ *_SUB_IDECHANGED_LONG_F= 1 ; if(!qbevent)break;evnt(30041);}while(r); do{ *_SUB_IDECHANGED_LONG_CX= 0 ; if(!qbevent)break;evnt(30041);}while(r); do{ *_SUB_IDECHANGED_LONG_CY= 0 ; if(!qbevent)break;evnt(30041);}while(r); S_33435:; fornext_value3836= 1 ; fornext_finalvalue3836= 100 ; fornext_step3836= 1 ; if (fornext_step3836<0) fornext_step_negative3836=1; else fornext_step_negative3836=0; if (new_error) goto fornext_error3836; goto fornext_entrylabel3836; while(1){ fornext_value3836=fornext_step3836+(*_SUB_IDECHANGED_LONG_I); fornext_entrylabel3836: *_SUB_IDECHANGED_LONG_I=fornext_value3836; if (fornext_step_negative3836){ if (fornext_value3836fornext_finalvalue3836) break; } fornext_error3836:; if(qbevent){evnt(30042);if(r)goto S_33435;} S_33436:; if ((*(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(30043);if(r)goto S_33436;} do{ *(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+60))=*_SUB_IDECHANGED_LONG_FOCUS-*_SUB_IDECHANGED_LONG_F; if(!qbevent)break;evnt(30045);}while(r); do{ *(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(30046);}while(r); do{ *(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(30046);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_SUB_IDECHANGED_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80) ),_SUB_IDECHANGED_LONG_F); if(!qbevent)break;evnt(30047);}while(r); S_33441:; if ((*(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(30048);if(r)goto S_33441;} do{ *_SUB_IDECHANGED_LONG_CX=*(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(30048);}while(r); do{ *_SUB_IDECHANGED_LONG_CY=*(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(30048);}while(r); } } } fornext_exit_3835:; do{ *_SUB_IDECHANGED_LONG_LASTFOCUS=*_SUB_IDECHANGED_LONG_F- 1 ; if(!qbevent)break;evnt(30051);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30055);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_SUB_IDECHANGED_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_SUB_IDECHANGED_UDT_P)+(0))+ 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(30055);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Change Complete",15)); if (new_error) goto skip3837; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3837: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30055);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(30059);}while(r); S_33452:; if ((*_SUB_IDECHANGED_LONG_CX)||new_error){ if(qbevent){evnt(30060);if(r)goto S_33452;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30060);}while(r); do{ qbg_sub_locate(*_SUB_IDECHANGED_LONG_CY,*_SUB_IDECHANGED_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(30060);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30060);}while(r); } do{ *_SUB_IDECHANGED_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(30063);}while(r); S_33458:; do{ if(qbevent){evnt(30064);if(r)goto S_33458;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(30065);}while(r); S_33460:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(30066);if(r)goto S_33460;} do{ *_SUB_IDECHANGED_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30066);}while(r); } S_33463:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(30067);if(r)goto S_33463;} do{ *_SUB_IDECHANGED_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30067);}while(r); } S_33466:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(30068);if(r)goto S_33466;} do{ *_SUB_IDECHANGED_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(30068);}while(r); do{ *_SUB_IDECHANGED_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30068);}while(r); } S_33470:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(30069);if(r)goto S_33470;} do{ *_SUB_IDECHANGED_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(30069);}while(r); do{ *_SUB_IDECHANGED_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30069);}while(r); } S_33474:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(30070);if(r)goto S_33474;} do{ *_SUB_IDECHANGED_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30070);}while(r); } do{ *_SUB_IDECHANGED_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(30071);}while(r); S_33478:; if ((-(*_SUB_IDECHANGED_LONG_ALT!=*_SUB_IDECHANGED_LONG_OLDALT))||new_error){ if(qbevent){evnt(30071);if(r)goto S_33478;} do{ *_SUB_IDECHANGED_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30071);}while(r); } do{ *_SUB_IDECHANGED_LONG_OLDALT=*_SUB_IDECHANGED_LONG_ALT; if(!qbevent)break;evnt(30072);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(30073);}while(r); S_33483:; }while((!(*_SUB_IDECHANGED_LONG_CHANGE))&&(!new_error)); dl_exit_3838:; if(qbevent){evnt(30074);if(r)goto S_33483;} S_33484:; if ((*_SUB_IDECHANGED_LONG_ALT)||new_error){ if(qbevent){evnt(30075);if(r)goto S_33484;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(30075);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(30075);}while(r); } do{ qbs_set(_SUB_IDECHANGED_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30077);}while(r); S_33490:; if ((*_SUB_IDECHANGED_LONG_ALT)||new_error){ if(qbevent){evnt(30078);if(r)goto S_33490;} S_33491:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(30079);if(r)goto S_33491;} do{ *_SUB_IDECHANGED_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30080);}while(r); S_33493:; if (((-(*_SUB_IDECHANGED_LONG_K>= 65 ))&(-(*_SUB_IDECHANGED_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(30081);if(r)goto S_33493;} do{ qbs_set(_SUB_IDECHANGED_STRING_ALTLETTER,func_chr(*_SUB_IDECHANGED_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30081);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30084);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(30084);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30084);}while(r); S_33501:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(30087);if(r)goto S_33501;} do{ qbs_set(_SUB_IDECHANGED_STRING_ALTLETTER,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30087);}while(r); } S_33504:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(30088);if(r)goto S_33504;} do{ qbs_set(_SUB_IDECHANGED_STRING_ALTLETTER,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30088);}while(r); } do{ *_SUB_IDECHANGED_LONG_INFO= 0 ; if(!qbevent)break;evnt(30091);}while(r); S_33508:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(30092);if(r)goto S_33508;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30092);}while(r); } S_33511:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30093);if(r)goto S_33511;} do{ *_SUB_IDECHANGED_LONG_FOCUS=*_SUB_IDECHANGED_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(30093);}while(r); } S_33514:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30094);if(r)goto S_33514;} do{ *_SUB_IDECHANGED_LONG_FOCUS=*_SUB_IDECHANGED_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(30094);}while(r); } S_33517:; if ((-(*_SUB_IDECHANGED_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(30095);if(r)goto S_33517;} do{ *_SUB_IDECHANGED_LONG_FOCUS=*_SUB_IDECHANGED_LONG_LASTFOCUS; if(!qbevent)break;evnt(30095);}while(r); } S_33520:; if ((-(*_SUB_IDECHANGED_LONG_FOCUS>*_SUB_IDECHANGED_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(30096);if(r)goto S_33520;} do{ *_SUB_IDECHANGED_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30096);}while(r); } do{ *_SUB_IDECHANGED_LONG_F= 1 ; if(!qbevent)break;evnt(30097);}while(r); S_33524:; fornext_value3841= 1 ; fornext_finalvalue3841= 100 ; fornext_step3841= 1 ; if (fornext_step3841<0) fornext_step_negative3841=1; else fornext_step_negative3841=0; if (new_error) goto fornext_error3841; goto fornext_entrylabel3841; while(1){ fornext_value3841=fornext_step3841+(*_SUB_IDECHANGED_LONG_I); fornext_entrylabel3841: *_SUB_IDECHANGED_LONG_I=fornext_value3841; if (fornext_step_negative3841){ if (fornext_value3841fornext_finalvalue3841) break; } fornext_error3841:; if(qbevent){evnt(30098);if(r)goto S_33524;} do{ *_SUB_IDECHANGED_LONG_T=*(int32*)(((char*)_SUB_IDECHANGED_ARRAY_UDT_O[0])+((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(30099);}while(r); S_33526:; if ((*_SUB_IDECHANGED_LONG_T)||new_error){ if(qbevent){evnt(30100);if(r)goto S_33526;} do{ *_SUB_IDECHANGED_LONG_FOCUSOFFSET=*_SUB_IDECHANGED_LONG_FOCUS-*_SUB_IDECHANGED_LONG_F; if(!qbevent)break;evnt(30101);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_SUB_IDECHANGED_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDECHANGED_LONG_I)-_SUB_IDECHANGED_ARRAY_UDT_O[4],_SUB_IDECHANGED_ARRAY_UDT_O[5]))*80) ),_SUB_IDECHANGED_LONG_FOCUS,_SUB_IDECHANGED_LONG_F,_SUB_IDECHANGED_LONG_FOCUSOFFSET,__STRING_K,_SUB_IDECHANGED_STRING_ALTLETTER,__LONG_MB,_SUB_IDECHANGED_LONG_MOUSEDOWN,_SUB_IDECHANGED_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_SUB_IDECHANGED_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30102);}while(r); } } fornext_exit_3840:; S_33531:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(30107);if(r)goto S_33531;} do{ goto exit_subfunc; if(!qbevent)break;evnt(30108);}while(r); } S_33534:; if ((*_SUB_IDECHANGED_LONG_INFO)||new_error){ if(qbevent){evnt(30111);if(r)goto S_33534;} do{ goto exit_subfunc; if(!qbevent)break;evnt(30112);}while(r); } do{ *_SUB_IDECHANGED_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(30117);}while(r); do{ *_SUB_IDECHANGED_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(30118);}while(r); }while(1); dl_exit_3834:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free88.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDECHANGEIT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data89.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(30126);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(30127);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(30128);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30129);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30130);}while(r); do{ if(!qbevent)break;evnt(30131);}while(r); do{ if (_FUNC_IDECHANGEIT_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDECHANGEIT_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDECHANGEIT_ARRAY_UDT_O[4]= 1 ; _FUNC_IDECHANGEIT_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4]+1; _FUNC_IDECHANGEIT_ARRAY_UDT_O[6]=1; if (_FUNC_IDECHANGEIT_ARRAY_UDT_O[2]&4){ _FUNC_IDECHANGEIT_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDECHANGEIT_ARRAY_UDT_O[0]),0,_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDECHANGEIT_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDECHANGEIT_ARRAY_UDT_O[0]) error(257); } _FUNC_IDECHANGEIT_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(30132);}while(r); do{ if(!qbevent)break;evnt(30133);}while(r); do{ if(!qbevent)break;evnt(30134);}while(r); do{ qbs_set(_FUNC_IDECHANGEIT_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30135);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_I= 0 ; if(!qbevent)break;evnt(30139);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_W= 45 ; if(!qbevent)break;evnt(30140);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(0))=( 40 )-(*_FUNC_IDECHANGEIT_LONG_W/ 2 ); if(!qbevent)break;evnt(30141);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(4))= 21 ; if(!qbevent)break;evnt(30142);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(8))=*_FUNC_IDECHANGEIT_LONG_W; if(!qbevent)break;evnt(30143);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(12))= 2 ; if(!qbevent)break;evnt(30144);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(16))=FUNC_IDENEWTXT(qbs_new_txt_len("Change",6)); if(!qbevent)break;evnt(30145);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_I=*_FUNC_IDECHANGEIT_LONG_I+ 1 ; if(!qbevent)break;evnt(30147);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(30148);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(30149);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Change",7),_FUNC_IDECHANGEIT_STRING1_SEP),qbs_new_txt_len("#Skip",5)),_FUNC_IDECHANGEIT_STRING1_SEP),qbs_new_txt_len("Cancel",6))); if(!qbevent)break;evnt(30150);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(30151);}while(r); S_33562:; fornext_value3843= 1 ; fornext_finalvalue3843= 100 ; fornext_step3843= 1 ; if (fornext_step3843<0) fornext_step_negative3843=1; else fornext_step_negative3843=0; if (new_error) goto fornext_error3843; goto fornext_entrylabel3843; while(1){ fornext_value3843=fornext_step3843+(*_FUNC_IDECHANGEIT_LONG_I); fornext_entrylabel3843: *_FUNC_IDECHANGEIT_LONG_I=fornext_value3843; if (fornext_step_negative3843){ if (fornext_value3843fornext_finalvalue3843) break; } fornext_error3843:; if(qbevent){evnt(30155);if(r)goto S_33562;} do{ memcpy((((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDECHANGEIT_UDT_P)+(0)),20); if(!qbevent)break;evnt(30155);}while(r); } fornext_exit_3842:; S_33565:; do{ if(qbevent){evnt(30158);if(r)goto S_33565;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECHANGEIT_UDT_P)) + (0) )); if(!qbevent)break;evnt(30161);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_F= 1 ; if(!qbevent)break;evnt(30162);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CX= 0 ; if(!qbevent)break;evnt(30162);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CY= 0 ; if(!qbevent)break;evnt(30162);}while(r); S_33570:; fornext_value3846= 1 ; fornext_finalvalue3846= 100 ; fornext_step3846= 1 ; if (fornext_step3846<0) fornext_step_negative3846=1; else fornext_step_negative3846=0; if (new_error) goto fornext_error3846; goto fornext_entrylabel3846; while(1){ fornext_value3846=fornext_step3846+(*_FUNC_IDECHANGEIT_LONG_I); fornext_entrylabel3846: *_FUNC_IDECHANGEIT_LONG_I=fornext_value3846; if (fornext_step_negative3846){ if (fornext_value3846fornext_finalvalue3846) break; } fornext_error3846:; if(qbevent){evnt(30163);if(r)goto S_33570;} S_33571:; if ((*(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(30164);if(r)goto S_33571;} do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDECHANGEIT_LONG_FOCUS-*_FUNC_IDECHANGEIT_LONG_F; if(!qbevent)break;evnt(30166);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(30167);}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(30167);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80) ),_FUNC_IDECHANGEIT_LONG_F); if(!qbevent)break;evnt(30168);}while(r); S_33576:; if ((*(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(30169);if(r)goto S_33576;} do{ *_FUNC_IDECHANGEIT_LONG_CX=*(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(30169);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CY=*(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(30169);}while(r); } } } fornext_exit_3845:; do{ *_FUNC_IDECHANGEIT_LONG_LASTFOCUS=*_FUNC_IDECHANGEIT_LONG_F- 1 ; if(!qbevent)break;evnt(30172);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(30179);}while(r); S_33584:; if ((*_FUNC_IDECHANGEIT_LONG_CX)||new_error){ if(qbevent){evnt(30180);if(r)goto S_33584;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30180);}while(r); do{ qbg_sub_locate(*_FUNC_IDECHANGEIT_LONG_CY,*_FUNC_IDECHANGEIT_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(30180);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30180);}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(30183);}while(r); S_33590:; do{ if(qbevent){evnt(30184);if(r)goto S_33590;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(30185);}while(r); S_33592:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(30186);if(r)goto S_33592;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30186);}while(r); } S_33595:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(30187);if(r)goto S_33595;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30187);}while(r); } S_33598:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(30188);if(r)goto S_33598;} do{ *_FUNC_IDECHANGEIT_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(30188);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30188);}while(r); } S_33602:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(30189);if(r)goto S_33602;} do{ *_FUNC_IDECHANGEIT_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(30189);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30189);}while(r); } S_33606:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(30190);if(r)goto S_33606;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30190);}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(30191);}while(r); S_33610:; if ((-(*_FUNC_IDECHANGEIT_LONG_ALT!=*_FUNC_IDECHANGEIT_LONG_OLDALT))||new_error){ if(qbevent){evnt(30191);if(r)goto S_33610;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30191);}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_OLDALT=*_FUNC_IDECHANGEIT_LONG_ALT; if(!qbevent)break;evnt(30192);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(30193);}while(r); S_33615:; }while((!(*_FUNC_IDECHANGEIT_LONG_CHANGE))&&(!new_error)); dl_exit_3847:; if(qbevent){evnt(30194);if(r)goto S_33615;} S_33616:; if ((*_FUNC_IDECHANGEIT_LONG_ALT)||new_error){ if(qbevent){evnt(30195);if(r)goto S_33616;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(30195);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(30195);}while(r); } do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30197);}while(r); S_33622:; if ((*_FUNC_IDECHANGEIT_LONG_ALT)||new_error){ if(qbevent){evnt(30198);if(r)goto S_33622;} S_33623:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(30199);if(r)goto S_33623;} do{ *_FUNC_IDECHANGEIT_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30200);}while(r); S_33625:; if (((-(*_FUNC_IDECHANGEIT_LONG_K>= 65 ))&(-(*_FUNC_IDECHANGEIT_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(30201);if(r)goto S_33625;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,func_chr(*_FUNC_IDECHANGEIT_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30201);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30204);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(30204);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30204);}while(r); S_33633:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(30207);if(r)goto S_33633;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30207);}while(r); } S_33636:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("S",1))))||new_error){ if(qbevent){evnt(30208);if(r)goto S_33636;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,qbs_new_txt_len("S",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30208);}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_INFO= 0 ; if(!qbevent)break;evnt(30211);}while(r); S_33640:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(30212);if(r)goto S_33640;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30212);}while(r); } S_33643:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30213);if(r)goto S_33643;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS=*_FUNC_IDECHANGEIT_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(30213);}while(r); } S_33646:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30214);if(r)goto S_33646;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS=*_FUNC_IDECHANGEIT_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(30214);}while(r); } S_33649:; if ((-(*_FUNC_IDECHANGEIT_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(30215);if(r)goto S_33649;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS=*_FUNC_IDECHANGEIT_LONG_LASTFOCUS; if(!qbevent)break;evnt(30215);}while(r); } S_33652:; if ((-(*_FUNC_IDECHANGEIT_LONG_FOCUS>*_FUNC_IDECHANGEIT_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(30216);if(r)goto S_33652;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30216);}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_F= 1 ; if(!qbevent)break;evnt(30217);}while(r); S_33656:; fornext_value3850= 1 ; fornext_finalvalue3850= 100 ; fornext_step3850= 1 ; if (fornext_step3850<0) fornext_step_negative3850=1; else fornext_step_negative3850=0; if (new_error) goto fornext_error3850; goto fornext_entrylabel3850; while(1){ fornext_value3850=fornext_step3850+(*_FUNC_IDECHANGEIT_LONG_I); fornext_entrylabel3850: *_FUNC_IDECHANGEIT_LONG_I=fornext_value3850; if (fornext_step_negative3850){ if (fornext_value3850fornext_finalvalue3850) break; } fornext_error3850:; if(qbevent){evnt(30218);if(r)goto S_33656;} do{ *_FUNC_IDECHANGEIT_LONG_T=*(int32*)(((char*)_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(30219);}while(r); S_33658:; if ((*_FUNC_IDECHANGEIT_LONG_T)||new_error){ if(qbevent){evnt(30220);if(r)goto S_33658;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUSOFFSET=*_FUNC_IDECHANGEIT_LONG_FOCUS-*_FUNC_IDECHANGEIT_LONG_F; if(!qbevent)break;evnt(30221);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDECHANGEIT_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECHANGEIT_LONG_I)-_FUNC_IDECHANGEIT_ARRAY_UDT_O[4],_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]))*80) ),_FUNC_IDECHANGEIT_LONG_FOCUS,_FUNC_IDECHANGEIT_LONG_F,_FUNC_IDECHANGEIT_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDECHANGEIT_STRING_ALTLETTER,__LONG_MB,_FUNC_IDECHANGEIT_LONG_MOUSEDOWN,_FUNC_IDECHANGEIT_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDECHANGEIT_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30222);}while(r); } } fornext_exit_3849:; S_33663:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(30227);if(r)goto S_33663;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30228);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(30229);}while(r); } S_33667:; if ((*_FUNC_IDECHANGEIT_LONG_INFO)||new_error){ if(qbevent){evnt(30232);if(r)goto S_33667;} S_33668:; if ((-(*_FUNC_IDECHANGEIT_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(30233);if(r)goto S_33668;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30233);}while(r); } S_33671:; if ((-(*_FUNC_IDECHANGEIT_LONG_INFO== 2 ))||new_error){ if(qbevent){evnt(30234);if(r)goto S_33671;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30234);}while(r); } S_33674:; if ((-(*_FUNC_IDECHANGEIT_LONG_INFO== 3 ))||new_error){ if(qbevent){evnt(30235);if(r)goto S_33674;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30235);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(30236);}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(30240);}while(r); do{ *_FUNC_IDECHANGEIT_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(30241);}while(r); }while(1); dl_exit_3844:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free89.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT);return _FUNC_IDECHANGEIT_STRING_IDECHANGEIT; } void SUB_IDEDELLINE(int32*_SUB_IDEDELLINE_LONG_I){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data90.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_33682:; fornext_value3852= 1 ; fornext_finalvalue3852=*__LONG_IDEBMKN; fornext_step3852= 1 ; if (fornext_step3852<0) fornext_step_negative3852=1; else fornext_step_negative3852=0; if (new_error) goto fornext_error3852; goto fornext_entrylabel3852; while(1){ fornext_value3852=fornext_step3852+(*_SUB_IDEDELLINE_LONG_B); fornext_entrylabel3852: *_SUB_IDEDELLINE_LONG_B=fornext_value3852; if (fornext_step_negative3852){ if (fornext_value3852fornext_finalvalue3852) break; } fornext_error3852:; if(qbevent){evnt(30249);if(r)goto S_33682;} S_33683:; if ((-(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDEDELLINE_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))>=*_SUB_IDEDELLINE_LONG_I))||new_error){ if(qbevent){evnt(30250);if(r)goto S_33683;} do{ *_SUB_IDEDELLINE_LONG_Y=*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDEDELLINE_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))- 1 ; if(!qbevent)break;evnt(30251);}while(r); S_33685:; if ((-(*_SUB_IDEDELLINE_LONG_Y== 0 ))||new_error){ if(qbevent){evnt(30251);if(r)goto S_33685;} do{ *_SUB_IDEDELLINE_LONG_Y= 1 ; if(!qbevent)break;evnt(30251);}while(r); } do{ *(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDEDELLINE_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))=*_SUB_IDEDELLINE_LONG_Y; if(!qbevent)break;evnt(30252);}while(r); } } fornext_exit_3851:; do{ SUB_IDEGOTOLINE(_SUB_IDEDELLINE_LONG_I); if(!qbevent)break;evnt(30256);}while(r); do{ *_SUB_IDEDELLINE_LONG_TEXTLEN=string2l(func_mid(__STRING_IDET,*__LONG_IDELI, 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30257);}while(r); do{ qbs_set(__STRING_IDET,qbs_add(qbs_left(__STRING_IDET,*__LONG_IDELI- 1 ),qbs_right(__STRING_IDET,__STRING_IDET->len-*__LONG_IDELI+ 1 - 8 -*_SUB_IDEDELLINE_LONG_TEXTLEN))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30258);}while(r); do{ *__LONG_IDEN=*__LONG_IDEN- 1 ; if(!qbevent)break;evnt(30259);}while(r); S_33695:; if ((-(*_SUB_IDEDELLINE_LONG_I>*__LONG_IDEN))||new_error){ if(qbevent){evnt(30261);if(r)goto S_33695;} do{ SUB_IDEGOTOLINE(__LONG_IDEN); if(!qbevent)break;evnt(30261);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free90.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEDELTXT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data91.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__INTEGER_IDETXTLAST= 0 ; if(!qbevent)break;evnt(30266);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free91.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEDRAWOBJ(void*_SUB_IDEDRAWOBJ_UDT_O,int32*_SUB_IDEDRAWOBJ_LONG_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data92.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(30270);}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30271);}while(r); S_33701:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 1 ))||new_error){ if(qbevent){evnt(30274);if(r)goto S_33701;} S_33702:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(30275);if(r)goto S_33702;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(30275);}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_X=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(30276);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Y=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(30276);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30277);}while(r); S_33708:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(30278);if(r)goto S_33708;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30279);}while(r); do{ qbg_sub_locate(*_SUB_IDEDRAWOBJ_LONG_Y,*_SUB_IDEDRAWOBJ_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(30280);}while(r); do{ SUB_IDEHPRINT(qbs_add(_SUB_IDEDRAWOBJ_STRING_A,qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30280);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_X=*_SUB_IDEDRAWOBJ_LONG_X+FUNC_IDEHLEN(_SUB_IDEDRAWOBJ_STRING_A)+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30281);}while(r); } S_33714:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))== 0 ))||new_error){ if(qbevent){evnt(30283);if(r)goto S_33714;} do{ *_SUB_IDEDRAWOBJ_LONG_X2=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(8))- 1 ; if(!qbevent)break;evnt(30283);}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))=*_SUB_IDEDRAWOBJ_LONG_X2-*_SUB_IDEDRAWOBJ_LONG_X- 3 ; if(!qbevent)break;evnt(30283);}while(r); } do{ SUB_IDEBOX(_SUB_IDEDRAWOBJ_LONG_X,&(pass3854=*_SUB_IDEDRAWOBJ_LONG_Y- 1 ),&(pass3855=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 4 ),&(pass3856= 3 )); if(!qbevent)break;evnt(30284);}while(r); S_33719:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))== 0 ))||new_error){ if(qbevent){evnt(30285);if(r)goto S_33719;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))=FUNC_IDENEWTXT(qbs_new_txt_len("",0)); if(!qbevent)break;evnt(30285);}while(r); } do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30286);}while(r); S_33723:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))>_SUB_IDEDRAWOBJ_STRING_A->len)))||new_error){ if(qbevent){evnt(30287);if(r)goto S_33723;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))=_SUB_IDEDRAWOBJ_STRING_A->len; if(!qbevent)break;evnt(30287);}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_CX=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72)); if(!qbevent)break;evnt(30288);}while(r); S_33727:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEDRAWOBJ_STRING_A->len>*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)))))||new_error){ if(qbevent){evnt(30290);if(r)goto S_33727;} S_33728:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))== 0 ))||new_error){ if(qbevent){evnt(30291);if(r)goto S_33728;} do{ *_SUB_IDEDRAWOBJ_LONG_TX=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))-*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 1 ; if(!qbevent)break;evnt(30292);}while(r); S_33730:; if ((-(*_SUB_IDEDRAWOBJ_LONG_TX< 1 ))||new_error){ if(qbevent){evnt(30293);if(r)goto S_33730;} do{ *_SUB_IDEDRAWOBJ_LONG_TX= 1 ; if(!qbevent)break;evnt(30293);}while(r); } do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,func_mid(_SUB_IDEDRAWOBJ_STRING_A,*_SUB_IDEDRAWOBJ_LONG_TX,*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)),1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30294);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_CX=*_SUB_IDEDRAWOBJ_LONG_CX-*_SUB_IDEDRAWOBJ_LONG_TX+ 1 ; if(!qbevent)break;evnt(30295);}while(r); }else{ do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,qbs_left(_SUB_IDEDRAWOBJ_STRING_A,*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30297);}while(r); } } do{ *_SUB_IDEDRAWOBJ_LONG_X=*_SUB_IDEDRAWOBJ_LONG_X+ 2 ; if(!qbevent)break;evnt(30301);}while(r); do{ qbg_sub_locate(*_SUB_IDEDRAWOBJ_LONG_Y,*_SUB_IDEDRAWOBJ_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(30302);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDEDRAWOBJ_STRING_A); if (new_error) goto skip3860; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3860: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30302);}while(r); S_33742:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))== 0 ))||new_error){ if(qbevent){evnt(30303);if(r)goto S_33742;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*_SUB_IDEDRAWOBJ_LONG_X+*_SUB_IDEDRAWOBJ_LONG_CX; if(!qbevent)break;evnt(30303);}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(56))=*_SUB_IDEDRAWOBJ_LONG_Y; if(!qbevent)break;evnt(30303);}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(30304);}while(r); } S_33748:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 2 ))||new_error){ if(qbevent){evnt(30308);if(r)goto S_33748;} S_33749:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(30309);if(r)goto S_33749;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(30309);}while(r); } S_33752:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))== 0 ))||new_error){ if(qbevent){evnt(30310);if(r)goto S_33752;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(8))- 2 -*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(30310);}while(r); } S_33755:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))== 0 ))||new_error){ if(qbevent){evnt(30311);if(r)goto S_33755;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(12))- 1 -*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(30311);}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_X=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(30312);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Y=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(30312);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30313);}while(r); do{ SUB_IDEBOX(_SUB_IDEDRAWOBJ_LONG_X,_SUB_IDEDRAWOBJ_LONG_Y,&(pass3861=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 2 ),&(pass3862=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))+ 2 )); if(!qbevent)break;evnt(30314);}while(r); S_33762:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(30315);if(r)goto S_33762;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30316);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_W=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 2 ; if(!qbevent)break;evnt(30317);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_M=*_SUB_IDEDRAWOBJ_LONG_W/ 2 ; if(!qbevent)break;evnt(30318);}while(r); S_33766:; if ((*_SUB_IDEDRAWOBJ_LONG_W& 1 )||new_error){ if(qbevent){evnt(30318);if(r)goto S_33766;} do{ *_SUB_IDEDRAWOBJ_LONG_M=*_SUB_IDEDRAWOBJ_LONG_M+ 1 ; if(!qbevent)break;evnt(30318);}while(r); } do{ qbg_sub_locate(*_SUB_IDEDRAWOBJ_LONG_Y,*_SUB_IDEDRAWOBJ_LONG_X+*_SUB_IDEDRAWOBJ_LONG_M-( 1 )-(((FUNC_IDEHLEN(_SUB_IDEDRAWOBJ_STRING_A)+ 2 )- 1 )/ 2 ),NULL,NULL,NULL,3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30319);}while(r); do{ SUB_IDEHPRINT(qbs_add(qbs_add(qbs_new_txt_len(" ",1),_SUB_IDEDRAWOBJ_STRING_A),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30319);}while(r); } S_33772:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))== 0 ))||new_error){ if(qbevent){evnt(30322);if(r)goto S_33772;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))= -1 ; if(!qbevent)break;evnt(30322);}while(r); } S_33775:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))== 0 ))||new_error){ if(qbevent){evnt(30323);if(r)goto S_33775;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))=FUNC_IDENEWTXT(qbs_new_txt_len("",0)); if(!qbevent)break;evnt(30323);}while(r); } S_33778:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(68))== 0 ))||new_error){ if(qbevent){evnt(30324);if(r)goto S_33778;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(68))=FUNC_IDENEWTXT(qbs_new_txt_len("",0)); if(!qbevent)break;evnt(30324);}while(r); } S_33781:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))== 0 ))||new_error){ if(qbevent){evnt(30325);if(r)goto S_33781;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))= 1 ; if(!qbevent)break;evnt(30325);}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_S=func_abs((int32)(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64)))); if(!qbevent)break;evnt(30326);}while(r); S_33785:; if ((-(*_SUB_IDEDRAWOBJ_LONG_S>=(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32)))))||new_error){ if(qbevent){evnt(30327);if(r)goto S_33785;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))=*_SUB_IDEDRAWOBJ_LONG_S-*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))+ 1 ; if(!qbevent)break;evnt(30327);}while(r); } S_33788:; if ((-(*_SUB_IDEDRAWOBJ_LONG_S<*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))))||new_error){ if(qbevent){evnt(30328);if(r)goto S_33788;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))=*_SUB_IDEDRAWOBJ_LONG_S; if(!qbevent)break;evnt(30328);}while(r); } S_33791:; if (((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))!= 0 ))&(-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))> 0 )))||new_error){ if(qbevent){evnt(30329);if(r)goto S_33791;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))); if(!qbevent)break;evnt(30329);}while(r); } do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30330);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_N= 1 ; if(!qbevent)break;evnt(30331);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Y= 1 ; if(!qbevent)break;evnt(30332);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_V1=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72)); if(!qbevent)break;evnt(30333);}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30334);}while(r); S_33799:; fornext_value3864= 1 ; fornext_finalvalue3864=_SUB_IDEDRAWOBJ_STRING_A->len; fornext_step3864= 1 ; if (fornext_step3864<0) fornext_step_negative3864=1; else fornext_step_negative3864=0; if (new_error) goto fornext_error3864; goto fornext_entrylabel3864; while(1){ fornext_value3864=fornext_step3864+(*_SUB_IDEDRAWOBJ_LONG_I2); fornext_entrylabel3864: *_SUB_IDEDRAWOBJ_LONG_I2=fornext_value3864; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3864){ if (fornext_value3864fornext_finalvalue3864) break; } fornext_error3864:; if(qbevent){evnt(30335);if(r)goto S_33799;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A2,func_mid(_SUB_IDEDRAWOBJ_STRING_A,*_SUB_IDEDRAWOBJ_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30336);}while(r); S_33801:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEDRAWOBJ_STRING_A2,_SUB_IDEDRAWOBJ_STRING1_SEP)))||new_error){ if(qbevent){evnt(30337);if(r)goto S_33801;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_add(_SUB_IDEDRAWOBJ_STRING_A3,_SUB_IDEDRAWOBJ_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30337);}while(r); } S_33804:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDEDRAWOBJ_STRING_A2,_SUB_IDEDRAWOBJ_STRING1_SEP))|(-(*_SUB_IDEDRAWOBJ_LONG_I2==_SUB_IDEDRAWOBJ_STRING_A->len))))||new_error){ if(qbevent){evnt(30338);if(r)goto S_33804;} S_33805:; if ((-(*_SUB_IDEDRAWOBJ_LONG_N<*_SUB_IDEDRAWOBJ_LONG_V1))||new_error){ if(qbevent){evnt(30339);if(r)goto S_33805;} }else{ S_33807:; if ((-(*_SUB_IDEDRAWOBJ_LONG_Y<=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))))||new_error){ if(qbevent){evnt(30342);if(r)goto S_33807;} S_33808:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(30343);if(r)goto S_33808;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(30343);}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30343);}while(r); } S_33813:; if (((((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))|(-((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))))==*_SUB_IDEDRAWOBJ_LONG_N))))&(-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))== 0 )))||new_error){ if(qbevent){evnt(30344);if(r)goto S_33813;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))+ 2 ; if(!qbevent)break;evnt(30344);}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(56))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24))+*_SUB_IDEDRAWOBJ_LONG_Y; if(!qbevent)break;evnt(30344);}while(r); } do{ qbg_sub_locate(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24))+*_SUB_IDEDRAWOBJ_LONG_Y,*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))+ 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(30345);}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_add(qbs_add(qbs_new_txt_len(" ",1),_SUB_IDEDRAWOBJ_STRING_A3),func_space(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30346);}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_left(_SUB_IDEDRAWOBJ_STRING_A3,*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30347);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDEDRAWOBJ_STRING_A3); if (new_error) goto skip3867; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3867: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30348);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Y=*_SUB_IDEDRAWOBJ_LONG_Y+ 1 ; if(!qbevent)break;evnt(30349);}while(r); } } do{ *_SUB_IDEDRAWOBJ_LONG_N=*_SUB_IDEDRAWOBJ_LONG_N+ 1 ; if(!qbevent)break;evnt(30352);}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30353);}while(r); } } fornext_exit_3863:; do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(76))=*_SUB_IDEDRAWOBJ_LONG_N- 1 ; if(!qbevent)break;evnt(30356);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_TNUM=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(76)); if(!qbevent)break;evnt(30358);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_TSEL=func_abs((int32)(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64)))); if(!qbevent)break;evnt(30359);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Q=FUNC_IDEVBAR(&(pass3868=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 1 ),&(pass3869=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24))+ 1 ),(int32*)(void*)( ((char*)(_SUB_IDEDRAWOBJ_UDT_O)) + (32) ),_SUB_IDEDRAWOBJ_LONG_TSEL,_SUB_IDEDRAWOBJ_LONG_TNUM); if(!qbevent)break;evnt(30361);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(30363);}while(r); } S_33834:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 3 ))||new_error){ if(qbevent){evnt(30367);if(r)goto S_33834;} S_33835:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(30368);if(r)goto S_33835;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(30368);}while(r); } S_33838:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))== 0 ))||new_error){ if(qbevent){evnt(30369);if(r)goto S_33838;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(8))-*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(30369);}while(r); } S_33841:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))== 0 ))||new_error){ if(qbevent){evnt(30370);if(r)goto S_33841;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))=FUNC_IDENEWTXT(qbs_new_txt_len("OK",2)); if(!qbevent)break;evnt(30370);}while(r); } do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30371);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_N= 1 ; if(!qbevent)break;evnt(30372);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_C= 0 ; if(!qbevent)break;evnt(30373);}while(r); S_33847:; fornext_value3871= 1 ; fornext_finalvalue3871=_SUB_IDEDRAWOBJ_STRING_A->len; fornext_step3871= 1 ; if (fornext_step3871<0) fornext_step_negative3871=1; else fornext_step_negative3871=0; if (new_error) goto fornext_error3871; goto fornext_entrylabel3871; while(1){ fornext_value3871=fornext_step3871+(*_SUB_IDEDRAWOBJ_LONG_I2); fornext_entrylabel3871: *_SUB_IDEDRAWOBJ_LONG_I2=fornext_value3871; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3871){ if (fornext_value3871fornext_finalvalue3871) break; } fornext_error3871:; if(qbevent){evnt(30374);if(r)goto S_33847;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A2,func_mid(_SUB_IDEDRAWOBJ_STRING_A,*_SUB_IDEDRAWOBJ_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30375);}while(r); S_33849:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEDRAWOBJ_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(30376);if(r)goto S_33849;} do{ *_SUB_IDEDRAWOBJ_LONG_N=*_SUB_IDEDRAWOBJ_LONG_N+ 1 ; if(!qbevent)break;evnt(30377);}while(r); }else{ S_33852:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEDRAWOBJ_STRING_A,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(30379);if(r)goto S_33852;} do{ *_SUB_IDEDRAWOBJ_LONG_C=*_SUB_IDEDRAWOBJ_LONG_C+ 1 ; if(!qbevent)break;evnt(30379);}while(r); } } } fornext_exit_3870:; do{ *_SUB_IDEDRAWOBJ_LONG_W=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)); if(!qbevent)break;evnt(30382);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_C=*_SUB_IDEDRAWOBJ_LONG_C+(*_SUB_IDEDRAWOBJ_LONG_N* 4 ); if(!qbevent)break;evnt(30383);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_WHITESPACE=*_SUB_IDEDRAWOBJ_LONG_W-*_SUB_IDEDRAWOBJ_LONG_C; if(!qbevent)break;evnt(30384);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_SPACING=*_SUB_IDEDRAWOBJ_LONG_WHITESPACE/ (*_SUB_IDEDRAWOBJ_LONG_N+ 1 ); if(!qbevent)break;evnt(30385);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_F2=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))+ 1 ; if(!qbevent)break;evnt(30386);}while(r); S_33862:; if (((-(*_SUB_IDEDRAWOBJ_LONG_F2< 1 ))|(-(*_SUB_IDEDRAWOBJ_LONG_F2>*_SUB_IDEDRAWOBJ_LONG_N)))||new_error){ if(qbevent){evnt(30387);if(r)goto S_33862;} S_33863:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(48)))||new_error){ if(qbevent){evnt(30388);if(r)goto S_33863;} do{ *_SUB_IDEDRAWOBJ_LONG_F2=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(48)); if(!qbevent)break;evnt(30388);}while(r); } } do{ *_SUB_IDEDRAWOBJ_LONG_N2= 1 ; if(!qbevent)break;evnt(30390);}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30391);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24)),*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20)),NULL,NULL,NULL,3); if(!qbevent)break;evnt(30392);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_X=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(30393);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30394);}while(r); S_33872:; fornext_value3874= 1 ; fornext_finalvalue3874=_SUB_IDEDRAWOBJ_STRING_A->len; fornext_step3874= 1 ; if (fornext_step3874<0) fornext_step_negative3874=1; else fornext_step_negative3874=0; if (new_error) goto fornext_error3874; goto fornext_entrylabel3874; while(1){ fornext_value3874=fornext_step3874+(*_SUB_IDEDRAWOBJ_LONG_I2); fornext_entrylabel3874: *_SUB_IDEDRAWOBJ_LONG_I2=fornext_value3874; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3874){ if (fornext_value3874fornext_finalvalue3874) break; } fornext_error3874:; if(qbevent){evnt(30395);if(r)goto S_33872;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A2,func_mid(_SUB_IDEDRAWOBJ_STRING_A,*_SUB_IDEDRAWOBJ_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30396);}while(r); S_33874:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEDRAWOBJ_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(30397);if(r)goto S_33874;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_add(_SUB_IDEDRAWOBJ_STRING_A3,_SUB_IDEDRAWOBJ_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30397);}while(r); } S_33877:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDEDRAWOBJ_STRING_A2,func_chr( 0 )))|(-(*_SUB_IDEDRAWOBJ_LONG_I2==_SUB_IDEDRAWOBJ_STRING_A->len))))||new_error){ if(qbevent){evnt(30398);if(r)goto S_33877;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*_SUB_IDEDRAWOBJ_LONG_SPACING)); if (new_error) goto skip3877; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3877: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30399);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_X=*_SUB_IDEDRAWOBJ_LONG_X+*_SUB_IDEDRAWOBJ_LONG_SPACING; if(!qbevent)break;evnt(30400);}while(r); S_33880:; if ((-(*_SUB_IDEDRAWOBJ_LONG_F2==*_SUB_IDEDRAWOBJ_LONG_N2))||new_error){ if(qbevent){evnt(30401);if(r)goto S_33880;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(30401);}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30401);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("< ",2)); if (new_error) goto skip3878; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3878: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30402);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30403);}while(r); do{ SUB_IDEHPRINT(_SUB_IDEDRAWOBJ_STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30403);}while(r); S_33888:; if ((-(*_SUB_IDEDRAWOBJ_LONG_F2==*_SUB_IDEDRAWOBJ_LONG_N2))||new_error){ if(qbevent){evnt(30404);if(r)goto S_33888;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(30404);}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30404);}while(r); } S_33893:; if ((-(*_SUB_IDEDRAWOBJ_LONG_N2==(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))+ 1 )))||new_error){ if(qbevent){evnt(30405);if(r)goto S_33893;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*_SUB_IDEDRAWOBJ_LONG_X+ 2 ; if(!qbevent)break;evnt(30406);}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(56))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(30406);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" >",2)); if (new_error) goto skip3879; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3879: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30408);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30409);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_X=*_SUB_IDEDRAWOBJ_LONG_X+FUNC_IDEHLEN(_SUB_IDEDRAWOBJ_STRING_A3)+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30410);}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30411);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_N2=*_SUB_IDEDRAWOBJ_LONG_N2+ 1 ; if(!qbevent)break;evnt(30412);}while(r); } } fornext_exit_3873:; do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+*_SUB_IDEDRAWOBJ_LONG_N; if(!qbevent)break;evnt(30415);}while(r); } S_33906:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 4 ))||new_error){ if(qbevent){evnt(30419);if(r)goto S_33906;} S_33907:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(30420);if(r)goto S_33907;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(30420);}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_X=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(30421);}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Y=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(30421);}while(r); do{ qbg_sub_locate(*_SUB_IDEDRAWOBJ_LONG_Y,*_SUB_IDEDRAWOBJ_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(30422);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30423);}while(r); S_33914:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64)))||new_error){ if(qbevent){evnt(30424);if(r)goto S_33914;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("[X] ",4)); if (new_error) goto skip3880; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3880: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30425);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("[ ] ",4)); if (new_error) goto skip3881; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3881: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30427);}while(r); } S_33919:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(30429);if(r)goto S_33919;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30430);}while(r); do{ SUB_IDEHPRINT(_SUB_IDEDRAWOBJ_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30431);}while(r); } S_33923:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))== 0 ))||new_error){ if(qbevent){evnt(30433);if(r)goto S_33923;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*_SUB_IDEDRAWOBJ_LONG_X+ 1 ; if(!qbevent)break;evnt(30433);}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(56))=*_SUB_IDEDRAWOBJ_LONG_Y; if(!qbevent)break;evnt(30433);}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(30434);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free92.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEDRAWPAR(void*_SUB_IDEDRAWPAR_UDT_P){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data93.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30440);}while(r); do{ SUB_IDEBOXSHADOW((int32*)(void*)( ((char*)(_SUB_IDEDRAWPAR_UDT_P)) + (0) ),(int32*)(void*)( ((char*)(_SUB_IDEDRAWPAR_UDT_P)) + (4) ),&(pass3882=*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(8))+ 2 ),&(pass3883=*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(12))+ 2 )); if(!qbevent)break;evnt(30440);}while(r); S_33931:; if ((*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(16)))||new_error){ if(qbevent){evnt(30441);if(r)goto S_33931;} do{ *_SUB_IDEDRAWPAR_LONG_X=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(16)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30442);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30443);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(4)),((*__LONG_IDEWX/ 2 ))-((*_SUB_IDEDRAWPAR_LONG_X- 1 )/ 2 ),NULL,NULL,NULL,3); if(!qbevent)break;evnt(30443);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len(" ",1),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(16)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(" ",1))); if (new_error) goto skip3885; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3885: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30443);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free93.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEERRORMESSAGE(qbs*_SUB_IDEERRORMESSAGE_STRING_MESS){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data94.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(30451);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(30452);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(30453);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30454);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30455);}while(r); do{ if(!qbevent)break;evnt(30456);}while(r); do{ if (_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[2]&1){ error(10); }else{ _SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4]= 1 ; _SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]=( 100 )-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4]+1; _SUB_IDEERRORMESSAGE_ARRAY_UDT_O[6]=1; if (_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[2]&4){ _SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0]),0,_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]*640/8+1); }else{ _SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0]=(ptrszint)calloc(_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]*640/8+1,1); if (!_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0]) error(257); } _SUB_IDEERRORMESSAGE_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(30457);}while(r); do{ if(!qbevent)break;evnt(30458);}while(r); do{ if(!qbevent)break;evnt(30459);}while(r); do{ qbs_set(_SUB_IDEERRORMESSAGE_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30460);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_I= 0 ; if(!qbevent)break;evnt(30464);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_SUB_IDEERRORMESSAGE_UDT_P)) + (0) ),&(pass3888=_SUB_IDEERRORMESSAGE_STRING_MESS->len+ 4 ),&(pass3889= 4 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30465);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_I=*_SUB_IDEERRORMESSAGE_LONG_I+ 1 ; if(!qbevent)break;evnt(30466);}while(r); do{ *(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(30467);}while(r); do{ *(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(30468);}while(r); do{ *(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_new_txt_len("OK",2)); if(!qbevent)break;evnt(30469);}while(r); do{ *(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(30470);}while(r); S_33954:; fornext_value3891= 1 ; fornext_finalvalue3891= 100 ; fornext_step3891= 1 ; if (fornext_step3891<0) fornext_step_negative3891=1; else fornext_step_negative3891=0; if (new_error) goto fornext_error3891; goto fornext_entrylabel3891; while(1){ fornext_value3891=fornext_step3891+(*_SUB_IDEERRORMESSAGE_LONG_I); fornext_entrylabel3891: *_SUB_IDEERRORMESSAGE_LONG_I=fornext_value3891; if (fornext_step_negative3891){ if (fornext_value3891fornext_finalvalue3891) break; } fornext_error3891:; if(qbevent){evnt(30474);if(r)goto S_33954;} do{ memcpy((((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80)),(((char*)_SUB_IDEERRORMESSAGE_UDT_P)+(0)),20); if(!qbevent)break;evnt(30474);}while(r); } fornext_exit_3890:; S_33957:; do{ if(qbevent){evnt(30477);if(r)goto S_33957;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_SUB_IDEERRORMESSAGE_UDT_P)) + (0) )); if(!qbevent)break;evnt(30480);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_F= 1 ; if(!qbevent)break;evnt(30481);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_CX= 0 ; if(!qbevent)break;evnt(30481);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_CY= 0 ; if(!qbevent)break;evnt(30481);}while(r); S_33962:; fornext_value3894= 1 ; fornext_finalvalue3894= 100 ; fornext_step3894= 1 ; if (fornext_step3894<0) fornext_step_negative3894=1; else fornext_step_negative3894=0; if (new_error) goto fornext_error3894; goto fornext_entrylabel3894; while(1){ fornext_value3894=fornext_step3894+(*_SUB_IDEERRORMESSAGE_LONG_I); fornext_entrylabel3894: *_SUB_IDEERRORMESSAGE_LONG_I=fornext_value3894; if (fornext_step_negative3894){ if (fornext_value3894fornext_finalvalue3894) break; } fornext_error3894:; if(qbevent){evnt(30482);if(r)goto S_33962;} S_33963:; if ((*(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(30483);if(r)goto S_33963;} do{ *(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+60))=*_SUB_IDEERRORMESSAGE_LONG_FOCUS-*_SUB_IDEERRORMESSAGE_LONG_F; if(!qbevent)break;evnt(30485);}while(r); do{ *(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(30486);}while(r); do{ *(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(30486);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80) ),_SUB_IDEERRORMESSAGE_LONG_F); if(!qbevent)break;evnt(30487);}while(r); S_33968:; if ((*(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(30488);if(r)goto S_33968;} do{ *_SUB_IDEERRORMESSAGE_LONG_CX=*(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(30488);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_CY=*(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(30488);}while(r); } } } fornext_exit_3893:; do{ *_SUB_IDEERRORMESSAGE_LONG_LASTFOCUS=*_SUB_IDEERRORMESSAGE_LONG_F- 1 ; if(!qbevent)break;evnt(30491);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30495);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_SUB_IDEERRORMESSAGE_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_SUB_IDEERRORMESSAGE_UDT_P)+(0))+ 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(30495);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDEERRORMESSAGE_STRING_MESS); if (new_error) goto skip3895; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3895: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30495);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(30499);}while(r); S_33979:; if ((*_SUB_IDEERRORMESSAGE_LONG_CX)||new_error){ if(qbevent){evnt(30500);if(r)goto S_33979;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30500);}while(r); do{ qbg_sub_locate(*_SUB_IDEERRORMESSAGE_LONG_CY,*_SUB_IDEERRORMESSAGE_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(30500);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30500);}while(r); } do{ *_SUB_IDEERRORMESSAGE_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(30503);}while(r); S_33985:; do{ if(qbevent){evnt(30504);if(r)goto S_33985;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(30505);}while(r); S_33987:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(30506);if(r)goto S_33987;} do{ *_SUB_IDEERRORMESSAGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30506);}while(r); } S_33990:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(30507);if(r)goto S_33990;} do{ *_SUB_IDEERRORMESSAGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30507);}while(r); } S_33993:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(30508);if(r)goto S_33993;} do{ *_SUB_IDEERRORMESSAGE_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(30508);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30508);}while(r); } S_33997:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(30509);if(r)goto S_33997;} do{ *_SUB_IDEERRORMESSAGE_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(30509);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30509);}while(r); } S_34001:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(30510);if(r)goto S_34001;} do{ *_SUB_IDEERRORMESSAGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30510);}while(r); } do{ *_SUB_IDEERRORMESSAGE_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(30511);}while(r); S_34005:; if ((-(*_SUB_IDEERRORMESSAGE_LONG_ALT!=*_SUB_IDEERRORMESSAGE_LONG_OLDALT))||new_error){ if(qbevent){evnt(30511);if(r)goto S_34005;} do{ *_SUB_IDEERRORMESSAGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30511);}while(r); } do{ *_SUB_IDEERRORMESSAGE_LONG_OLDALT=*_SUB_IDEERRORMESSAGE_LONG_ALT; if(!qbevent)break;evnt(30512);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(30513);}while(r); S_34010:; }while((!(*_SUB_IDEERRORMESSAGE_LONG_CHANGE))&&(!new_error)); dl_exit_3896:; if(qbevent){evnt(30514);if(r)goto S_34010;} S_34011:; if ((*_SUB_IDEERRORMESSAGE_LONG_ALT)||new_error){ if(qbevent){evnt(30515);if(r)goto S_34011;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(30515);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(30515);}while(r); } do{ qbs_set(_SUB_IDEERRORMESSAGE_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30517);}while(r); S_34017:; if ((*_SUB_IDEERRORMESSAGE_LONG_ALT)||new_error){ if(qbevent){evnt(30518);if(r)goto S_34017;} S_34018:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(30519);if(r)goto S_34018;} do{ *_SUB_IDEERRORMESSAGE_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30520);}while(r); S_34020:; if (((-(*_SUB_IDEERRORMESSAGE_LONG_K>= 65 ))&(-(*_SUB_IDEERRORMESSAGE_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(30521);if(r)goto S_34020;} do{ qbs_set(_SUB_IDEERRORMESSAGE_STRING_ALTLETTER,func_chr(*_SUB_IDEERRORMESSAGE_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30521);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30524);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(30524);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30524);}while(r); S_34028:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(30527);if(r)goto S_34028;} do{ qbs_set(_SUB_IDEERRORMESSAGE_STRING_ALTLETTER,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30527);}while(r); } S_34031:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(30528);if(r)goto S_34031;} do{ qbs_set(_SUB_IDEERRORMESSAGE_STRING_ALTLETTER,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30528);}while(r); } do{ *_SUB_IDEERRORMESSAGE_LONG_INFO= 0 ; if(!qbevent)break;evnt(30531);}while(r); S_34035:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(30532);if(r)goto S_34035;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30532);}while(r); } S_34038:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30533);if(r)goto S_34038;} do{ *_SUB_IDEERRORMESSAGE_LONG_FOCUS=*_SUB_IDEERRORMESSAGE_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(30533);}while(r); } S_34041:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30534);if(r)goto S_34041;} do{ *_SUB_IDEERRORMESSAGE_LONG_FOCUS=*_SUB_IDEERRORMESSAGE_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(30534);}while(r); } S_34044:; if ((-(*_SUB_IDEERRORMESSAGE_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(30535);if(r)goto S_34044;} do{ *_SUB_IDEERRORMESSAGE_LONG_FOCUS=*_SUB_IDEERRORMESSAGE_LONG_LASTFOCUS; if(!qbevent)break;evnt(30535);}while(r); } S_34047:; if ((-(*_SUB_IDEERRORMESSAGE_LONG_FOCUS>*_SUB_IDEERRORMESSAGE_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(30536);if(r)goto S_34047;} do{ *_SUB_IDEERRORMESSAGE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30536);}while(r); } do{ *_SUB_IDEERRORMESSAGE_LONG_F= 1 ; if(!qbevent)break;evnt(30537);}while(r); S_34051:; fornext_value3899= 1 ; fornext_finalvalue3899= 100 ; fornext_step3899= 1 ; if (fornext_step3899<0) fornext_step_negative3899=1; else fornext_step_negative3899=0; if (new_error) goto fornext_error3899; goto fornext_entrylabel3899; while(1){ fornext_value3899=fornext_step3899+(*_SUB_IDEERRORMESSAGE_LONG_I); fornext_entrylabel3899: *_SUB_IDEERRORMESSAGE_LONG_I=fornext_value3899; if (fornext_step_negative3899){ if (fornext_value3899fornext_finalvalue3899) break; } fornext_error3899:; if(qbevent){evnt(30538);if(r)goto S_34051;} do{ *_SUB_IDEERRORMESSAGE_LONG_T=*(int32*)(((char*)_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(30539);}while(r); S_34053:; if ((*_SUB_IDEERRORMESSAGE_LONG_T)||new_error){ if(qbevent){evnt(30540);if(r)goto S_34053;} do{ *_SUB_IDEERRORMESSAGE_LONG_FOCUSOFFSET=*_SUB_IDEERRORMESSAGE_LONG_FOCUS-*_SUB_IDEERRORMESSAGE_LONG_F; if(!qbevent)break;evnt(30541);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDEERRORMESSAGE_LONG_I)-_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[4],_SUB_IDEERRORMESSAGE_ARRAY_UDT_O[5]))*80) ),_SUB_IDEERRORMESSAGE_LONG_FOCUS,_SUB_IDEERRORMESSAGE_LONG_F,_SUB_IDEERRORMESSAGE_LONG_FOCUSOFFSET,__STRING_K,_SUB_IDEERRORMESSAGE_STRING_ALTLETTER,__LONG_MB,_SUB_IDEERRORMESSAGE_LONG_MOUSEDOWN,_SUB_IDEERRORMESSAGE_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_SUB_IDEERRORMESSAGE_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30542);}while(r); } } fornext_exit_3898:; S_34058:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(30547);if(r)goto S_34058;} do{ goto exit_subfunc; if(!qbevent)break;evnt(30548);}while(r); } S_34061:; if ((*_SUB_IDEERRORMESSAGE_LONG_INFO)||new_error){ if(qbevent){evnt(30551);if(r)goto S_34061;} do{ goto exit_subfunc; if(!qbevent)break;evnt(30552);}while(r); } do{ *_SUB_IDEERRORMESSAGE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(30557);}while(r); do{ *_SUB_IDEERRORMESSAGE_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(30558);}while(r); }while(1); dl_exit_3892:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free94.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDEFILEEXISTS(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data95.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(30566);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(30567);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(30568);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30569);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30570);}while(r); do{ if(!qbevent)break;evnt(30571);}while(r); do{ if (_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4]+1; _FUNC_IDEFILEEXISTS_ARRAY_UDT_O[6]=1; if (_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[2]&4){ _FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0]),0,_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEFILEEXISTS_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(30572);}while(r); do{ if(!qbevent)break;evnt(30573);}while(r); do{ if(!qbevent)break;evnt(30574);}while(r); do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30575);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_I= 0 ; if(!qbevent)break;evnt(30579);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEFILEEXISTS_UDT_P)) + (0) ),&(pass3900= 35 ),&(pass3901= 4 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30581);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_I=*_FUNC_IDEFILEEXISTS_LONG_I+ 1 ; if(!qbevent)break;evnt(30582);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(30583);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(30584);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#Yes",4),_FUNC_IDEFILEEXISTS_STRING1_SEP),qbs_new_txt_len("#No",3))); if(!qbevent)break;evnt(30585);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(30586);}while(r); S_34084:; fornext_value3903= 1 ; fornext_finalvalue3903= 100 ; fornext_step3903= 1 ; if (fornext_step3903<0) fornext_step_negative3903=1; else fornext_step_negative3903=0; if (new_error) goto fornext_error3903; goto fornext_entrylabel3903; while(1){ fornext_value3903=fornext_step3903+(*_FUNC_IDEFILEEXISTS_LONG_I); fornext_entrylabel3903: *_FUNC_IDEFILEEXISTS_LONG_I=fornext_value3903; if (fornext_step_negative3903){ if (fornext_value3903fornext_finalvalue3903) break; } fornext_error3903:; if(qbevent){evnt(30590);if(r)goto S_34084;} do{ memcpy((((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEFILEEXISTS_UDT_P)+(0)),20); if(!qbevent)break;evnt(30590);}while(r); } fornext_exit_3902:; S_34087:; do{ if(qbevent){evnt(30593);if(r)goto S_34087;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEFILEEXISTS_UDT_P)) + (0) )); if(!qbevent)break;evnt(30596);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_F= 1 ; if(!qbevent)break;evnt(30597);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_CX= 0 ; if(!qbevent)break;evnt(30597);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_CY= 0 ; if(!qbevent)break;evnt(30597);}while(r); S_34092:; fornext_value3906= 1 ; fornext_finalvalue3906= 100 ; fornext_step3906= 1 ; if (fornext_step3906<0) fornext_step_negative3906=1; else fornext_step_negative3906=0; if (new_error) goto fornext_error3906; goto fornext_entrylabel3906; while(1){ fornext_value3906=fornext_step3906+(*_FUNC_IDEFILEEXISTS_LONG_I); fornext_entrylabel3906: *_FUNC_IDEFILEEXISTS_LONG_I=fornext_value3906; if (fornext_step_negative3906){ if (fornext_value3906fornext_finalvalue3906) break; } fornext_error3906:; if(qbevent){evnt(30598);if(r)goto S_34092;} S_34093:; if ((*(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(30599);if(r)goto S_34093;} do{ *(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEFILEEXISTS_LONG_FOCUS-*_FUNC_IDEFILEEXISTS_LONG_F; if(!qbevent)break;evnt(30601);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(30602);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(30602);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEFILEEXISTS_LONG_F); if(!qbevent)break;evnt(30603);}while(r); S_34098:; if ((*(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(30604);if(r)goto S_34098;} do{ *_FUNC_IDEFILEEXISTS_LONG_CX=*(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(30604);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_CY=*(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(30604);}while(r); } } } fornext_exit_3905:; do{ *_FUNC_IDEFILEEXISTS_LONG_LASTFOCUS=*_FUNC_IDEFILEEXISTS_LONG_F- 1 ; if(!qbevent)break;evnt(30607);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(30611);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDEFILEEXISTS_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDEFILEEXISTS_UDT_P)+(0))+ 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(30611);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("File already exists. Overwrite?",31)); if (new_error) goto skip3907; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3907: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30611);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(30615);}while(r); S_34109:; if ((*_FUNC_IDEFILEEXISTS_LONG_CX)||new_error){ if(qbevent){evnt(30616);if(r)goto S_34109;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30616);}while(r); do{ qbg_sub_locate(*_FUNC_IDEFILEEXISTS_LONG_CY,*_FUNC_IDEFILEEXISTS_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(30616);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30616);}while(r); } do{ *_FUNC_IDEFILEEXISTS_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(30619);}while(r); S_34115:; do{ if(qbevent){evnt(30620);if(r)goto S_34115;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(30621);}while(r); S_34117:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(30622);if(r)goto S_34117;} do{ *_FUNC_IDEFILEEXISTS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30622);}while(r); } S_34120:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(30623);if(r)goto S_34120;} do{ *_FUNC_IDEFILEEXISTS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30623);}while(r); } S_34123:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(30624);if(r)goto S_34123;} do{ *_FUNC_IDEFILEEXISTS_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(30624);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30624);}while(r); } S_34127:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(30625);if(r)goto S_34127;} do{ *_FUNC_IDEFILEEXISTS_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(30625);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30625);}while(r); } S_34131:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(30626);if(r)goto S_34131;} do{ *_FUNC_IDEFILEEXISTS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30626);}while(r); } do{ *_FUNC_IDEFILEEXISTS_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(30627);}while(r); S_34135:; if ((-(*_FUNC_IDEFILEEXISTS_LONG_ALT!=*_FUNC_IDEFILEEXISTS_LONG_OLDALT))||new_error){ if(qbevent){evnt(30627);if(r)goto S_34135;} do{ *_FUNC_IDEFILEEXISTS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30627);}while(r); } do{ *_FUNC_IDEFILEEXISTS_LONG_OLDALT=*_FUNC_IDEFILEEXISTS_LONG_ALT; if(!qbevent)break;evnt(30628);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(30629);}while(r); S_34140:; }while((!(*_FUNC_IDEFILEEXISTS_LONG_CHANGE))&&(!new_error)); dl_exit_3908:; if(qbevent){evnt(30630);if(r)goto S_34140;} S_34141:; if ((*_FUNC_IDEFILEEXISTS_LONG_ALT)||new_error){ if(qbevent){evnt(30631);if(r)goto S_34141;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(30631);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(30631);}while(r); } do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30633);}while(r); S_34147:; if ((*_FUNC_IDEFILEEXISTS_LONG_ALT)||new_error){ if(qbevent){evnt(30634);if(r)goto S_34147;} S_34148:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(30635);if(r)goto S_34148;} do{ *_FUNC_IDEFILEEXISTS_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30636);}while(r); S_34150:; if (((-(*_FUNC_IDEFILEEXISTS_LONG_K>= 65 ))&(-(*_FUNC_IDEFILEEXISTS_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(30637);if(r)goto S_34150;} do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_ALTLETTER,func_chr(*_FUNC_IDEFILEEXISTS_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30637);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30640);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(30640);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30640);}while(r); S_34158:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(30643);if(r)goto S_34158;} do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_ALTLETTER,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30643);}while(r); } S_34161:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(30644);if(r)goto S_34161;} do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_ALTLETTER,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30644);}while(r); } do{ *_FUNC_IDEFILEEXISTS_LONG_INFO= 0 ; if(!qbevent)break;evnt(30647);}while(r); S_34165:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(30648);if(r)goto S_34165;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30648);}while(r); } S_34168:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30649);if(r)goto S_34168;} do{ *_FUNC_IDEFILEEXISTS_LONG_FOCUS=*_FUNC_IDEFILEEXISTS_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(30649);}while(r); } S_34171:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30650);if(r)goto S_34171;} do{ *_FUNC_IDEFILEEXISTS_LONG_FOCUS=*_FUNC_IDEFILEEXISTS_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(30650);}while(r); } S_34174:; if ((-(*_FUNC_IDEFILEEXISTS_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(30651);if(r)goto S_34174;} do{ *_FUNC_IDEFILEEXISTS_LONG_FOCUS=*_FUNC_IDEFILEEXISTS_LONG_LASTFOCUS; if(!qbevent)break;evnt(30651);}while(r); } S_34177:; if ((-(*_FUNC_IDEFILEEXISTS_LONG_FOCUS>*_FUNC_IDEFILEEXISTS_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(30652);if(r)goto S_34177;} do{ *_FUNC_IDEFILEEXISTS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30652);}while(r); } do{ *_FUNC_IDEFILEEXISTS_LONG_F= 1 ; if(!qbevent)break;evnt(30653);}while(r); S_34181:; fornext_value3911= 1 ; fornext_finalvalue3911= 100 ; fornext_step3911= 1 ; if (fornext_step3911<0) fornext_step_negative3911=1; else fornext_step_negative3911=0; if (new_error) goto fornext_error3911; goto fornext_entrylabel3911; while(1){ fornext_value3911=fornext_step3911+(*_FUNC_IDEFILEEXISTS_LONG_I); fornext_entrylabel3911: *_FUNC_IDEFILEEXISTS_LONG_I=fornext_value3911; if (fornext_step_negative3911){ if (fornext_value3911fornext_finalvalue3911) break; } fornext_error3911:; if(qbevent){evnt(30654);if(r)goto S_34181;} do{ *_FUNC_IDEFILEEXISTS_LONG_T=*(int32*)(((char*)_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(30655);}while(r); S_34183:; if ((*_FUNC_IDEFILEEXISTS_LONG_T)||new_error){ if(qbevent){evnt(30656);if(r)goto S_34183;} do{ *_FUNC_IDEFILEEXISTS_LONG_FOCUSOFFSET=*_FUNC_IDEFILEEXISTS_LONG_FOCUS-*_FUNC_IDEFILEEXISTS_LONG_F; if(!qbevent)break;evnt(30657);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEFILEEXISTS_LONG_I)-_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[4],_FUNC_IDEFILEEXISTS_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEFILEEXISTS_LONG_FOCUS,_FUNC_IDEFILEEXISTS_LONG_F,_FUNC_IDEFILEEXISTS_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEFILEEXISTS_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEFILEEXISTS_LONG_MOUSEDOWN,_FUNC_IDEFILEEXISTS_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEFILEEXISTS_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30658);}while(r); } } fornext_exit_3910:; S_34188:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(30663);if(r)goto S_34188;} do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_IDEFILEEXISTS,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30664);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(30665);}while(r); } S_34192:; if ((*_FUNC_IDEFILEEXISTS_LONG_INFO)||new_error){ if(qbevent){evnt(30668);if(r)goto S_34192;} S_34193:; if ((-(*_FUNC_IDEFILEEXISTS_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(30669);if(r)goto S_34193;} do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_IDEFILEEXISTS,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30669);}while(r); }else{ do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_IDEFILEEXISTS,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30669);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(30670);}while(r); } do{ *_FUNC_IDEFILEEXISTS_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(30674);}while(r); do{ *_FUNC_IDEFILEEXISTS_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(30675);}while(r); }while(1); dl_exit_3904:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free95.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEFILEEXISTS_STRING_IDEFILEEXISTS);return _FUNC_IDEFILEEXISTS_STRING_IDEFILEEXISTS; } qbs* FUNC_IDEFIND(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data96.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(30688);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(30689);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30690);}while(r); do{ *_FUNC_IDEFIND_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30691);}while(r); do{ if(!qbevent)break;evnt(30692);}while(r); do{ if (_FUNC_IDEFIND_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEFIND_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEFIND_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEFIND_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEFIND_ARRAY_UDT_O[4]+1; _FUNC_IDEFIND_ARRAY_UDT_O[6]=1; if (_FUNC_IDEFIND_ARRAY_UDT_O[2]&4){ _FUNC_IDEFIND_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEFIND_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEFIND_ARRAY_UDT_O[0]),0,_FUNC_IDEFIND_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEFIND_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEFIND_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEFIND_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEFIND_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(30693);}while(r); do{ if(!qbevent)break;evnt(30694);}while(r); do{ if(!qbevent)break;evnt(30695);}while(r); do{ qbs_set(_FUNC_IDEFIND_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30696);}while(r); S_34212:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(30702);if(r)goto S_34212;} S_34213:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(30703);if(r)goto S_34213;} do{ qbs_set(_FUNC_IDEFIND_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30704);}while(r); do{ qbs_set(_FUNC_IDEFIND_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30705);}while(r); do{ *_FUNC_IDEFIND_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(30706);}while(r); do{ *_FUNC_IDEFIND_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(30706);}while(r); S_34218:; if ((-(*_FUNC_IDEFIND_LONG_SX2<*_FUNC_IDEFIND_LONG_SX1))||new_error){ if(qbevent){evnt(30707);if(r)goto S_34218;} do{ swap_32(&*_FUNC_IDEFIND_LONG_SX1,&*_FUNC_IDEFIND_LONG_SX2); if(!qbevent)break;evnt(30707);}while(r); } S_34221:; fornext_value3913=*_FUNC_IDEFIND_LONG_SX1; fornext_finalvalue3913=*_FUNC_IDEFIND_LONG_SX2- 1 ; fornext_step3913= 1 ; if (fornext_step3913<0) fornext_step_negative3913=1; else fornext_step_negative3913=0; if (new_error) goto fornext_error3913; goto fornext_entrylabel3913; while(1){ fornext_value3913=fornext_step3913+(*_FUNC_IDEFIND_LONG_X); fornext_entrylabel3913: *_FUNC_IDEFIND_LONG_X=fornext_value3913; if (fornext_step_negative3913){ if (fornext_value3913fornext_finalvalue3913) break; } fornext_error3913:; if(qbevent){evnt(30708);if(r)goto S_34221;} S_34222:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDEFIND_LONG_X<=_FUNC_IDEFIND_STRING_A->len)))||new_error){ if(qbevent){evnt(30709);if(r)goto S_34222;} do{ qbs_set(_FUNC_IDEFIND_STRING_A2,qbs_add(_FUNC_IDEFIND_STRING_A2,func_mid(_FUNC_IDEFIND_STRING_A,*_FUNC_IDEFIND_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30709);}while(r); }else{ do{ qbs_set(_FUNC_IDEFIND_STRING_A2,qbs_add(_FUNC_IDEFIND_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30709);}while(r); } } fornext_exit_3912:; } } S_34230:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEFIND_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(30713);if(r)goto S_34230;} do{ qbs_set(_FUNC_IDEFIND_STRING_A2,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30714);}while(r); } do{ *_FUNC_IDEFIND_LONG_I= 0 ; if(!qbevent)break;evnt(30718);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEFIND_UDT_P)) + (0) ),&(pass3915= 60 ),&(pass3916= 9 ),qbs_new_txt_len("Find",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30719);}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(30720);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(30721);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(30722);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Find What",10)); if(!qbevent)break;evnt(30723);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEFIND_STRING_A2); if(!qbevent)break;evnt(30724);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDEFIND_STRING_A2->len; if(!qbevent)break;evnt(30725);}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(30729);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(30730);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(30731);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Match Upper/Lowercase",22)); if(!qbevent)break;evnt(30732);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+64))=*__INTEGER_IDEFINDCASESENS; if(!qbevent)break;evnt(30733);}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(30735);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(30736);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+24))= 6 ; if(!qbevent)break;evnt(30737);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Whole Word",11)); if(!qbevent)break;evnt(30738);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+64))=*__INTEGER_IDEFINDWHOLEWORD; if(!qbevent)break;evnt(30739);}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(30741);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(30742);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+24))= 7 ; if(!qbevent)break;evnt(30743);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Search Backwards",17)); if(!qbevent)break;evnt(30744);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+64))=*__INTEGER_IDEFINDBACKWARDS; if(!qbevent)break;evnt(30745);}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(30747);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(30748);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+24))= 9 ; if(!qbevent)break;evnt(30749);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDEFIND_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(30750);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(30751);}while(r); S_34261:; fornext_value3919= 1 ; fornext_finalvalue3919= 100 ; fornext_step3919= 1 ; if (fornext_step3919<0) fornext_step_negative3919=1; else fornext_step_negative3919=0; if (new_error) goto fornext_error3919; goto fornext_entrylabel3919; while(1){ fornext_value3919=fornext_step3919+(*_FUNC_IDEFIND_LONG_I); fornext_entrylabel3919: *_FUNC_IDEFIND_LONG_I=fornext_value3919; if (fornext_step_negative3919){ if (fornext_value3919fornext_finalvalue3919) break; } fornext_error3919:; if(qbevent){evnt(30755);if(r)goto S_34261;} do{ memcpy((((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEFIND_UDT_P)+(0)),20); if(!qbevent)break;evnt(30755);}while(r); } fornext_exit_3918:; S_34264:; do{ if(qbevent){evnt(30758);if(r)goto S_34264;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEFIND_UDT_P)) + (0) )); if(!qbevent)break;evnt(30762);}while(r); do{ *_FUNC_IDEFIND_LONG_F= 1 ; if(!qbevent)break;evnt(30763);}while(r); do{ *_FUNC_IDEFIND_LONG_CX= 0 ; if(!qbevent)break;evnt(30763);}while(r); do{ *_FUNC_IDEFIND_LONG_CY= 0 ; if(!qbevent)break;evnt(30763);}while(r); S_34269:; fornext_value3922= 1 ; fornext_finalvalue3922= 100 ; fornext_step3922= 1 ; if (fornext_step3922<0) fornext_step_negative3922=1; else fornext_step_negative3922=0; if (new_error) goto fornext_error3922; goto fornext_entrylabel3922; while(1){ fornext_value3922=fornext_step3922+(*_FUNC_IDEFIND_LONG_I); fornext_entrylabel3922: *_FUNC_IDEFIND_LONG_I=fornext_value3922; if (fornext_step_negative3922){ if (fornext_value3922fornext_finalvalue3922) break; } fornext_error3922:; if(qbevent){evnt(30764);if(r)goto S_34269;} S_34270:; if ((*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(30765);if(r)goto S_34270;} do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEFIND_LONG_FOCUS-*_FUNC_IDEFIND_LONG_F; if(!qbevent)break;evnt(30768);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(30769);}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(30769);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEFIND_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEFIND_LONG_F); if(!qbevent)break;evnt(30770);}while(r); S_34275:; if ((*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(30771);if(r)goto S_34275;} do{ *_FUNC_IDEFIND_LONG_CX=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(30771);}while(r); do{ *_FUNC_IDEFIND_LONG_CY=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(30771);}while(r); } } } fornext_exit_3921:; do{ *_FUNC_IDEFIND_LONG_LASTFOCUS=*_FUNC_IDEFIND_LONG_F- 1 ; if(!qbevent)break;evnt(30774);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(30781);}while(r); S_34283:; if ((*_FUNC_IDEFIND_LONG_CX)||new_error){ if(qbevent){evnt(30782);if(r)goto S_34283;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30782);}while(r); do{ qbg_sub_locate(*_FUNC_IDEFIND_LONG_CY,*_FUNC_IDEFIND_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(30782);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30782);}while(r); } do{ *_FUNC_IDEFIND_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(30785);}while(r); S_34289:; do{ if(qbevent){evnt(30786);if(r)goto S_34289;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(30787);}while(r); S_34291:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(30788);if(r)goto S_34291;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30788);}while(r); } S_34294:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(30789);if(r)goto S_34294;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30789);}while(r); } S_34297:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(30790);if(r)goto S_34297;} do{ *_FUNC_IDEFIND_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(30790);}while(r); do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30790);}while(r); } S_34301:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(30791);if(r)goto S_34301;} do{ *_FUNC_IDEFIND_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(30791);}while(r); do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30791);}while(r); } S_34305:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(30792);if(r)goto S_34305;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30792);}while(r); } do{ *_FUNC_IDEFIND_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(30793);}while(r); S_34309:; if ((-(*_FUNC_IDEFIND_LONG_ALT!=*_FUNC_IDEFIND_LONG_OLDALT))||new_error){ if(qbevent){evnt(30793);if(r)goto S_34309;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(30793);}while(r); } do{ *_FUNC_IDEFIND_LONG_OLDALT=*_FUNC_IDEFIND_LONG_ALT; if(!qbevent)break;evnt(30794);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(30795);}while(r); S_34314:; }while((!(*_FUNC_IDEFIND_LONG_CHANGE))&&(!new_error)); dl_exit_3923:; if(qbevent){evnt(30796);if(r)goto S_34314;} S_34315:; if ((*_FUNC_IDEFIND_LONG_ALT)||new_error){ if(qbevent){evnt(30797);if(r)goto S_34315;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(30797);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(30797);}while(r); } do{ qbs_set(_FUNC_IDEFIND_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30799);}while(r); S_34321:; if ((*_FUNC_IDEFIND_LONG_ALT)||new_error){ if(qbevent){evnt(30800);if(r)goto S_34321;} S_34322:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(30801);if(r)goto S_34322;} do{ *_FUNC_IDEFIND_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30802);}while(r); S_34324:; if (((-(*_FUNC_IDEFIND_LONG_K>= 65 ))&(-(*_FUNC_IDEFIND_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(30803);if(r)goto S_34324;} do{ qbs_set(_FUNC_IDEFIND_STRING_ALTLETTER,func_chr(*_FUNC_IDEFIND_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30803);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(30806);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(30806);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(30806);}while(r); do{ *_FUNC_IDEFIND_LONG_INFO= 0 ; if(!qbevent)break;evnt(30810);}while(r); S_34333:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(30811);if(r)goto S_34333;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30811);}while(r); } S_34336:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30812);if(r)goto S_34336;} do{ *_FUNC_IDEFIND_LONG_FOCUS=*_FUNC_IDEFIND_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(30812);}while(r); } S_34339:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(30813);if(r)goto S_34339;} do{ *_FUNC_IDEFIND_LONG_FOCUS=*_FUNC_IDEFIND_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(30813);}while(r); } S_34342:; if ((-(*_FUNC_IDEFIND_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(30814);if(r)goto S_34342;} do{ *_FUNC_IDEFIND_LONG_FOCUS=*_FUNC_IDEFIND_LONG_LASTFOCUS; if(!qbevent)break;evnt(30814);}while(r); } S_34345:; if ((-(*_FUNC_IDEFIND_LONG_FOCUS>*_FUNC_IDEFIND_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(30815);if(r)goto S_34345;} do{ *_FUNC_IDEFIND_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(30815);}while(r); } do{ *_FUNC_IDEFIND_LONG_F= 1 ; if(!qbevent)break;evnt(30816);}while(r); S_34349:; fornext_value3926= 1 ; fornext_finalvalue3926= 100 ; fornext_step3926= 1 ; if (fornext_step3926<0) fornext_step_negative3926=1; else fornext_step_negative3926=0; if (new_error) goto fornext_error3926; goto fornext_entrylabel3926; while(1){ fornext_value3926=fornext_step3926+(*_FUNC_IDEFIND_LONG_I); fornext_entrylabel3926: *_FUNC_IDEFIND_LONG_I=fornext_value3926; if (fornext_step_negative3926){ if (fornext_value3926fornext_finalvalue3926) break; } fornext_error3926:; if(qbevent){evnt(30817);if(r)goto S_34349;} do{ *_FUNC_IDEFIND_LONG_T=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(30818);}while(r); S_34351:; if ((*_FUNC_IDEFIND_LONG_T)||new_error){ if(qbevent){evnt(30819);if(r)goto S_34351;} do{ *_FUNC_IDEFIND_LONG_FOCUSOFFSET=*_FUNC_IDEFIND_LONG_FOCUS-*_FUNC_IDEFIND_LONG_F; if(!qbevent)break;evnt(30820);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEFIND_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEFIND_LONG_I)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEFIND_LONG_FOCUS,_FUNC_IDEFIND_LONG_F,_FUNC_IDEFIND_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEFIND_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEFIND_LONG_MOUSEDOWN,_FUNC_IDEFIND_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEFIND_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30821);}while(r); } } fornext_exit_3925:; S_34356:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEFIND_LONG_FOCUS== 6 ))&(-(*_FUNC_IDEFIND_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(30828);if(r)goto S_34356;} do{ qbs_set(_FUNC_IDEFIND_STRING_IDEFIND,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30829);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(30830);}while(r); } S_34360:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEFIND_LONG_FOCUS== 5 ))&(-(*_FUNC_IDEFIND_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(30833);if(r)goto S_34360;} do{ *__INTEGER_IDEFINDCASESENS=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(30834);}while(r); do{ *__INTEGER_IDEFINDWHOLEWORD=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(30835);}while(r); do{ *__INTEGER_IDEFINDBACKWARDS=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(30836);}while(r); do{ qbs_set(_FUNC_IDEFIND_STRING_S,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30837);}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDEFIND_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30838);}while(r); do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30839);}while(r); do{ SUB_IDEFINDAGAIN(); if(!qbevent)break;evnt(30840);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(30841);}while(r); } do{ *_FUNC_IDEFIND_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(30848);}while(r); do{ *_FUNC_IDEFIND_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(30849);}while(r); }while(1); dl_exit_3920:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free96.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEFIND_STRING_IDEFIND);return _FUNC_IDEFIND_STRING_IDEFIND; } void SUB_IDEFINDAGAIN(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data97.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_34373:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(30855);if(r)goto S_34373;} S_34374:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(30856);if(r)goto S_34374;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(30856);}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(30856);}while(r); } } do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_S,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30859);}while(r); S_34381:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(30860);if(r)goto S_34381;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_S,qbs_ucase(_SUB_IDEFINDAGAIN_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30860);}while(r); } do{ *_SUB_IDEFINDAGAIN_LONG_START=*__LONG_IDECY; if(!qbevent)break;evnt(30861);}while(r); do{ *_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_START; if(!qbevent)break;evnt(30862);}while(r); LABEL_IDEFINDNEXT2:; if(qbevent){evnt(30864);r=0;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,FUNC_IDEGETLINE(_SUB_IDEFINDAGAIN_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30865);}while(r); S_34387:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(30866);if(r)goto S_34387;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_ucase(_SUB_IDEFINDAGAIN_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30866);}while(r); } S_34390:; if ((-(*_SUB_IDEFINDAGAIN_LONG_Y==*_SUB_IDEFINDAGAIN_LONG_START))||new_error){ if(qbevent){evnt(30868);if(r)goto S_34390;} S_34391:; if ((-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 ))||new_error){ if(qbevent){evnt(30870);if(r)goto S_34391;} S_34392:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(30871);if(r)goto S_34392;} S_34393:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(30872);if(r)goto S_34393;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_add(func_string(*__LONG_IDECX, 255 ),qbs_right(_SUB_IDEFINDAGAIN_STRING_L,_SUB_IDEFINDAGAIN_STRING_L->len-*__LONG_IDECX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30872);}while(r); }else{ do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30872);}while(r); } }else{ S_34399:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(30874);if(r)goto S_34399;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_left(_SUB_IDEFINDAGAIN_STRING_L,*__LONG_IDECX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30874);}while(r); } } }else{ S_34404:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(30877);if(r)goto S_34404;} S_34405:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(30878);if(r)goto S_34405;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_left(_SUB_IDEFINDAGAIN_STRING_L,*__LONG_IDECX- 1 +(_SUB_IDEFINDAGAIN_STRING_S->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30878);}while(r); } }else{ S_34409:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(30880);if(r)goto S_34409;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_add(func_string(*__LONG_IDECX, 255 ),qbs_right(_SUB_IDEFINDAGAIN_STRING_L,_SUB_IDEFINDAGAIN_STRING_L->len-*__LONG_IDECX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30880);}while(r); }else{ do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30880);}while(r); } } } } do{ *_SUB_IDEFINDAGAIN_LONG_X1= 1 ; if(!qbevent)break;evnt(30885);}while(r); S_34418:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(30886);if(r)goto S_34418;} do{ *_SUB_IDEFINDAGAIN_LONG_X1=_SUB_IDEFINDAGAIN_STRING_L->len-_SUB_IDEFINDAGAIN_STRING_S->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30887);}while(r); S_34420:; if ((-(*_SUB_IDEFINDAGAIN_LONG_X1< 0 ))||new_error){ if(qbevent){evnt(30888);if(r)goto S_34420;} do{ *_SUB_IDEFINDAGAIN_LONG_X1= 0 ; if(!qbevent)break;evnt(30888);}while(r); } } LABEL_IDEFINDAGAIN2:; if(qbevent){evnt(30891);r=0;} S_34424:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(30893);if(r)goto S_34424;} do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(30894);}while(r); S_34426:; fornext_value3937=*_SUB_IDEFINDAGAIN_LONG_X1; fornext_finalvalue3937= 1 ; fornext_step3937= -1 ; if (fornext_step3937<0) fornext_step_negative3937=1; else fornext_step_negative3937=0; if (new_error) goto fornext_error3937; goto fornext_entrylabel3937; while(1){ fornext_value3937=fornext_step3937+(*_SUB_IDEFINDAGAIN_LONG_XX); fornext_entrylabel3937: *_SUB_IDEFINDAGAIN_LONG_XX=fornext_value3937; if (fornext_step_negative3937){ if (fornext_value3937fornext_finalvalue3937) break; } fornext_error3937:; if(qbevent){evnt(30895);if(r)goto S_34426;} S_34427:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_IDEFINDAGAIN_STRING_L,*_SUB_IDEFINDAGAIN_LONG_XX)==qbs_asc(_SUB_IDEFINDAGAIN_STRING_S))))||new_error){ if(qbevent){evnt(30896);if(r)goto S_34427;} do{ *_SUB_IDEFINDAGAIN_LONG_XXO=*_SUB_IDEFINDAGAIN_LONG_XX- 1 ; if(!qbevent)break;evnt(30897);}while(r); S_34429:; fornext_value3939=*_SUB_IDEFINDAGAIN_LONG_XX; fornext_finalvalue3939=*_SUB_IDEFINDAGAIN_LONG_XX+_SUB_IDEFINDAGAIN_STRING_S->len- 1 ; fornext_step3939= 1 ; if (fornext_step3939<0) fornext_step_negative3939=1; else fornext_step_negative3939=0; if (new_error) goto fornext_error3939; goto fornext_entrylabel3939; while(1){ fornext_value3939=fornext_step3939+(*_SUB_IDEFINDAGAIN_LONG_XX2); fornext_entrylabel3939: *_SUB_IDEFINDAGAIN_LONG_XX2=fornext_value3939; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3939){ if (fornext_value3939fornext_finalvalue3939) break; } fornext_error3939:; if(qbevent){evnt(30898);if(r)goto S_34429;} S_34430:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_IDEFINDAGAIN_STRING_L,*_SUB_IDEFINDAGAIN_LONG_XX2)!=qbs_asc(_SUB_IDEFINDAGAIN_STRING_S,*_SUB_IDEFINDAGAIN_LONG_XX2-*_SUB_IDEFINDAGAIN_LONG_XXO))))||new_error){ if(qbevent){evnt(30899);if(r)goto S_34430;} do{ goto fornext_exit_3938; if(!qbevent)break;evnt(30899);}while(r); } } fornext_exit_3938:; S_34434:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEFINDAGAIN_LONG_XX2==(*_SUB_IDEFINDAGAIN_LONG_XX+_SUB_IDEFINDAGAIN_STRING_S->len))))||new_error){ if(qbevent){evnt(30901);if(r)goto S_34434;} do{ *_SUB_IDEFINDAGAIN_LONG_X=*_SUB_IDEFINDAGAIN_LONG_XX; if(!qbevent)break;evnt(30903);}while(r); do{ goto fornext_exit_3936; if(!qbevent)break;evnt(30904);}while(r); } } } fornext_exit_3936:; }else{ do{ *_SUB_IDEFINDAGAIN_LONG_X=func_instr(*_SUB_IDEFINDAGAIN_LONG_X1,_SUB_IDEFINDAGAIN_STRING_L,_SUB_IDEFINDAGAIN_STRING_S,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30909);}while(r); } S_34443:; if ((*_SUB_IDEFINDAGAIN_LONG_X)||new_error){ if(qbevent){evnt(30913);if(r)goto S_34443;} S_34444:; if ((*__INTEGER_IDEFINDWHOLEWORD)||new_error){ if(qbevent){evnt(30914);if(r)goto S_34444;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 1 ; if(!qbevent)break;evnt(30915);}while(r); S_34446:; if ((-(*_SUB_IDEFINDAGAIN_LONG_X> 1 ))||new_error){ if(qbevent){evnt(30916);if(r)goto S_34446;} do{ *_SUB_IDEFINDAGAIN_LONG_C=qbs_asc(qbs_ucase(func_mid(_SUB_IDEFINDAGAIN_STRING_L,*_SUB_IDEFINDAGAIN_LONG_X- 1 , 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30917);}while(r); S_34448:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 65 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(30918);if(r)goto S_34448;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(30918);}while(r); } S_34451:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 48 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(30919);if(r)goto S_34451;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(30919);}while(r); } } S_34455:; if ((qbs_cleanup(qbs_tmp_base,-((*_SUB_IDEFINDAGAIN_LONG_X+_SUB_IDEFINDAGAIN_STRING_S->len)<=(_SUB_IDEFINDAGAIN_STRING_L->len))))||new_error){ if(qbevent){evnt(30921);if(r)goto S_34455;} do{ *_SUB_IDEFINDAGAIN_LONG_C=qbs_asc(qbs_ucase(func_mid(_SUB_IDEFINDAGAIN_STRING_L,*_SUB_IDEFINDAGAIN_LONG_X+_SUB_IDEFINDAGAIN_STRING_S->len, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30922);}while(r); S_34457:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 65 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(30923);if(r)goto S_34457;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(30923);}while(r); } S_34460:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 48 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(30924);if(r)goto S_34460;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(30924);}while(r); } } S_34464:; if ((-(*_SUB_IDEFINDAGAIN_LONG_WHOLE== 0 ))||new_error){ if(qbevent){evnt(30926);if(r)goto S_34464;} do{ *_SUB_IDEFINDAGAIN_LONG_X1=*_SUB_IDEFINDAGAIN_LONG_X+ 1 ; if(!qbevent)break;evnt(30927);}while(r); S_34466:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(30927);if(r)goto S_34466;} do{ *_SUB_IDEFINDAGAIN_LONG_X1=*_SUB_IDEFINDAGAIN_LONG_X- 1 ; if(!qbevent)break;evnt(30927);}while(r); } do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(30928);}while(r); S_34470:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDEFINDAGAIN_LONG_X1> 0 ))&(-(*_SUB_IDEFINDAGAIN_LONG_X1<=_SUB_IDEFINDAGAIN_STRING_L->len))))||new_error){ if(qbevent){evnt(30929);if(r)goto S_34470;} do{ goto LABEL_IDEFINDAGAIN2; if(!qbevent)break;evnt(30929);}while(r); } } } } S_34476:; if ((*_SUB_IDEFINDAGAIN_LONG_X)||new_error){ if(qbevent){evnt(30934);if(r)goto S_34476;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(30935);}while(r); do{ *__LONG_IDECX=*_SUB_IDEFINDAGAIN_LONG_X; if(!qbevent)break;evnt(30936);}while(r); do{ *__LONG_IDECY=*_SUB_IDEFINDAGAIN_LONG_Y; if(!qbevent)break;evnt(30936);}while(r); do{ *__LONG_IDESELECTX1=*_SUB_IDEFINDAGAIN_LONG_X+_SUB_IDEFINDAGAIN_STRING_S->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30937);}while(r); do{ *__LONG_IDESELECTY1=*_SUB_IDEFINDAGAIN_LONG_Y; if(!qbevent)break;evnt(30937);}while(r); S_34482:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(30939);if(r)goto S_34482;} S_34483:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(30940);if(r)goto S_34483;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(30940);}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(30940);}while(r); } do{ *__INTEGER_IDEFINDINVERT= 0 ; if(!qbevent)break;evnt(30941);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(30943);}while(r); } S_34492:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(30946);if(r)goto S_34492;} do{ *_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_Y- 1 ; if(!qbevent)break;evnt(30947);}while(r); S_34494:; if (((-(*_SUB_IDEFINDAGAIN_LONG_Y==(*_SUB_IDEFINDAGAIN_LONG_START- 1 )))&(-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(30948);if(r)goto S_34494;} do{ SUB_IDENOMATCH(); if(!qbevent)break;evnt(30949);}while(r); S_34496:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(30950);if(r)goto S_34496;} S_34497:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(30951);if(r)goto S_34497;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(30951);}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(30951);}while(r); } do{ *__INTEGER_IDEFINDINVERT= 0 ; if(!qbevent)break;evnt(30952);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(30954);}while(r); } S_34506:; if ((-(*_SUB_IDEFINDAGAIN_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(30956);if(r)goto S_34506;} do{ *_SUB_IDEFINDAGAIN_LONG_Y=*__LONG_IDEN; if(!qbevent)break;evnt(30956);}while(r); do{ *_SUB_IDEFINDAGAIN_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(30956);}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(30957);}while(r); }else{ do{ *_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_Y+ 1 ; if(!qbevent)break;evnt(30959);}while(r); S_34513:; if (((-(*_SUB_IDEFINDAGAIN_LONG_Y==(*_SUB_IDEFINDAGAIN_LONG_START+ 1 )))&(-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(30960);if(r)goto S_34513;} do{ SUB_IDENOMATCH(); if(!qbevent)break;evnt(30961);}while(r); S_34515:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(30962);if(r)goto S_34515;} S_34516:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(30963);if(r)goto S_34516;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(30963);}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(30963);}while(r); } do{ *__INTEGER_IDEFINDINVERT= 0 ; if(!qbevent)break;evnt(30964);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(30966);}while(r); } S_34525:; if ((-(*_SUB_IDEFINDAGAIN_LONG_Y>*__LONG_IDEN))||new_error){ if(qbevent){evnt(30968);if(r)goto S_34525;} do{ *_SUB_IDEFINDAGAIN_LONG_Y= 1 ; if(!qbevent)break;evnt(30968);}while(r); do{ *_SUB_IDEFINDAGAIN_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(30968);}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(30969);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free97.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDEGETLINE(int32*_FUNC_IDEGETLINE_LONG_I){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data98.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_34531:; if ((-(*_FUNC_IDEGETLINE_LONG_I!= -1 ))||new_error){ if(qbevent){evnt(30975);if(r)goto S_34531;} do{ SUB_IDEGOTOLINE(_FUNC_IDEGETLINE_LONG_I); if(!qbevent)break;evnt(30975);}while(r); } do{ qbs_set(_FUNC_IDEGETLINE_STRING_IDEGETLINE,func_mid(__STRING_IDET,*__LONG_IDELI+ 4 ,string2l(func_mid(__STRING_IDET,*__LONG_IDELI, 4 ,1)),1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30976);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free98.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEGETLINE_STRING_IDEGETLINE);return _FUNC_IDEGETLINE_STRING_IDEGETLINE; } void SUB_IDEGOTOLINE(int32*_SUB_IDEGOTOLINE_LONG_I){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data99.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_34535:; if ((-(*__LONG_IDEL==*_SUB_IDEGOTOLINE_LONG_I))||new_error){ if(qbevent){evnt(30980);if(r)goto S_34535;} do{ goto exit_subfunc; if(!qbevent)break;evnt(30980);}while(r); } S_34538:; if ((-(*_SUB_IDEGOTOLINE_LONG_I< 1 ))||new_error){ if(qbevent){evnt(30981);if(r)goto S_34538;} do{ error( 5 ); if(!qbevent)break;evnt(30981);}while(r); } S_34541:; if ((-(*_SUB_IDEGOTOLINE_LONG_I<*__LONG_IDEL))||new_error){ if(qbevent){evnt(30983);if(r)goto S_34541;} S_34542:; do{ if(qbevent){evnt(30984);if(r)goto S_34542;} do{ *__LONG_IDEL=*__LONG_IDEL- 1 ; if(!qbevent)break;evnt(30985);}while(r); do{ *__LONG_IDELI=*__LONG_IDELI-string2l(func_mid(__STRING_IDET,*__LONG_IDELI- 4 , 4 ,1))- 8 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30986);}while(r); S_34545:; }while((!(-(*__LONG_IDEL==*_SUB_IDEGOTOLINE_LONG_I)))&&(!new_error)); dl_exit_3947:; if(qbevent){evnt(30987);if(r)goto S_34545;} do{ goto exit_subfunc; if(!qbevent)break;evnt(30988);}while(r); } S_34548:; do{ if(qbevent){evnt(30991);if(r)goto S_34548;} S_34549:; if ((-(*__LONG_IDEL==*__LONG_IDEN))||new_error){ if(qbevent){evnt(30992);if(r)goto S_34549;} do{ qbs_set(__STRING_IDET,qbs_add(qbs_add(__STRING_IDET,l2string( 0 )),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30992);}while(r); do{ *__LONG_IDEN=*__LONG_IDEN+ 1 ; if(!qbevent)break;evnt(30992);}while(r); } do{ *__LONG_IDEL=*__LONG_IDEL+ 1 ; if(!qbevent)break;evnt(30993);}while(r); do{ *__LONG_IDELI=*__LONG_IDELI+string2l(func_mid(__STRING_IDET,*__LONG_IDELI, 4 ,1))+ 8 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(30994);}while(r); S_34555:; }while((!(-(*__LONG_IDEL==*_SUB_IDEGOTOLINE_LONG_I)))&&(!new_error)); dl_exit_3948:; if(qbevent){evnt(30995);if(r)goto S_34555;} exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free99.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_IDEHBAR(int32*_FUNC_IDEHBAR_LONG_X,int32*_FUNC_IDEHBAR_LONG_Y,int32*_FUNC_IDEHBAR_LONG_H,int32*_FUNC_IDEHBAR_LONG_I2,int32*_FUNC_IDEHBAR_LONG_N2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data100.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_I2; if(!qbevent)break;evnt(30999);}while(r); do{ *_FUNC_IDEHBAR_LONG_N=*_FUNC_IDEHBAR_LONG_N2; if(!qbevent)break;evnt(30999);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(31017);}while(r); do{ qbg_sub_locate(*_FUNC_IDEHBAR_LONG_Y,*_FUNC_IDEHBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31018);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr( 27 )); if (new_error) goto skip3949; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3949: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31018);}while(r); do{ qbg_sub_locate(*_FUNC_IDEHBAR_LONG_Y,*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31019);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr( 26 )); if (new_error) goto skip3950; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3950: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31019);}while(r); S_34563:; fornext_value3952=*_FUNC_IDEHBAR_LONG_X+ 1 ; fornext_finalvalue3952=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ; fornext_step3952= 1 ; if (fornext_step3952<0) fornext_step_negative3952=1; else fornext_step_negative3952=0; if (new_error) goto fornext_error3952; goto fornext_entrylabel3952; while(1){ fornext_value3952=fornext_step3952+(*_FUNC_IDEHBAR_LONG_X2); fornext_entrylabel3952: *_FUNC_IDEHBAR_LONG_X2=fornext_value3952; if (fornext_step_negative3952){ if (fornext_value3952fornext_finalvalue3952) break; } fornext_error3952:; if(qbevent){evnt(31020);if(r)goto S_34563;} do{ qbg_sub_locate(*_FUNC_IDEHBAR_LONG_Y,*_FUNC_IDEHBAR_LONG_X2,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31021);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\260",1)); if (new_error) goto skip3953; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3953: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31021);}while(r); } fornext_exit_3951:; S_34567:; if ((-(*_FUNC_IDEHBAR_LONG_N< 1 ))||new_error){ if(qbevent){evnt(31026);if(r)goto S_34567;} do{ *_FUNC_IDEHBAR_LONG_N= 1 ; if(!qbevent)break;evnt(31026);}while(r); } S_34570:; if ((-(*_FUNC_IDEHBAR_LONG_I< 1 ))||new_error){ if(qbevent){evnt(31027);if(r)goto S_34570;} do{ *_FUNC_IDEHBAR_LONG_I= 1 ; if(!qbevent)break;evnt(31027);}while(r); } S_34573:; if ((-(*_FUNC_IDEHBAR_LONG_I>*_FUNC_IDEHBAR_LONG_N))||new_error){ if(qbevent){evnt(31028);if(r)goto S_34573;} do{ *_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_N; if(!qbevent)break;evnt(31028);}while(r); } S_34576:; if ((-(*_FUNC_IDEHBAR_LONG_H== 2 ))||new_error){ if(qbevent){evnt(31030);if(r)goto S_34576;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X; if(!qbevent)break;evnt(31031);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31032);}while(r); } S_34580:; if ((-(*_FUNC_IDEHBAR_LONG_H== 3 ))||new_error){ if(qbevent){evnt(31035);if(r)goto S_34580;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(31036);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31038);}while(r); } S_34584:; if ((-(*_FUNC_IDEHBAR_LONG_H== 4 ))||new_error){ if(qbevent){evnt(31041);if(r)goto S_34584;} S_34585:; if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(31042);if(r)goto S_34585;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(31043);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31045);}while(r); }else{ do{ *_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(31048);}while(r); S_34590:; if ((-(((float)(*_FUNC_IDEHBAR_SINGLE_P))<((float)( 0.5E+0 ))))||new_error){ if(qbevent){evnt(31049);if(r)goto S_34590;} do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(31049);}while(r); }else{ do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 2 ; if(!qbevent)break;evnt(31049);}while(r); } do{ qbg_sub_locate(*_FUNC_IDEHBAR_LONG_Y,*_FUNC_IDEHBAR_LONG_X2,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31050);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip3954; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3954: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31050);}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(31051);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31052);}while(r); } } S_34601:; if ((-(*_FUNC_IDEHBAR_LONG_H> 4 ))||new_error){ if(qbevent){evnt(31056);if(r)goto S_34601;} S_34602:; if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(31057);if(r)goto S_34602;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+(*_FUNC_IDEHBAR_LONG_H/ 4 ); if(!qbevent)break;evnt(31058);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31060);}while(r); } S_34606:; if ((-(*_FUNC_IDEHBAR_LONG_I== 1 ))||new_error){ if(qbevent){evnt(31062);if(r)goto S_34606;} do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(31063);}while(r); do{ qbg_sub_locate(*_FUNC_IDEHBAR_LONG_Y,*_FUNC_IDEHBAR_LONG_X2,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31064);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip3955; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3955: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31064);}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(31065);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31066);}while(r); } S_34613:; if ((-(*_FUNC_IDEHBAR_LONG_I==*_FUNC_IDEHBAR_LONG_N))||new_error){ if(qbevent){evnt(31068);if(r)goto S_34613;} do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ; if(!qbevent)break;evnt(31069);}while(r); do{ qbg_sub_locate(*_FUNC_IDEHBAR_LONG_Y,*_FUNC_IDEHBAR_LONG_X2,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31070);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip3956; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3956: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31070);}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(31071);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31072);}while(r); } do{ *_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(31075);}while(r); do{ *_FUNC_IDEHBAR_SINGLE_P=*_FUNC_IDEHBAR_SINGLE_P*(*_FUNC_IDEHBAR_LONG_H- 4 ); if(!qbevent)break;evnt(31076);}while(r); do{ *_FUNC_IDEHBAR_LONG_X2=qbr(*_FUNC_IDEHBAR_LONG_X+ 2 +floor(*_FUNC_IDEHBAR_SINGLE_P)); if(!qbevent)break;evnt(31077);}while(r); do{ qbg_sub_locate(*_FUNC_IDEHBAR_LONG_Y,*_FUNC_IDEHBAR_LONG_X2,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31078);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip3957; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3957: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31078);}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(31079);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31080);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free100.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEHBAR_LONG_IDEHBAR; } int32 FUNC_IDEHLEN(qbs*_FUNC_IDEHLEN_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data101.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_34628:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEHLEN_STRING_A,qbs_new_txt_len("#",1),0)))||new_error){ if(qbevent){evnt(31087);if(r)goto S_34628;} do{ *_FUNC_IDEHLEN_LONG_IDEHLEN=_FUNC_IDEHLEN_STRING_A->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31087);}while(r); }else{ do{ *_FUNC_IDEHLEN_LONG_IDEHLEN=_FUNC_IDEHLEN_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31087);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free101.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEHLEN_LONG_IDEHLEN; } void SUB_IDEHPRINT(qbs*_SUB_IDEHPRINT_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data102.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(31091);}while(r); S_34634:; fornext_value3963= 1 ; fornext_finalvalue3963=_SUB_IDEHPRINT_STRING_A->len; fornext_step3963= 1 ; if (fornext_step3963<0) fornext_step_negative3963=1; else fornext_step_negative3963=0; if (new_error) goto fornext_error3963; goto fornext_entrylabel3963; while(1){ fornext_value3963=fornext_step3963+(*_SUB_IDEHPRINT_LONG_I); fornext_entrylabel3963: *_SUB_IDEHPRINT_LONG_I=fornext_value3963; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3963){ if (fornext_value3963fornext_finalvalue3963) break; } fornext_error3963:; if(qbevent){evnt(31092);if(r)goto S_34634;} do{ qbs_set(_SUB_IDEHPRINT_STRING_C,func_mid(_SUB_IDEHPRINT_STRING_A,*_SUB_IDEHPRINT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31093);}while(r); S_34636:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEHPRINT_STRING_C,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(31094);if(r)goto S_34636;} S_34637:; if ((*__LONG_IDEHL)||new_error){ if(qbevent){evnt(31095);if(r)goto S_34637;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(31095);}while(r); } }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDEHPRINT_STRING_C); if (new_error) goto skip3965; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3965: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31097);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(31097);}while(r); } } fornext_exit_3962:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free102.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEINSLINE(int32*_SUB_IDEINSLINE_LONG_I,qbs*_SUB_IDEINSLINE_STRING_TEXT){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data103.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_34645:; fornext_value3968= 1 ; fornext_finalvalue3968=*__LONG_IDEBMKN; fornext_step3968= 1 ; if (fornext_step3968<0) fornext_step_negative3968=1; else fornext_step_negative3968=0; if (new_error) goto fornext_error3968; goto fornext_entrylabel3968; while(1){ fornext_value3968=fornext_step3968+(*_SUB_IDEINSLINE_LONG_B); fornext_entrylabel3968: *_SUB_IDEINSLINE_LONG_B=fornext_value3968; if (fornext_step_negative3968){ if (fornext_value3968fornext_finalvalue3968) break; } fornext_error3968:; if(qbevent){evnt(31105);if(r)goto S_34645;} S_34646:; if ((-(*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDEINSLINE_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))>=*_SUB_IDEINSLINE_LONG_I))||new_error){ if(qbevent){evnt(31106);if(r)goto S_34646;} do{ *_SUB_IDEINSLINE_LONG_Y=*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDEINSLINE_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))+ 1 ; if(!qbevent)break;evnt(31107);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDEINSLINE_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16))=*_SUB_IDEINSLINE_LONG_Y; if(!qbevent)break;evnt(31108);}while(r); } } fornext_exit_3967:; do{ qbs_set(_SUB_IDEINSLINE_STRING_TEXT,qbs_rtrim(_SUB_IDEINSLINE_STRING_TEXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31112);}while(r); S_34652:; if ((-(*_SUB_IDEINSLINE_LONG_I== -1 ))||new_error){ if(qbevent){evnt(31114);if(r)goto S_34652;} do{ *_SUB_IDEINSLINE_LONG_I=*__LONG_IDEL; if(!qbevent)break;evnt(31114);}while(r); } S_34655:; if ((-(*_SUB_IDEINSLINE_LONG_I>*__LONG_IDEN))||new_error){ if(qbevent){evnt(31116);if(r)goto S_34655;} do{ SUB_IDESETLINE(_SUB_IDEINSLINE_LONG_I,_SUB_IDEINSLINE_STRING_TEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31117);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31118);}while(r); } do{ SUB_IDEGOTOLINE(_SUB_IDEINSLINE_LONG_I); if(!qbevent)break;evnt(31120);}while(r); do{ *_SUB_IDEINSLINE_LONG_TEXTLEN=_SUB_IDEINSLINE_STRING_TEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31122);}while(r); do{ qbs_set(__STRING_IDET,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_IDET,*__LONG_IDELI- 1 ),l2string(*_SUB_IDEINSLINE_LONG_TEXTLEN)),_SUB_IDEINSLINE_STRING_TEXT),l2string(*_SUB_IDEINSLINE_LONG_TEXTLEN)),qbs_right(__STRING_IDET,__STRING_IDET->len-*__LONG_IDELI+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31123);}while(r); do{ *__LONG_IDEN=*__LONG_IDEN+ 1 ; if(!qbevent)break;evnt(31124);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free103.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDENEWSF(qbs*_SUB_IDENEWSF_STRING_SF){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data104.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(31131);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(31132);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31133);}while(r); do{ *_SUB_IDENEWSF_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31134);}while(r); do{ if(!qbevent)break;evnt(31135);}while(r); do{ if (_SUB_IDENEWSF_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_SUB_IDENEWSF_ARRAY_UDT_O[2]&1){ error(10); }else{ _SUB_IDENEWSF_ARRAY_UDT_O[4]= 1 ; _SUB_IDENEWSF_ARRAY_UDT_O[5]=( 100 )-_SUB_IDENEWSF_ARRAY_UDT_O[4]+1; _SUB_IDENEWSF_ARRAY_UDT_O[6]=1; if (_SUB_IDENEWSF_ARRAY_UDT_O[2]&4){ _SUB_IDENEWSF_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_SUB_IDENEWSF_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_SUB_IDENEWSF_ARRAY_UDT_O[0]),0,_SUB_IDENEWSF_ARRAY_UDT_O[5]*640/8+1); }else{ _SUB_IDENEWSF_ARRAY_UDT_O[0]=(ptrszint)calloc(_SUB_IDENEWSF_ARRAY_UDT_O[5]*640/8+1,1); if (!_SUB_IDENEWSF_ARRAY_UDT_O[0]) error(257); } _SUB_IDENEWSF_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(31136);}while(r); do{ if(!qbevent)break;evnt(31137);}while(r); do{ if(!qbevent)break;evnt(31138);}while(r); do{ qbs_set(_SUB_IDENEWSF_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31139);}while(r); S_34672:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(31145);if(r)goto S_34672;} S_34673:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(31146);if(r)goto S_34673;} do{ qbs_set(_SUB_IDENEWSF_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31147);}while(r); do{ qbs_set(_SUB_IDENEWSF_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31148);}while(r); do{ *_SUB_IDENEWSF_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(31149);}while(r); do{ *_SUB_IDENEWSF_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(31149);}while(r); S_34678:; if ((-(*_SUB_IDENEWSF_LONG_SX2<*_SUB_IDENEWSF_LONG_SX1))||new_error){ if(qbevent){evnt(31150);if(r)goto S_34678;} do{ swap_32(&*_SUB_IDENEWSF_LONG_SX1,&*_SUB_IDENEWSF_LONG_SX2); if(!qbevent)break;evnt(31150);}while(r); } S_34681:; fornext_value3973=*_SUB_IDENEWSF_LONG_SX1; fornext_finalvalue3973=*_SUB_IDENEWSF_LONG_SX2- 1 ; fornext_step3973= 1 ; if (fornext_step3973<0) fornext_step_negative3973=1; else fornext_step_negative3973=0; if (new_error) goto fornext_error3973; goto fornext_entrylabel3973; while(1){ fornext_value3973=fornext_step3973+(*_SUB_IDENEWSF_LONG_X); fornext_entrylabel3973: *_SUB_IDENEWSF_LONG_X=fornext_value3973; if (fornext_step_negative3973){ if (fornext_value3973fornext_finalvalue3973) break; } fornext_error3973:; if(qbevent){evnt(31151);if(r)goto S_34681;} S_34682:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDENEWSF_LONG_X<=_SUB_IDENEWSF_STRING_A->len)))||new_error){ if(qbevent){evnt(31152);if(r)goto S_34682;} do{ qbs_set(_SUB_IDENEWSF_STRING_A2,qbs_add(_SUB_IDENEWSF_STRING_A2,func_mid(_SUB_IDENEWSF_STRING_A,*_SUB_IDENEWSF_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31152);}while(r); }else{ do{ qbs_set(_SUB_IDENEWSF_STRING_A2,qbs_add(_SUB_IDENEWSF_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31152);}while(r); } } fornext_exit_3972:; } } do{ *_SUB_IDENEWSF_LONG_I= 0 ; if(!qbevent)break;evnt(31157);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_SUB_IDENEWSF_UDT_P)) + (0) ),&(pass3975= 60 ),&(pass3976= 5 ),qbs_add(qbs_new_txt_len("New ",4),_SUB_IDENEWSF_STRING_SF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31159);}while(r); do{ *_SUB_IDENEWSF_LONG_I=*_SUB_IDENEWSF_LONG_I+ 1 ; if(!qbevent)break;evnt(31161);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(31162);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(31163);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Name",5)); if(!qbevent)break;evnt(31164);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_SUB_IDENEWSF_STRING_A2); if(!qbevent)break;evnt(31165);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+72))=_SUB_IDENEWSF_STRING_A2->len; if(!qbevent)break;evnt(31166);}while(r); do{ *_SUB_IDENEWSF_LONG_I=*_SUB_IDENEWSF_LONG_I+ 1 ; if(!qbevent)break;evnt(31168);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(31169);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(31170);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_SUB_IDENEWSF_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(31171);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(31172);}while(r); S_34703:; fornext_value3979= 1 ; fornext_finalvalue3979= 100 ; fornext_step3979= 1 ; if (fornext_step3979<0) fornext_step_negative3979=1; else fornext_step_negative3979=0; if (new_error) goto fornext_error3979; goto fornext_entrylabel3979; while(1){ fornext_value3979=fornext_step3979+(*_SUB_IDENEWSF_LONG_I); fornext_entrylabel3979: *_SUB_IDENEWSF_LONG_I=fornext_value3979; if (fornext_step_negative3979){ if (fornext_value3979fornext_finalvalue3979) break; } fornext_error3979:; if(qbevent){evnt(31176);if(r)goto S_34703;} do{ memcpy((((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80)),(((char*)_SUB_IDENEWSF_UDT_P)+(0)),20); if(!qbevent)break;evnt(31176);}while(r); } fornext_exit_3978:; S_34706:; do{ if(qbevent){evnt(31179);if(r)goto S_34706;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_SUB_IDENEWSF_UDT_P)) + (0) )); if(!qbevent)break;evnt(31183);}while(r); do{ *_SUB_IDENEWSF_LONG_F= 1 ; if(!qbevent)break;evnt(31184);}while(r); do{ *_SUB_IDENEWSF_LONG_CX= 0 ; if(!qbevent)break;evnt(31184);}while(r); do{ *_SUB_IDENEWSF_LONG_CY= 0 ; if(!qbevent)break;evnt(31184);}while(r); S_34711:; fornext_value3982= 1 ; fornext_finalvalue3982= 100 ; fornext_step3982= 1 ; if (fornext_step3982<0) fornext_step_negative3982=1; else fornext_step_negative3982=0; if (new_error) goto fornext_error3982; goto fornext_entrylabel3982; while(1){ fornext_value3982=fornext_step3982+(*_SUB_IDENEWSF_LONG_I); fornext_entrylabel3982: *_SUB_IDENEWSF_LONG_I=fornext_value3982; if (fornext_step_negative3982){ if (fornext_value3982fornext_finalvalue3982) break; } fornext_error3982:; if(qbevent){evnt(31185);if(r)goto S_34711;} S_34712:; if ((*(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(31186);if(r)goto S_34712;} do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+60))=*_SUB_IDENEWSF_LONG_FOCUS-*_SUB_IDENEWSF_LONG_F; if(!qbevent)break;evnt(31189);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(31190);}while(r); do{ *(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(31190);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_SUB_IDENEWSF_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80) ),_SUB_IDENEWSF_LONG_F); if(!qbevent)break;evnt(31191);}while(r); S_34717:; if ((*(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(31192);if(r)goto S_34717;} do{ *_SUB_IDENEWSF_LONG_CX=*(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(31192);}while(r); do{ *_SUB_IDENEWSF_LONG_CY=*(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(31192);}while(r); } } } fornext_exit_3981:; do{ *_SUB_IDENEWSF_LONG_LASTFOCUS=*_SUB_IDENEWSF_LONG_F- 1 ; if(!qbevent)break;evnt(31195);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(31202);}while(r); S_34725:; if ((*_SUB_IDENEWSF_LONG_CX)||new_error){ if(qbevent){evnt(31203);if(r)goto S_34725;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31203);}while(r); do{ qbg_sub_locate(*_SUB_IDENEWSF_LONG_CY,*_SUB_IDENEWSF_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(31203);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31203);}while(r); } do{ *_SUB_IDENEWSF_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(31206);}while(r); S_34731:; do{ if(qbevent){evnt(31207);if(r)goto S_34731;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(31208);}while(r); S_34733:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(31209);if(r)goto S_34733;} do{ *_SUB_IDENEWSF_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31209);}while(r); } S_34736:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(31210);if(r)goto S_34736;} do{ *_SUB_IDENEWSF_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31210);}while(r); } S_34739:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(31211);if(r)goto S_34739;} do{ *_SUB_IDENEWSF_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(31211);}while(r); do{ *_SUB_IDENEWSF_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31211);}while(r); } S_34743:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(31212);if(r)goto S_34743;} do{ *_SUB_IDENEWSF_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(31212);}while(r); do{ *_SUB_IDENEWSF_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31212);}while(r); } S_34747:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(31213);if(r)goto S_34747;} do{ *_SUB_IDENEWSF_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31213);}while(r); } do{ *_SUB_IDENEWSF_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(31214);}while(r); S_34751:; if ((-(*_SUB_IDENEWSF_LONG_ALT!=*_SUB_IDENEWSF_LONG_OLDALT))||new_error){ if(qbevent){evnt(31214);if(r)goto S_34751;} do{ *_SUB_IDENEWSF_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31214);}while(r); } do{ *_SUB_IDENEWSF_LONG_OLDALT=*_SUB_IDENEWSF_LONG_ALT; if(!qbevent)break;evnt(31215);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(31216);}while(r); S_34756:; }while((!(*_SUB_IDENEWSF_LONG_CHANGE))&&(!new_error)); dl_exit_3983:; if(qbevent){evnt(31217);if(r)goto S_34756;} S_34757:; if ((*_SUB_IDENEWSF_LONG_ALT)||new_error){ if(qbevent){evnt(31218);if(r)goto S_34757;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(31218);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(31218);}while(r); } do{ qbs_set(_SUB_IDENEWSF_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31220);}while(r); S_34763:; if ((*_SUB_IDENEWSF_LONG_ALT)||new_error){ if(qbevent){evnt(31221);if(r)goto S_34763;} S_34764:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(31222);if(r)goto S_34764;} do{ *_SUB_IDENEWSF_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31223);}while(r); S_34766:; if (((-(*_SUB_IDENEWSF_LONG_K>= 65 ))&(-(*_SUB_IDENEWSF_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(31224);if(r)goto S_34766;} do{ qbs_set(_SUB_IDENEWSF_STRING_ALTLETTER,func_chr(*_SUB_IDENEWSF_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31224);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31227);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(31227);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31227);}while(r); do{ *_SUB_IDENEWSF_LONG_INFO= 0 ; if(!qbevent)break;evnt(31231);}while(r); S_34775:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(31232);if(r)goto S_34775;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31232);}while(r); } S_34778:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31233);if(r)goto S_34778;} do{ *_SUB_IDENEWSF_LONG_FOCUS=*_SUB_IDENEWSF_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(31233);}while(r); } S_34781:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31234);if(r)goto S_34781;} do{ *_SUB_IDENEWSF_LONG_FOCUS=*_SUB_IDENEWSF_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(31234);}while(r); } S_34784:; if ((-(*_SUB_IDENEWSF_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(31235);if(r)goto S_34784;} do{ *_SUB_IDENEWSF_LONG_FOCUS=*_SUB_IDENEWSF_LONG_LASTFOCUS; if(!qbevent)break;evnt(31235);}while(r); } S_34787:; if ((-(*_SUB_IDENEWSF_LONG_FOCUS>*_SUB_IDENEWSF_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(31236);if(r)goto S_34787;} do{ *_SUB_IDENEWSF_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31236);}while(r); } do{ *_SUB_IDENEWSF_LONG_F= 1 ; if(!qbevent)break;evnt(31237);}while(r); S_34791:; fornext_value3986= 1 ; fornext_finalvalue3986= 100 ; fornext_step3986= 1 ; if (fornext_step3986<0) fornext_step_negative3986=1; else fornext_step_negative3986=0; if (new_error) goto fornext_error3986; goto fornext_entrylabel3986; while(1){ fornext_value3986=fornext_step3986+(*_SUB_IDENEWSF_LONG_I); fornext_entrylabel3986: *_SUB_IDENEWSF_LONG_I=fornext_value3986; if (fornext_step_negative3986){ if (fornext_value3986fornext_finalvalue3986) break; } fornext_error3986:; if(qbevent){evnt(31238);if(r)goto S_34791;} do{ *_SUB_IDENEWSF_LONG_T=*(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(31239);}while(r); S_34793:; if ((*_SUB_IDENEWSF_LONG_T)||new_error){ if(qbevent){evnt(31240);if(r)goto S_34793;} do{ *_SUB_IDENEWSF_LONG_FOCUSOFFSET=*_SUB_IDENEWSF_LONG_FOCUS-*_SUB_IDENEWSF_LONG_F; if(!qbevent)break;evnt(31241);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_SUB_IDENEWSF_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDENEWSF_LONG_I)-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80) ),_SUB_IDENEWSF_LONG_FOCUS,_SUB_IDENEWSF_LONG_F,_SUB_IDENEWSF_LONG_FOCUSOFFSET,__STRING_K,_SUB_IDENEWSF_STRING_ALTLETTER,__LONG_MB,_SUB_IDENEWSF_LONG_MOUSEDOWN,_SUB_IDENEWSF_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_SUB_IDENEWSF_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31242);}while(r); } } fornext_exit_3985:; S_34798:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_SUB_IDENEWSF_LONG_FOCUS== 3 ))&(-(*_SUB_IDENEWSF_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(31249);if(r)goto S_34798;} do{ goto exit_subfunc; if(!qbevent)break;evnt(31250);}while(r); } S_34801:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_SUB_IDENEWSF_LONG_FOCUS== 2 ))&(-(*_SUB_IDENEWSF_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(31253);if(r)goto S_34801;} do{ *_SUB_IDENEWSF_LONG_Y=*__LONG_IDEN; if(!qbevent)break;evnt(31254);}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(31255);}while(r); do{ SUB_IDESETLINE(_SUB_IDENEWSF_LONG_Y,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31255);}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(31256);}while(r); do{ SUB_IDESETLINE(_SUB_IDENEWSF_LONG_Y,qbs_add(qbs_add(_SUB_IDENEWSF_STRING_SF,qbs_new_txt_len(" ",1)),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDENEWSF_ARRAY_UDT_O[0])+((array_check(( 1 )-_SUB_IDENEWSF_ARRAY_UDT_O[4],_SUB_IDENEWSF_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31256);}while(r); do{ *__LONG_IDESY=*_SUB_IDENEWSF_LONG_Y; if(!qbevent)break;evnt(31257);}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(31258);}while(r); do{ SUB_IDESETLINE(_SUB_IDENEWSF_LONG_Y,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31258);}while(r); do{ *__LONG_IDECY=*_SUB_IDENEWSF_LONG_Y; if(!qbevent)break;evnt(31259);}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(31260);}while(r); do{ SUB_IDESETLINE(_SUB_IDENEWSF_LONG_Y,qbs_add(qbs_new_txt_len("END ",4),_SUB_IDENEWSF_STRING_SF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31260);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(31261);}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(31261);}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(31262);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31263);}while(r); } do{ *_SUB_IDENEWSF_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(31268);}while(r); do{ *_SUB_IDENEWSF_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(31269);}while(r); }while(1); dl_exit_3980:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free104.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_IDENEWTXT(qbs*_FUNC_IDENEWTXT_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data105.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__INTEGER_IDETXTLAST=*__INTEGER_IDETXTLAST+ 1 ; if(!qbevent)break;evnt(31277);}while(r); do{ tmp_long=array_check((*__INTEGER_IDETXTLAST)-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDENEWTXT_STRING_A); if(!qbevent)break;evnt(31278);}while(r); do{ *_FUNC_IDENEWTXT_LONG_IDENEWTXT=*__INTEGER_IDETXTLAST; if(!qbevent)break;evnt(31279);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free105.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDENEWTXT_LONG_IDENEWTXT; } void SUB_IDENOMATCH(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data106.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(31285);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(31286);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(31287);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31288);}while(r); do{ *_SUB_IDENOMATCH_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31289);}while(r); do{ if(!qbevent)break;evnt(31290);}while(r); do{ if (_SUB_IDENOMATCH_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_SUB_IDENOMATCH_ARRAY_UDT_O[2]&1){ error(10); }else{ _SUB_IDENOMATCH_ARRAY_UDT_O[4]= 1 ; _SUB_IDENOMATCH_ARRAY_UDT_O[5]=( 100 )-_SUB_IDENOMATCH_ARRAY_UDT_O[4]+1; _SUB_IDENOMATCH_ARRAY_UDT_O[6]=1; if (_SUB_IDENOMATCH_ARRAY_UDT_O[2]&4){ _SUB_IDENOMATCH_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_SUB_IDENOMATCH_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_SUB_IDENOMATCH_ARRAY_UDT_O[0]),0,_SUB_IDENOMATCH_ARRAY_UDT_O[5]*640/8+1); }else{ _SUB_IDENOMATCH_ARRAY_UDT_O[0]=(ptrszint)calloc(_SUB_IDENOMATCH_ARRAY_UDT_O[5]*640/8+1,1); if (!_SUB_IDENOMATCH_ARRAY_UDT_O[0]) error(257); } _SUB_IDENOMATCH_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(31291);}while(r); do{ if(!qbevent)break;evnt(31292);}while(r); do{ if(!qbevent)break;evnt(31293);}while(r); do{ qbs_set(_SUB_IDENOMATCH_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31294);}while(r); do{ *_SUB_IDENOMATCH_LONG_I= 0 ; if(!qbevent)break;evnt(31298);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_SUB_IDENOMATCH_UDT_P)) + (0) ),&(pass3988= 19 ),&(pass3989= 4 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31299);}while(r); do{ *_SUB_IDENOMATCH_LONG_I=*_SUB_IDENOMATCH_LONG_I+ 1 ; if(!qbevent)break;evnt(31300);}while(r); do{ *(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(31301);}while(r); do{ *(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(31302);}while(r); do{ *(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_new_txt_len("OK",2)); if(!qbevent)break;evnt(31303);}while(r); do{ *(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(31304);}while(r); S_34841:; fornext_value3991= 1 ; fornext_finalvalue3991= 100 ; fornext_step3991= 1 ; if (fornext_step3991<0) fornext_step_negative3991=1; else fornext_step_negative3991=0; if (new_error) goto fornext_error3991; goto fornext_entrylabel3991; while(1){ fornext_value3991=fornext_step3991+(*_SUB_IDENOMATCH_LONG_I); fornext_entrylabel3991: *_SUB_IDENOMATCH_LONG_I=fornext_value3991; if (fornext_step_negative3991){ if (fornext_value3991fornext_finalvalue3991) break; } fornext_error3991:; if(qbevent){evnt(31308);if(r)goto S_34841;} do{ memcpy((((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80)),(((char*)_SUB_IDENOMATCH_UDT_P)+(0)),20); if(!qbevent)break;evnt(31308);}while(r); } fornext_exit_3990:; S_34844:; do{ if(qbevent){evnt(31311);if(r)goto S_34844;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_SUB_IDENOMATCH_UDT_P)) + (0) )); if(!qbevent)break;evnt(31314);}while(r); do{ *_SUB_IDENOMATCH_LONG_F= 1 ; if(!qbevent)break;evnt(31315);}while(r); do{ *_SUB_IDENOMATCH_LONG_CX= 0 ; if(!qbevent)break;evnt(31315);}while(r); do{ *_SUB_IDENOMATCH_LONG_CY= 0 ; if(!qbevent)break;evnt(31315);}while(r); S_34849:; fornext_value3994= 1 ; fornext_finalvalue3994= 100 ; fornext_step3994= 1 ; if (fornext_step3994<0) fornext_step_negative3994=1; else fornext_step_negative3994=0; if (new_error) goto fornext_error3994; goto fornext_entrylabel3994; while(1){ fornext_value3994=fornext_step3994+(*_SUB_IDENOMATCH_LONG_I); fornext_entrylabel3994: *_SUB_IDENOMATCH_LONG_I=fornext_value3994; if (fornext_step_negative3994){ if (fornext_value3994fornext_finalvalue3994) break; } fornext_error3994:; if(qbevent){evnt(31316);if(r)goto S_34849;} S_34850:; if ((*(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(31317);if(r)goto S_34850;} do{ *(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+60))=*_SUB_IDENOMATCH_LONG_FOCUS-*_SUB_IDENOMATCH_LONG_F; if(!qbevent)break;evnt(31319);}while(r); do{ *(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(31320);}while(r); do{ *(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(31320);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_SUB_IDENOMATCH_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80) ),_SUB_IDENOMATCH_LONG_F); if(!qbevent)break;evnt(31321);}while(r); S_34855:; if ((*(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(31322);if(r)goto S_34855;} do{ *_SUB_IDENOMATCH_LONG_CX=*(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(31322);}while(r); do{ *_SUB_IDENOMATCH_LONG_CY=*(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(31322);}while(r); } } } fornext_exit_3993:; do{ *_SUB_IDENOMATCH_LONG_LASTFOCUS=*_SUB_IDENOMATCH_LONG_F- 1 ; if(!qbevent)break;evnt(31325);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(31329);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_SUB_IDENOMATCH_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_SUB_IDENOMATCH_UDT_P)+(0))+ 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31329);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Match not found",15)); if (new_error) goto skip3995; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip3995: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31329);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(31333);}while(r); S_34866:; if ((*_SUB_IDENOMATCH_LONG_CX)||new_error){ if(qbevent){evnt(31334);if(r)goto S_34866;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31334);}while(r); do{ qbg_sub_locate(*_SUB_IDENOMATCH_LONG_CY,*_SUB_IDENOMATCH_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(31334);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31334);}while(r); } do{ *_SUB_IDENOMATCH_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(31337);}while(r); S_34872:; do{ if(qbevent){evnt(31338);if(r)goto S_34872;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(31339);}while(r); S_34874:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(31340);if(r)goto S_34874;} do{ *_SUB_IDENOMATCH_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31340);}while(r); } S_34877:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(31341);if(r)goto S_34877;} do{ *_SUB_IDENOMATCH_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31341);}while(r); } S_34880:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(31342);if(r)goto S_34880;} do{ *_SUB_IDENOMATCH_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(31342);}while(r); do{ *_SUB_IDENOMATCH_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31342);}while(r); } S_34884:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(31343);if(r)goto S_34884;} do{ *_SUB_IDENOMATCH_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(31343);}while(r); do{ *_SUB_IDENOMATCH_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31343);}while(r); } S_34888:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(31344);if(r)goto S_34888;} do{ *_SUB_IDENOMATCH_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31344);}while(r); } do{ *_SUB_IDENOMATCH_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(31345);}while(r); S_34892:; if ((-(*_SUB_IDENOMATCH_LONG_ALT!=*_SUB_IDENOMATCH_LONG_OLDALT))||new_error){ if(qbevent){evnt(31345);if(r)goto S_34892;} do{ *_SUB_IDENOMATCH_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31345);}while(r); } do{ *_SUB_IDENOMATCH_LONG_OLDALT=*_SUB_IDENOMATCH_LONG_ALT; if(!qbevent)break;evnt(31346);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(31347);}while(r); S_34897:; }while((!(*_SUB_IDENOMATCH_LONG_CHANGE))&&(!new_error)); dl_exit_3996:; if(qbevent){evnt(31348);if(r)goto S_34897;} S_34898:; if ((*_SUB_IDENOMATCH_LONG_ALT)||new_error){ if(qbevent){evnt(31349);if(r)goto S_34898;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(31349);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(31349);}while(r); } do{ qbs_set(_SUB_IDENOMATCH_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31351);}while(r); S_34904:; if ((*_SUB_IDENOMATCH_LONG_ALT)||new_error){ if(qbevent){evnt(31352);if(r)goto S_34904;} S_34905:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(31353);if(r)goto S_34905;} do{ *_SUB_IDENOMATCH_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31354);}while(r); S_34907:; if (((-(*_SUB_IDENOMATCH_LONG_K>= 65 ))&(-(*_SUB_IDENOMATCH_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(31355);if(r)goto S_34907;} do{ qbs_set(_SUB_IDENOMATCH_STRING_ALTLETTER,func_chr(*_SUB_IDENOMATCH_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31355);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31358);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(31358);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31358);}while(r); S_34915:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(31361);if(r)goto S_34915;} do{ qbs_set(_SUB_IDENOMATCH_STRING_ALTLETTER,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31361);}while(r); } S_34918:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(31362);if(r)goto S_34918;} do{ qbs_set(_SUB_IDENOMATCH_STRING_ALTLETTER,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31362);}while(r); } do{ *_SUB_IDENOMATCH_LONG_INFO= 0 ; if(!qbevent)break;evnt(31365);}while(r); S_34922:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(31366);if(r)goto S_34922;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31366);}while(r); } S_34925:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31367);if(r)goto S_34925;} do{ *_SUB_IDENOMATCH_LONG_FOCUS=*_SUB_IDENOMATCH_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(31367);}while(r); } S_34928:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31368);if(r)goto S_34928;} do{ *_SUB_IDENOMATCH_LONG_FOCUS=*_SUB_IDENOMATCH_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(31368);}while(r); } S_34931:; if ((-(*_SUB_IDENOMATCH_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(31369);if(r)goto S_34931;} do{ *_SUB_IDENOMATCH_LONG_FOCUS=*_SUB_IDENOMATCH_LONG_LASTFOCUS; if(!qbevent)break;evnt(31369);}while(r); } S_34934:; if ((-(*_SUB_IDENOMATCH_LONG_FOCUS>*_SUB_IDENOMATCH_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(31370);if(r)goto S_34934;} do{ *_SUB_IDENOMATCH_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31370);}while(r); } do{ *_SUB_IDENOMATCH_LONG_F= 1 ; if(!qbevent)break;evnt(31371);}while(r); S_34938:; fornext_value3999= 1 ; fornext_finalvalue3999= 100 ; fornext_step3999= 1 ; if (fornext_step3999<0) fornext_step_negative3999=1; else fornext_step_negative3999=0; if (new_error) goto fornext_error3999; goto fornext_entrylabel3999; while(1){ fornext_value3999=fornext_step3999+(*_SUB_IDENOMATCH_LONG_I); fornext_entrylabel3999: *_SUB_IDENOMATCH_LONG_I=fornext_value3999; if (fornext_step_negative3999){ if (fornext_value3999fornext_finalvalue3999) break; } fornext_error3999:; if(qbevent){evnt(31372);if(r)goto S_34938;} do{ *_SUB_IDENOMATCH_LONG_T=*(int32*)(((char*)_SUB_IDENOMATCH_ARRAY_UDT_O[0])+((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(31373);}while(r); S_34940:; if ((*_SUB_IDENOMATCH_LONG_T)||new_error){ if(qbevent){evnt(31374);if(r)goto S_34940;} do{ *_SUB_IDENOMATCH_LONG_FOCUSOFFSET=*_SUB_IDENOMATCH_LONG_FOCUS-*_SUB_IDENOMATCH_LONG_F; if(!qbevent)break;evnt(31375);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_SUB_IDENOMATCH_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDENOMATCH_LONG_I)-_SUB_IDENOMATCH_ARRAY_UDT_O[4],_SUB_IDENOMATCH_ARRAY_UDT_O[5]))*80) ),_SUB_IDENOMATCH_LONG_FOCUS,_SUB_IDENOMATCH_LONG_F,_SUB_IDENOMATCH_LONG_FOCUSOFFSET,__STRING_K,_SUB_IDENOMATCH_STRING_ALTLETTER,__LONG_MB,_SUB_IDENOMATCH_LONG_MOUSEDOWN,_SUB_IDENOMATCH_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_SUB_IDENOMATCH_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31376);}while(r); } } fornext_exit_3998:; S_34945:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(31381);if(r)goto S_34945;} do{ goto exit_subfunc; if(!qbevent)break;evnt(31382);}while(r); } S_34948:; if ((*_SUB_IDENOMATCH_LONG_INFO)||new_error){ if(qbevent){evnt(31385);if(r)goto S_34948;} do{ goto exit_subfunc; if(!qbevent)break;evnt(31386);}while(r); } do{ *_SUB_IDENOMATCH_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(31391);}while(r); do{ *_SUB_IDENOMATCH_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(31392);}while(r); }while(1); dl_exit_3992:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free106.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDEOPEN(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data107.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(31398);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(31401);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(31402);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31403);}while(r); do{ *_FUNC_IDEOPEN_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31404);}while(r); do{ if(!qbevent)break;evnt(31405);}while(r); do{ if (_FUNC_IDEOPEN_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEOPEN_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEOPEN_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEOPEN_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4]+1; _FUNC_IDEOPEN_ARRAY_UDT_O[6]=1; if (_FUNC_IDEOPEN_ARRAY_UDT_O[2]&4){ _FUNC_IDEOPEN_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEOPEN_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEOPEN_ARRAY_UDT_O[0]),0,_FUNC_IDEOPEN_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEOPEN_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEOPEN_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEOPEN_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEOPEN_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(31406);}while(r); do{ if(!qbevent)break;evnt(31407);}while(r); do{ if(!qbevent)break;evnt(31408);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31409);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_PATH,__STRING_IDEPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31413);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_FILELIST,FUNC_IDEZFILELIST(_FUNC_IDEOPEN_STRING_PATH,_FUNC_IDEOPEN_LONG_ALLFILES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31414);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_PATHLIST,FUNC_IDEZPATHLIST(_FUNC_IDEOPEN_STRING_PATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31415);}while(r); do{ *_FUNC_IDEOPEN_LONG_I= 0 ; if(!qbevent)break;evnt(31417);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEOPEN_UDT_P)) + (0) ),&(pass4000= 70 ),&(pass4001=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 7 ),qbs_new_txt_len("Open",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31418);}while(r); do{ *_FUNC_IDEOPEN_LONG_I=*_FUNC_IDEOPEN_LONG_I+ 1 ; if(!qbevent)break;evnt(31419);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(31420);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(31421);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("File #Name",10)); if(!qbevent)break;evnt(31422);}while(r); do{ *_FUNC_IDEOPEN_LONG_I=*_FUNC_IDEOPEN_LONG_I+ 1 ; if(!qbevent)break;evnt(31423);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(31424);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(31425);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+28))= 32 ; if(!qbevent)break;evnt(31426);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 14 ; if(!qbevent)break;evnt(31426);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Files",6)); if(!qbevent)break;evnt(31427);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEOPEN_STRING_FILELIST); if(!qbevent)break;evnt(31428);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_FILELIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31428);}while(r); do{ *_FUNC_IDEOPEN_LONG_I=*_FUNC_IDEOPEN_LONG_I+ 1 ; if(!qbevent)break;evnt(31429);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(31430);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+20))= 37 ; if(!qbevent)break;evnt(31431);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(31431);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+28))= 31 ; if(!qbevent)break;evnt(31432);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 16 ; if(!qbevent)break;evnt(31432);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Paths",6)); if(!qbevent)break;evnt(31433);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEOPEN_STRING_PATHLIST); if(!qbevent)break;evnt(31434);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_PATHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31434);}while(r); do{ *_FUNC_IDEOPEN_LONG_I=*_FUNC_IDEOPEN_LONG_I+ 1 ; if(!qbevent)break;evnt(31435);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(31436);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+20))= 37 ; if(!qbevent)break;evnt(31437);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 9 ; if(!qbevent)break;evnt(31438);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len(".BAS Only",9)); if(!qbevent)break;evnt(31439);}while(r); S_34995:; if ((*_FUNC_IDEOPEN_LONG_ALLFILES)||new_error){ if(qbevent){evnt(31440);if(r)goto S_34995;} do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= 0 ; if(!qbevent)break;evnt(31440);}while(r); }else{ do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(31440);}while(r); } do{ *_FUNC_IDEOPEN_LONG_I=*_FUNC_IDEOPEN_LONG_I+ 1 ; if(!qbevent)break;evnt(31441);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(31442);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 7 ; if(!qbevent)break;evnt(31443);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDEOPEN_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(31444);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(31445);}while(r); S_35005:; fornext_value4003= 1 ; fornext_finalvalue4003= 100 ; fornext_step4003= 1 ; if (fornext_step4003<0) fornext_step_negative4003=1; else fornext_step_negative4003=0; if (new_error) goto fornext_error4003; goto fornext_entrylabel4003; while(1){ fornext_value4003=fornext_step4003+(*_FUNC_IDEOPEN_LONG_I); fornext_entrylabel4003: *_FUNC_IDEOPEN_LONG_I=fornext_value4003; if (fornext_step_negative4003){ if (fornext_value4003fornext_finalvalue4003) break; } fornext_error4003:; if(qbevent){evnt(31449);if(r)goto S_35005;} do{ memcpy((((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEOPEN_UDT_P)+(0)),20); if(!qbevent)break;evnt(31449);}while(r); } fornext_exit_4002:; S_35008:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEOPENFILE->len))||new_error){ if(qbevent){evnt(31452);if(r)goto S_35008;} do{ qbs_set(_FUNC_IDEOPEN_STRING_F,__STRING_IDEOPENFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31452);}while(r); do{ goto LABEL_DIRECTLOAD; if(!qbevent)break;evnt(31452);}while(r); } S_35012:; do{ if(qbevent){evnt(31454);if(r)goto S_35012;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEOPEN_UDT_P)) + (0) )); if(!qbevent)break;evnt(31457);}while(r); do{ *_FUNC_IDEOPEN_LONG_F= 1 ; if(!qbevent)break;evnt(31458);}while(r); do{ *_FUNC_IDEOPEN_LONG_CX= 0 ; if(!qbevent)break;evnt(31458);}while(r); do{ *_FUNC_IDEOPEN_LONG_CY= 0 ; if(!qbevent)break;evnt(31458);}while(r); S_35017:; fornext_value4007= 1 ; fornext_finalvalue4007= 100 ; fornext_step4007= 1 ; if (fornext_step4007<0) fornext_step_negative4007=1; else fornext_step_negative4007=0; if (new_error) goto fornext_error4007; goto fornext_entrylabel4007; while(1){ fornext_value4007=fornext_step4007+(*_FUNC_IDEOPEN_LONG_I); fornext_entrylabel4007: *_FUNC_IDEOPEN_LONG_I=fornext_value4007; if (fornext_step_negative4007){ if (fornext_value4007fornext_finalvalue4007) break; } fornext_error4007:; if(qbevent){evnt(31459);if(r)goto S_35017;} S_35018:; if ((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(31460);if(r)goto S_35018;} do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEOPEN_LONG_FOCUS-*_FUNC_IDEOPEN_LONG_F; if(!qbevent)break;evnt(31462);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(31463);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(31463);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEOPEN_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEOPEN_LONG_F); if(!qbevent)break;evnt(31464);}while(r); S_35023:; if ((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(31465);if(r)goto S_35023;} do{ *_FUNC_IDEOPEN_LONG_CX=*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(31465);}while(r); do{ *_FUNC_IDEOPEN_LONG_CY=*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(31465);}while(r); } } } fornext_exit_4006:; do{ *_FUNC_IDEOPEN_LONG_LASTFOCUS=*_FUNC_IDEOPEN_LONG_F- 1 ; if(!qbevent)break;evnt(31468);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(31472);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDEOPEN_UDT_P)+(4))+ 4 ,*(int32*)(((char*)_FUNC_IDEOPEN_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31472);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Path: ",6)); if (new_error) goto skip4008; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4008: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31472);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_A,_FUNC_IDEOPEN_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31473);}while(r); do{ *_FUNC_IDEOPEN_LONG_W=*(int32*)(((char*)_FUNC_IDEOPEN_UDT_P)+(8))- 8 ; if(!qbevent)break;evnt(31474);}while(r); S_35035:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDEOPEN_STRING_A->len)>(*_FUNC_IDEOPEN_LONG_W- 3 ))))||new_error){ if(qbevent){evnt(31475);if(r)goto S_35035;} do{ qbs_set(_FUNC_IDEOPEN_STRING_A,qbs_add(qbs_new_txt_len("\372\372\372",3),qbs_right(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_W- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31475);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_IDEOPEN_STRING_A); if (new_error) goto skip4010; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4010: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31476);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(31481);}while(r); S_35040:; if ((*_FUNC_IDEOPEN_LONG_CX)||new_error){ if(qbevent){evnt(31482);if(r)goto S_35040;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31482);}while(r); do{ qbg_sub_locate(*_FUNC_IDEOPEN_LONG_CY,*_FUNC_IDEOPEN_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(31482);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31482);}while(r); } do{ *_FUNC_IDEOPEN_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(31485);}while(r); S_35046:; do{ if(qbevent){evnt(31486);if(r)goto S_35046;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(31487);}while(r); S_35048:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(31488);if(r)goto S_35048;} do{ *_FUNC_IDEOPEN_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31488);}while(r); } S_35051:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(31489);if(r)goto S_35051;} do{ *_FUNC_IDEOPEN_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31489);}while(r); } S_35054:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(31490);if(r)goto S_35054;} do{ *_FUNC_IDEOPEN_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(31490);}while(r); do{ *_FUNC_IDEOPEN_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31490);}while(r); } S_35058:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(31491);if(r)goto S_35058;} do{ *_FUNC_IDEOPEN_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(31491);}while(r); do{ *_FUNC_IDEOPEN_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31491);}while(r); } S_35062:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(31492);if(r)goto S_35062;} do{ *_FUNC_IDEOPEN_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31492);}while(r); } do{ *_FUNC_IDEOPEN_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(31493);}while(r); S_35066:; if ((-(*_FUNC_IDEOPEN_LONG_ALT!=*_FUNC_IDEOPEN_LONG_OLDALT))||new_error){ if(qbevent){evnt(31493);if(r)goto S_35066;} do{ *_FUNC_IDEOPEN_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31493);}while(r); } do{ *_FUNC_IDEOPEN_LONG_OLDALT=*_FUNC_IDEOPEN_LONG_ALT; if(!qbevent)break;evnt(31494);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(31495);}while(r); S_35071:; }while((!(*_FUNC_IDEOPEN_LONG_CHANGE))&&(!new_error)); dl_exit_4011:; if(qbevent){evnt(31496);if(r)goto S_35071;} S_35072:; if ((*_FUNC_IDEOPEN_LONG_ALT)||new_error){ if(qbevent){evnt(31497);if(r)goto S_35072;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(31497);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(31497);}while(r); } do{ qbs_set(_FUNC_IDEOPEN_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31499);}while(r); S_35078:; if ((*_FUNC_IDEOPEN_LONG_ALT)||new_error){ if(qbevent){evnt(31500);if(r)goto S_35078;} S_35079:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(31501);if(r)goto S_35079;} do{ *_FUNC_IDEOPEN_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31502);}while(r); S_35081:; if (((-(*_FUNC_IDEOPEN_LONG_K>= 65 ))&(-(*_FUNC_IDEOPEN_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(31503);if(r)goto S_35081;} do{ qbs_set(_FUNC_IDEOPEN_STRING_ALTLETTER,func_chr(*_FUNC_IDEOPEN_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31503);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31506);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(31506);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31506);}while(r); do{ *_FUNC_IDEOPEN_LONG_INFO= 0 ; if(!qbevent)break;evnt(31510);}while(r); S_35090:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(31511);if(r)goto S_35090;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31511);}while(r); } S_35093:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31512);if(r)goto S_35093;} do{ *_FUNC_IDEOPEN_LONG_FOCUS=*_FUNC_IDEOPEN_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(31512);}while(r); } S_35096:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31513);if(r)goto S_35096;} do{ *_FUNC_IDEOPEN_LONG_FOCUS=*_FUNC_IDEOPEN_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(31513);}while(r); } S_35099:; if ((-(*_FUNC_IDEOPEN_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(31514);if(r)goto S_35099;} do{ *_FUNC_IDEOPEN_LONG_FOCUS=*_FUNC_IDEOPEN_LONG_LASTFOCUS; if(!qbevent)break;evnt(31514);}while(r); } S_35102:; if ((-(*_FUNC_IDEOPEN_LONG_FOCUS>*_FUNC_IDEOPEN_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(31515);if(r)goto S_35102;} do{ *_FUNC_IDEOPEN_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31515);}while(r); } do{ *_FUNC_IDEOPEN_LONG_F= 1 ; if(!qbevent)break;evnt(31516);}while(r); S_35106:; fornext_value4014= 1 ; fornext_finalvalue4014= 100 ; fornext_step4014= 1 ; if (fornext_step4014<0) fornext_step_negative4014=1; else fornext_step_negative4014=0; if (new_error) goto fornext_error4014; goto fornext_entrylabel4014; while(1){ fornext_value4014=fornext_step4014+(*_FUNC_IDEOPEN_LONG_I); fornext_entrylabel4014: *_FUNC_IDEOPEN_LONG_I=fornext_value4014; if (fornext_step_negative4014){ if (fornext_value4014fornext_finalvalue4014) break; } fornext_error4014:; if(qbevent){evnt(31517);if(r)goto S_35106;} do{ *_FUNC_IDEOPEN_LONG_T=*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(31518);}while(r); S_35108:; if ((*_FUNC_IDEOPEN_LONG_T)||new_error){ if(qbevent){evnt(31519);if(r)goto S_35108;} do{ *_FUNC_IDEOPEN_LONG_FOCUSOFFSET=*_FUNC_IDEOPEN_LONG_FOCUS-*_FUNC_IDEOPEN_LONG_F; if(!qbevent)break;evnt(31520);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEOPEN_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEOPEN_LONG_I)-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEOPEN_LONG_FOCUS,_FUNC_IDEOPEN_LONG_F,_FUNC_IDEOPEN_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEOPEN_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEOPEN_LONG_MOUSEDOWN,_FUNC_IDEOPEN_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEOPEN_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31521);}while(r); } } fornext_exit_4013:; S_35113:; if (((-(*_FUNC_IDEOPEN_LONG_ALLFILES== 1 ))&(-(*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))!= 0 )))||new_error){ if(qbevent){evnt(31537);if(r)goto S_35113;} do{ *_FUNC_IDEOPEN_LONG_ALLFILES= 0 ; if(!qbevent)break;evnt(31538);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZFILELIST(_FUNC_IDEOPEN_STRING_PATH,_FUNC_IDEOPEN_LONG_ALLFILES)); if(!qbevent)break;evnt(31539);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31540);}while(r); do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(31541);}while(r); } S_35119:; if (((-(*_FUNC_IDEOPEN_LONG_ALLFILES== 0 ))&(-(*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))== 0 )))||new_error){ if(qbevent){evnt(31543);if(r)goto S_35119;} do{ *_FUNC_IDEOPEN_LONG_ALLFILES= 1 ; if(!qbevent)break;evnt(31544);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZFILELIST(_FUNC_IDEOPEN_STRING_PATH,_FUNC_IDEOPEN_LONG_ALLFILES)); if(!qbevent)break;evnt(31545);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31546);}while(r); do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(31547);}while(r); } S_35125:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEOPEN_LONG_FOCUS== 6 ))&(-(*_FUNC_IDEOPEN_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(31550);if(r)goto S_35125;} do{ qbs_set(_FUNC_IDEOPEN_STRING_IDEOPEN,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31551);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31552);}while(r); } S_35129:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(31555);if(r)goto S_35129;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); if(!qbevent)break;evnt(31556);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+72))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(31557);}while(r); } S_35133:; if ((-(*_FUNC_IDEOPEN_LONG_FOCUS== 3 ))||new_error){ if(qbevent){evnt(31560);if(r)goto S_35133;} S_35134:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(-(*_FUNC_IDEOPEN_LONG_INFO== 1 ))))||new_error){ if(qbevent){evnt(31561);if(r)goto S_35134;} do{ qbs_set(_FUNC_IDEOPEN_STRING_PATH,FUNC_IDEZCHANGEPATH(_FUNC_IDEOPEN_STRING_PATH,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31563);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZFILELIST(_FUNC_IDEOPEN_STRING_PATH,_FUNC_IDEOPEN_LONG_ALLFILES)); if(!qbevent)break;evnt(31564);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZPATHLIST(_FUNC_IDEOPEN_STRING_PATH)); if(!qbevent)break;evnt(31565);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31567);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(31568);}while(r); S_35140:; if ((-(*_FUNC_IDEOPEN_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(31569);if(r)goto S_35140;} do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31569);}while(r); } do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(31570);}while(r); } } S_35146:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEOPEN_LONG_INFO== 1 ))&(-(*_FUNC_IDEOPEN_LONG_FOCUS== 2 ))))|(((-(*_FUNC_IDEOPEN_LONG_FOCUS== 5 ))&(-(*_FUNC_IDEOPEN_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(31575);if(r)goto S_35146;} do{ qbs_set(_FUNC_IDEOPEN_STRING_F,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31576);}while(r); S_35148:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDEOPEN_STRING_F,qbs_new_txt_len("..",2)))|(qbs_equal(_FUNC_IDEOPEN_STRING_F,qbs_new_txt_len(".",1)))))||new_error){ if(qbevent){evnt(31579);if(r)goto S_35148;} do{ qbs_set(_FUNC_IDEOPEN_STRING_F,qbs_add(_FUNC_IDEOPEN_STRING_F,__STRING1_IDEPATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31579);}while(r); } S_35151:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEOPEN_STRING_F, 1 ),__STRING1_IDEPATHSEP)))||new_error){ if(qbevent){evnt(31580);if(r)goto S_35151;} do{ qbs_set(_FUNC_IDEOPEN_STRING_PATH,FUNC_IDEZGETFILEPATH(_FUNC_IDEOPEN_STRING_PATH,_FUNC_IDEOPEN_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31581);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(31582);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZFILELIST(_FUNC_IDEOPEN_STRING_PATH,_FUNC_IDEOPEN_LONG_ALLFILES)); if(!qbevent)break;evnt(31583);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31584);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZPATHLIST(_FUNC_IDEOPEN_STRING_PATH)); if(!qbevent)break;evnt(31585);}while(r); do{ *(int32*)(((char*)_FUNC_IDEOPEN_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEOPEN_ARRAY_UDT_O[4],_FUNC_IDEOPEN_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31586);}while(r); do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(31587);}while(r); } S_35160:; if ((qbs_cleanup(qbs_tmp_base,((qbs_notequal(qbs_lcase(qbs_right(_FUNC_IDEOPEN_STRING_F, 4 )),qbs_new_txt_len(".bas",4))))&(-(*_FUNC_IDEOPEN_LONG_ALLFILES== 0 ))))||new_error){ if(qbevent){evnt(31591);if(r)goto S_35160;} do{ qbs_set(_FUNC_IDEOPEN_STRING_F,qbs_add(_FUNC_IDEOPEN_STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31591);}while(r); } LABEL_DIRECTLOAD:; if(qbevent){evnt(31593);r=0;} do{ qbs_set(_FUNC_IDEOPEN_STRING_PATH,FUNC_IDEZGETFILEPATH(_FUNC_IDEOPEN_STRING_PATH,_FUNC_IDEOPEN_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31596);}while(r); do{ *__LONG_IDEERROR= 2 ; if(!qbevent)break;evnt(31598);}while(r); do{ sub_open(qbs_add(qbs_add(_FUNC_IDEOPEN_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEOPEN_STRING_F), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31599);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(31599);}while(r); do{ *__LONG_IDEERROR= 3 ; if(!qbevent)break;evnt(31601);}while(r); do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31602);}while(r); do{ *__LONG_IDEL= 1 ; if(!qbevent)break;evnt(31602);}while(r); do{ *__LONG_IDELI= 1 ; if(!qbevent)break;evnt(31602);}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(31602);}while(r); do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(31602);}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(31603);}while(r); do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(31604);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(31605);}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(31606);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(31607);}while(r); do{ SUB_LINEINPUT3LOAD(qbs_add(qbs_add(_FUNC_IDEOPEN_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEOPEN_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31608);}while(r); do{ qbs_set(__STRING_IDET,func_space(__STRING_LINEINPUT3BUFFER->len* 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31609);}while(r); do{ *_FUNC_IDEOPEN_LONG_I2= 1 ; if(!qbevent)break;evnt(31610);}while(r); do{ *_FUNC_IDEOPEN_LONG_N= 0 ; if(!qbevent)break;evnt(31611);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHRTAB,func_chr( 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31612);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_SPACE1,qbs_new_txt_len(" ",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31613);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_SPACE2,qbs_new_txt_len(" ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31613);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_SPACE3,qbs_new_txt_len(" ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31613);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_SPACE4,qbs_new_txt_len(" ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31613);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHR7,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31614);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHR11,func_chr( 11 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31614);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHR12,func_chr( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31614);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHR28,func_chr( 28 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31614);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHR29,func_chr( 29 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31614);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHR30,func_chr( 30 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31614);}while(r); do{ qbs_set(_FUNC_IDEOPEN_STRING_CHR31,func_chr( 31 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31614);}while(r); S_35194:; do{ if(qbevent){evnt(31615);if(r)goto S_35194;} do{ qbs_set(_FUNC_IDEOPEN_STRING_A,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31616);}while(r); do{ *_FUNC_IDEOPEN_LONG_L=_FUNC_IDEOPEN_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31617);}while(r); S_35197:; if ((*_FUNC_IDEOPEN_LONG_L)||new_error){ if(qbevent){evnt(31618);if(r)goto S_35197;} do{ *_FUNC_IDEOPEN_LONG_ASCA=qbs_asc(_FUNC_IDEOPEN_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31618);}while(r); }else{ do{ *_FUNC_IDEOPEN_LONG_ASCA= -1 ; if(!qbevent)break;evnt(31618);}while(r); } S_35202:; if ((-(*_FUNC_IDEOPEN_LONG_ASCA!= 13 ))||new_error){ if(qbevent){evnt(31619);if(r)goto S_35202;} S_35203:; if ((-(*_FUNC_IDEOPEN_LONG_ASCA!= -1 ))||new_error){ if(qbevent){evnt(31620);if(r)goto S_35203;} LABEL_IDEOPENFIXTABS:; if(qbevent){evnt(31622);r=0;} do{ *_FUNC_IDEOPEN_LONG_X=func_instr(NULL,_FUNC_IDEOPEN_STRING_A,_FUNC_IDEOPEN_STRING_CHRTAB,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31623);}while(r); S_35205:; if ((*_FUNC_IDEOPEN_LONG_X)||new_error){ if(qbevent){evnt(31624);if(r)goto S_35205;} do{ *_FUNC_IDEOPEN_LONG_X2=(*_FUNC_IDEOPEN_LONG_X- 1 )% 4 ; if(!qbevent)break;evnt(31625);}while(r); S_35207:; if ((-(*_FUNC_IDEOPEN_LONG_X2== 0 ))||new_error){ if(qbevent){evnt(31626);if(r)goto S_35207;} do{ qbs_set(_FUNC_IDEOPEN_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_X- 1 ),_FUNC_IDEOPEN_STRING_SPACE4),qbs_right(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_L-*_FUNC_IDEOPEN_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31626);}while(r); do{ *_FUNC_IDEOPEN_LONG_L=*_FUNC_IDEOPEN_LONG_L+ 3 ; if(!qbevent)break;evnt(31626);}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(31626);}while(r); } S_35212:; if ((-(*_FUNC_IDEOPEN_LONG_X2== 1 ))||new_error){ if(qbevent){evnt(31627);if(r)goto S_35212;} do{ qbs_set(_FUNC_IDEOPEN_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_X- 1 ),_FUNC_IDEOPEN_STRING_SPACE3),qbs_right(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_L-*_FUNC_IDEOPEN_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31627);}while(r); do{ *_FUNC_IDEOPEN_LONG_L=*_FUNC_IDEOPEN_LONG_L+ 2 ; if(!qbevent)break;evnt(31627);}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(31627);}while(r); } S_35217:; if ((-(*_FUNC_IDEOPEN_LONG_X2== 2 ))||new_error){ if(qbevent){evnt(31628);if(r)goto S_35217;} do{ qbs_set(_FUNC_IDEOPEN_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_X- 1 ),_FUNC_IDEOPEN_STRING_SPACE2),qbs_right(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_L-*_FUNC_IDEOPEN_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31628);}while(r); do{ *_FUNC_IDEOPEN_LONG_L=*_FUNC_IDEOPEN_LONG_L+ 1 ; if(!qbevent)break;evnt(31628);}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(31628);}while(r); } S_35222:; if ((-(*_FUNC_IDEOPEN_LONG_X2== 3 ))||new_error){ if(qbevent){evnt(31629);if(r)goto S_35222;} do{ qbs_set(_FUNC_IDEOPEN_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_X- 1 ),_FUNC_IDEOPEN_STRING_SPACE1),qbs_right(_FUNC_IDEOPEN_STRING_A,*_FUNC_IDEOPEN_LONG_L-*_FUNC_IDEOPEN_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31629);}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(31629);}while(r); } } } do{ sub_mid(__STRING_IDET,*_FUNC_IDEOPEN_LONG_I2,*_FUNC_IDEOPEN_LONG_L+ 8 ,qbs_add(qbs_add(l2string(*_FUNC_IDEOPEN_LONG_L),_FUNC_IDEOPEN_STRING_A),l2string(*_FUNC_IDEOPEN_LONG_L)),1); if(!qbevent)break;evnt(31632);}while(r); do{ *_FUNC_IDEOPEN_LONG_I2=*_FUNC_IDEOPEN_LONG_I2+*_FUNC_IDEOPEN_LONG_L+ 8 ; if(!qbevent)break;evnt(31632);}while(r); do{ *_FUNC_IDEOPEN_LONG_N=*_FUNC_IDEOPEN_LONG_N+ 1 ; if(!qbevent)break;evnt(31632);}while(r); } S_35232:; }while((!(-(*_FUNC_IDEOPEN_LONG_ASCA== 13 )))&&(!new_error)); dl_exit_4017:; if(qbevent){evnt(31634);if(r)goto S_35232;} do{ qbs_set(__STRING_LINEINPUT3BUFFER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31635);}while(r); do{ *__LONG_IDEN=*_FUNC_IDEOPEN_LONG_N; if(!qbevent)break;evnt(31636);}while(r); S_35235:; if ((-(*_FUNC_IDEOPEN_LONG_N== 0 ))||new_error){ if(qbevent){evnt(31636);if(r)goto S_35235;} do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31636);}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(31636);}while(r); }else{ do{ qbs_set(__STRING_IDET,qbs_left(__STRING_IDET,*_FUNC_IDEOPEN_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31636);}while(r); } do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(31637);}while(r); do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_IDEOPEN_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31638);}while(r); do{ sub__title(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - QB64",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31638);}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_IDEOPEN_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31639);}while(r); do{ SUB_IDEADDRECENT(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31640);}while(r); do{ SUB_IDEIMPORTBOOKMARKS(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31641);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31642);}while(r); } LABEL_IDEOPENLOOP:; if(qbevent){evnt(31645);r=0;} do{ *_FUNC_IDEOPEN_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(31648);}while(r); do{ *_FUNC_IDEOPEN_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(31649);}while(r); }while(1); dl_exit_4005:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free107.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEOPEN_STRING_IDEOPEN);return _FUNC_IDEOPEN_STRING_IDEOPEN; } void SUB_IDEPAR(void*_SUB_IDEPAR_UDT_PAR,int32*_SUB_IDEPAR_LONG_W,int32*_SUB_IDEPAR_LONG_H,qbs*_SUB_IDEPAR_STRING_TITLE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data108.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(0))=((*__LONG_IDEWX/ 2 ))-(*_SUB_IDEPAR_LONG_W/ 2 ); if(!qbevent)break;evnt(31654);}while(r); do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(4))=(((*__LONG_IDEWY+*__LONG_IDESUBWINDOW)/ 2 ))-(*_SUB_IDEPAR_LONG_H/ 2 ); if(!qbevent)break;evnt(31655);}while(r); do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(8))=*_SUB_IDEPAR_LONG_W; if(!qbevent)break;evnt(31656);}while(r); do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(12))=*_SUB_IDEPAR_LONG_H; if(!qbevent)break;evnt(31657);}while(r); S_35256:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEPAR_STRING_TITLE->len))||new_error){ if(qbevent){evnt(31658);if(r)goto S_35256;} do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(16))=FUNC_IDENEWTXT(_SUB_IDEPAR_STRING_TITLE); if(!qbevent)break;evnt(31658);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free108.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDERESTORE(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data109.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(31664);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(31665);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(31666);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31667);}while(r); do{ *_FUNC_IDERESTORE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31668);}while(r); do{ if(!qbevent)break;evnt(31669);}while(r); do{ if (_FUNC_IDERESTORE_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDERESTORE_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDERESTORE_ARRAY_UDT_O[4]= 1 ; _FUNC_IDERESTORE_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDERESTORE_ARRAY_UDT_O[4]+1; _FUNC_IDERESTORE_ARRAY_UDT_O[6]=1; if (_FUNC_IDERESTORE_ARRAY_UDT_O[2]&4){ _FUNC_IDERESTORE_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDERESTORE_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDERESTORE_ARRAY_UDT_O[0]),0,_FUNC_IDERESTORE_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDERESTORE_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDERESTORE_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDERESTORE_ARRAY_UDT_O[0]) error(257); } _FUNC_IDERESTORE_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(31670);}while(r); do{ if(!qbevent)break;evnt(31671);}while(r); do{ if(!qbevent)break;evnt(31672);}while(r); do{ qbs_set(_FUNC_IDERESTORE_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31673);}while(r); do{ *_FUNC_IDERESTORE_LONG_I= 0 ; if(!qbevent)break;evnt(31677);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDERESTORE_UDT_P)) + (0) ),&(pass4021= 43 ),&(pass4022= 4 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31679);}while(r); do{ *_FUNC_IDERESTORE_LONG_I=*_FUNC_IDERESTORE_LONG_I+ 1 ; if(!qbevent)break;evnt(31680);}while(r); do{ *(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(31681);}while(r); do{ *(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(31682);}while(r); do{ *(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#Yes",4),_FUNC_IDERESTORE_STRING1_SEP),qbs_new_txt_len("#No",3))); if(!qbevent)break;evnt(31683);}while(r); do{ *(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(31684);}while(r); S_35276:; fornext_value4024= 1 ; fornext_finalvalue4024= 100 ; fornext_step4024= 1 ; if (fornext_step4024<0) fornext_step_negative4024=1; else fornext_step_negative4024=0; if (new_error) goto fornext_error4024; goto fornext_entrylabel4024; while(1){ fornext_value4024=fornext_step4024+(*_FUNC_IDERESTORE_LONG_I); fornext_entrylabel4024: *_FUNC_IDERESTORE_LONG_I=fornext_value4024; if (fornext_step_negative4024){ if (fornext_value4024fornext_finalvalue4024) break; } fornext_error4024:; if(qbevent){evnt(31688);if(r)goto S_35276;} do{ memcpy((((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDERESTORE_UDT_P)+(0)),20); if(!qbevent)break;evnt(31688);}while(r); } fornext_exit_4023:; S_35279:; do{ if(qbevent){evnt(31691);if(r)goto S_35279;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDERESTORE_UDT_P)) + (0) )); if(!qbevent)break;evnt(31694);}while(r); do{ *_FUNC_IDERESTORE_LONG_F= 1 ; if(!qbevent)break;evnt(31695);}while(r); do{ *_FUNC_IDERESTORE_LONG_CX= 0 ; if(!qbevent)break;evnt(31695);}while(r); do{ *_FUNC_IDERESTORE_LONG_CY= 0 ; if(!qbevent)break;evnt(31695);}while(r); S_35284:; fornext_value4027= 1 ; fornext_finalvalue4027= 100 ; fornext_step4027= 1 ; if (fornext_step4027<0) fornext_step_negative4027=1; else fornext_step_negative4027=0; if (new_error) goto fornext_error4027; goto fornext_entrylabel4027; while(1){ fornext_value4027=fornext_step4027+(*_FUNC_IDERESTORE_LONG_I); fornext_entrylabel4027: *_FUNC_IDERESTORE_LONG_I=fornext_value4027; if (fornext_step_negative4027){ if (fornext_value4027fornext_finalvalue4027) break; } fornext_error4027:; if(qbevent){evnt(31696);if(r)goto S_35284;} S_35285:; if ((*(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(31697);if(r)goto S_35285;} do{ *(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDERESTORE_LONG_FOCUS-*_FUNC_IDERESTORE_LONG_F; if(!qbevent)break;evnt(31699);}while(r); do{ *(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(31700);}while(r); do{ *(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(31700);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDERESTORE_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80) ),_FUNC_IDERESTORE_LONG_F); if(!qbevent)break;evnt(31701);}while(r); S_35290:; if ((*(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(31702);if(r)goto S_35290;} do{ *_FUNC_IDERESTORE_LONG_CX=*(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(31702);}while(r); do{ *_FUNC_IDERESTORE_LONG_CY=*(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(31702);}while(r); } } } fornext_exit_4026:; do{ *_FUNC_IDERESTORE_LONG_LASTFOCUS=*_FUNC_IDERESTORE_LONG_F- 1 ; if(!qbevent)break;evnt(31705);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(31709);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDERESTORE_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDERESTORE_UDT_P)+(0))+ 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31709);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Recover program from auto-saved backup?",39)); if (new_error) goto skip4028; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4028: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31709);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(31713);}while(r); S_35301:; if ((*_FUNC_IDERESTORE_LONG_CX)||new_error){ if(qbevent){evnt(31714);if(r)goto S_35301;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31714);}while(r); do{ qbg_sub_locate(*_FUNC_IDERESTORE_LONG_CY,*_FUNC_IDERESTORE_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(31714);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31714);}while(r); } do{ *_FUNC_IDERESTORE_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(31717);}while(r); S_35307:; do{ if(qbevent){evnt(31718);if(r)goto S_35307;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(31719);}while(r); S_35309:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(31720);if(r)goto S_35309;} do{ *_FUNC_IDERESTORE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31720);}while(r); } S_35312:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(31721);if(r)goto S_35312;} do{ *_FUNC_IDERESTORE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31721);}while(r); } S_35315:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(31722);if(r)goto S_35315;} do{ *_FUNC_IDERESTORE_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(31722);}while(r); do{ *_FUNC_IDERESTORE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31722);}while(r); } S_35319:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(31723);if(r)goto S_35319;} do{ *_FUNC_IDERESTORE_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(31723);}while(r); do{ *_FUNC_IDERESTORE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31723);}while(r); } S_35323:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(31724);if(r)goto S_35323;} do{ *_FUNC_IDERESTORE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31724);}while(r); } do{ *_FUNC_IDERESTORE_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(31725);}while(r); S_35327:; if ((-(*_FUNC_IDERESTORE_LONG_ALT!=*_FUNC_IDERESTORE_LONG_OLDALT))||new_error){ if(qbevent){evnt(31725);if(r)goto S_35327;} do{ *_FUNC_IDERESTORE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31725);}while(r); } do{ *_FUNC_IDERESTORE_LONG_OLDALT=*_FUNC_IDERESTORE_LONG_ALT; if(!qbevent)break;evnt(31726);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(31727);}while(r); S_35332:; }while((!(*_FUNC_IDERESTORE_LONG_CHANGE))&&(!new_error)); dl_exit_4029:; if(qbevent){evnt(31728);if(r)goto S_35332;} S_35333:; if ((*_FUNC_IDERESTORE_LONG_ALT)||new_error){ if(qbevent){evnt(31729);if(r)goto S_35333;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(31729);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(31729);}while(r); } do{ qbs_set(_FUNC_IDERESTORE_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31731);}while(r); S_35339:; if ((*_FUNC_IDERESTORE_LONG_ALT)||new_error){ if(qbevent){evnt(31732);if(r)goto S_35339;} S_35340:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(31733);if(r)goto S_35340;} do{ *_FUNC_IDERESTORE_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31734);}while(r); S_35342:; if (((-(*_FUNC_IDERESTORE_LONG_K>= 65 ))&(-(*_FUNC_IDERESTORE_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(31735);if(r)goto S_35342;} do{ qbs_set(_FUNC_IDERESTORE_STRING_ALTLETTER,func_chr(*_FUNC_IDERESTORE_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31735);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31738);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(31738);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31738);}while(r); S_35350:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(31741);if(r)goto S_35350;} do{ qbs_set(_FUNC_IDERESTORE_STRING_ALTLETTER,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31741);}while(r); } S_35353:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(31742);if(r)goto S_35353;} do{ qbs_set(_FUNC_IDERESTORE_STRING_ALTLETTER,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31742);}while(r); } do{ *_FUNC_IDERESTORE_LONG_INFO= 0 ; if(!qbevent)break;evnt(31745);}while(r); S_35357:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(31746);if(r)goto S_35357;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31746);}while(r); } S_35360:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31747);if(r)goto S_35360;} do{ *_FUNC_IDERESTORE_LONG_FOCUS=*_FUNC_IDERESTORE_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(31747);}while(r); } S_35363:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31748);if(r)goto S_35363;} do{ *_FUNC_IDERESTORE_LONG_FOCUS=*_FUNC_IDERESTORE_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(31748);}while(r); } S_35366:; if ((-(*_FUNC_IDERESTORE_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(31749);if(r)goto S_35366;} do{ *_FUNC_IDERESTORE_LONG_FOCUS=*_FUNC_IDERESTORE_LONG_LASTFOCUS; if(!qbevent)break;evnt(31749);}while(r); } S_35369:; if ((-(*_FUNC_IDERESTORE_LONG_FOCUS>*_FUNC_IDERESTORE_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(31750);if(r)goto S_35369;} do{ *_FUNC_IDERESTORE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31750);}while(r); } do{ *_FUNC_IDERESTORE_LONG_F= 1 ; if(!qbevent)break;evnt(31751);}while(r); S_35373:; fornext_value4032= 1 ; fornext_finalvalue4032= 100 ; fornext_step4032= 1 ; if (fornext_step4032<0) fornext_step_negative4032=1; else fornext_step_negative4032=0; if (new_error) goto fornext_error4032; goto fornext_entrylabel4032; while(1){ fornext_value4032=fornext_step4032+(*_FUNC_IDERESTORE_LONG_I); fornext_entrylabel4032: *_FUNC_IDERESTORE_LONG_I=fornext_value4032; if (fornext_step_negative4032){ if (fornext_value4032fornext_finalvalue4032) break; } fornext_error4032:; if(qbevent){evnt(31752);if(r)goto S_35373;} do{ *_FUNC_IDERESTORE_LONG_T=*(int32*)(((char*)_FUNC_IDERESTORE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(31753);}while(r); S_35375:; if ((*_FUNC_IDERESTORE_LONG_T)||new_error){ if(qbevent){evnt(31754);if(r)goto S_35375;} do{ *_FUNC_IDERESTORE_LONG_FOCUSOFFSET=*_FUNC_IDERESTORE_LONG_FOCUS-*_FUNC_IDERESTORE_LONG_F; if(!qbevent)break;evnt(31755);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDERESTORE_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDERESTORE_LONG_I)-_FUNC_IDERESTORE_ARRAY_UDT_O[4],_FUNC_IDERESTORE_ARRAY_UDT_O[5]))*80) ),_FUNC_IDERESTORE_LONG_FOCUS,_FUNC_IDERESTORE_LONG_F,_FUNC_IDERESTORE_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDERESTORE_STRING_ALTLETTER,__LONG_MB,_FUNC_IDERESTORE_LONG_MOUSEDOWN,_FUNC_IDERESTORE_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDERESTORE_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31756);}while(r); } } fornext_exit_4031:; S_35380:; if ((*_FUNC_IDERESTORE_LONG_INFO)||new_error){ if(qbevent){evnt(31761);if(r)goto S_35380;} S_35381:; if ((-(*_FUNC_IDERESTORE_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(31762);if(r)goto S_35381;} do{ qbs_set(_FUNC_IDERESTORE_STRING_IDERESTORE,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31762);}while(r); }else{ do{ qbs_set(_FUNC_IDERESTORE_STRING_IDERESTORE,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31762);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(31763);}while(r); } do{ *_FUNC_IDERESTORE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(31767);}while(r); do{ *_FUNC_IDERESTORE_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(31768);}while(r); }while(1); dl_exit_4025:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free109.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDERESTORE_STRING_IDERESTORE);return _FUNC_IDERESTORE_STRING_IDERESTORE; } void SUB_IDESAVE(qbs*_SUB_IDESAVE_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data110.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_open(_SUB_IDESAVE_STRING_F, 4 ,NULL,NULL, 151 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31774);}while(r); S_35392:; fornext_value4035= 1 ; fornext_finalvalue4035=*__LONG_IDEN; fornext_step4035= 1 ; if (fornext_step4035<0) fornext_step_negative4035=1; else fornext_step_negative4035=0; if (new_error) goto fornext_error4035; goto fornext_entrylabel4035; while(1){ fornext_value4035=fornext_step4035+(*_SUB_IDESAVE_LONG_I); fornext_entrylabel4035: *_SUB_IDESAVE_LONG_I=fornext_value4035; if (fornext_step_negative4035){ if (fornext_value4035fornext_finalvalue4035) break; } fornext_error4035:; if(qbevent){evnt(31775);if(r)goto S_35392;} do{ qbs_set(_SUB_IDESAVE_STRING_A,FUNC_IDEGETLINE(_SUB_IDESAVE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31776);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 151 ; if (new_error) goto skip4036; sub_file_print(tmp_fileno,_SUB_IDESAVE_STRING_A, 0 , 0 , 1 ); if (new_error) goto skip4036; skip4036: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(31777);}while(r); } fornext_exit_4034:; do{ sub_close( 151 ,1); if(!qbevent)break;evnt(31779);}while(r); do{ SUB_IDESAVEBOOKMARKS(_SUB_IDESAVE_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31780);}while(r); do{ *__LONG_IDEUNSAVED= 0 ; if(!qbevent)break;evnt(31781);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free110.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDESAVEAS(qbs*_FUNC_IDESAVEAS_STRING_PROGRAMNAME){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data111.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(31786);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(31787);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31788);}while(r); do{ *_FUNC_IDESAVEAS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31789);}while(r); do{ if(!qbevent)break;evnt(31790);}while(r); do{ if (_FUNC_IDESAVEAS_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDESAVEAS_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDESAVEAS_ARRAY_UDT_O[4]= 1 ; _FUNC_IDESAVEAS_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4]+1; _FUNC_IDESAVEAS_ARRAY_UDT_O[6]=1; if (_FUNC_IDESAVEAS_ARRAY_UDT_O[2]&4){ _FUNC_IDESAVEAS_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESAVEAS_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDESAVEAS_ARRAY_UDT_O[0]),0,_FUNC_IDESAVEAS_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDESAVEAS_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDESAVEAS_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDESAVEAS_ARRAY_UDT_O[0]) error(257); } _FUNC_IDESAVEAS_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(31791);}while(r); do{ if(!qbevent)break;evnt(31792);}while(r); do{ if(!qbevent)break;evnt(31793);}while(r); do{ qbs_set(_FUNC_IDESAVEAS_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31794);}while(r); do{ qbs_set(_FUNC_IDESAVEAS_STRING_PATH,__STRING_IDEPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31798);}while(r); do{ qbs_set(_FUNC_IDESAVEAS_STRING_PATHLIST,FUNC_IDEZPATHLIST(_FUNC_IDESAVEAS_STRING_PATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31799);}while(r); do{ *_FUNC_IDESAVEAS_LONG_I= 0 ; if(!qbevent)break;evnt(31801);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDESAVEAS_UDT_P)) + (0) ),&(pass4038= 48 ),&(pass4039=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 7 ),qbs_new_txt_len("Save As",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31802);}while(r); do{ *_FUNC_IDESAVEAS_LONG_I=*_FUNC_IDESAVEAS_LONG_I+ 1 ; if(!qbevent)break;evnt(31804);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(31805);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(31806);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("File #Name",10)); if(!qbevent)break;evnt(31807);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDESAVEAS_STRING_PROGRAMNAME); if(!qbevent)break;evnt(31808);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDESAVEAS_STRING_PROGRAMNAME->len; if(!qbevent)break;evnt(31809);}while(r); do{ *_FUNC_IDESAVEAS_LONG_I=*_FUNC_IDESAVEAS_LONG_I+ 1 ; if(!qbevent)break;evnt(31818);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(31819);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(31821);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+28))= 44 ; if(!qbevent)break;evnt(31822);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 14 ; if(!qbevent)break;evnt(31822);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Paths",6)); if(!qbevent)break;evnt(31823);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDESAVEAS_STRING_PATHLIST); if(!qbevent)break;evnt(31824);}while(r); do{ qbs_set(_FUNC_IDESAVEAS_STRING_PATHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31824);}while(r); do{ *_FUNC_IDESAVEAS_LONG_I=*_FUNC_IDESAVEAS_LONG_I+ 1 ; if(!qbevent)break;evnt(31826);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(31827);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 7 ; if(!qbevent)break;evnt(31828);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDESAVEAS_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(31829);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(31830);}while(r); S_35431:; fornext_value4042= 1 ; fornext_finalvalue4042= 100 ; fornext_step4042= 1 ; if (fornext_step4042<0) fornext_step_negative4042=1; else fornext_step_negative4042=0; if (new_error) goto fornext_error4042; goto fornext_entrylabel4042; while(1){ fornext_value4042=fornext_step4042+(*_FUNC_IDESAVEAS_LONG_I); fornext_entrylabel4042: *_FUNC_IDESAVEAS_LONG_I=fornext_value4042; if (fornext_step_negative4042){ if (fornext_value4042fornext_finalvalue4042) break; } fornext_error4042:; if(qbevent){evnt(31834);if(r)goto S_35431;} do{ memcpy((((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDESAVEAS_UDT_P)+(0)),20); if(!qbevent)break;evnt(31834);}while(r); } fornext_exit_4041:; S_35434:; do{ if(qbevent){evnt(31837);if(r)goto S_35434;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDESAVEAS_UDT_P)) + (0) )); if(!qbevent)break;evnt(31840);}while(r); do{ *_FUNC_IDESAVEAS_LONG_F= 1 ; if(!qbevent)break;evnt(31841);}while(r); do{ *_FUNC_IDESAVEAS_LONG_CX= 0 ; if(!qbevent)break;evnt(31841);}while(r); do{ *_FUNC_IDESAVEAS_LONG_CY= 0 ; if(!qbevent)break;evnt(31841);}while(r); S_35439:; fornext_value4045= 1 ; fornext_finalvalue4045= 100 ; fornext_step4045= 1 ; if (fornext_step4045<0) fornext_step_negative4045=1; else fornext_step_negative4045=0; if (new_error) goto fornext_error4045; goto fornext_entrylabel4045; while(1){ fornext_value4045=fornext_step4045+(*_FUNC_IDESAVEAS_LONG_I); fornext_entrylabel4045: *_FUNC_IDESAVEAS_LONG_I=fornext_value4045; if (fornext_step_negative4045){ if (fornext_value4045fornext_finalvalue4045) break; } fornext_error4045:; if(qbevent){evnt(31842);if(r)goto S_35439;} S_35440:; if ((*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(31843);if(r)goto S_35440;} do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDESAVEAS_LONG_FOCUS-*_FUNC_IDESAVEAS_LONG_F; if(!qbevent)break;evnt(31845);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(31846);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(31846);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDESAVEAS_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESAVEAS_LONG_F); if(!qbevent)break;evnt(31847);}while(r); S_35445:; if ((*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(31848);if(r)goto S_35445;} do{ *_FUNC_IDESAVEAS_LONG_CX=*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(31848);}while(r); do{ *_FUNC_IDESAVEAS_LONG_CY=*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(31848);}while(r); } } } fornext_exit_4044:; do{ *_FUNC_IDESAVEAS_LONG_LASTFOCUS=*_FUNC_IDESAVEAS_LONG_F- 1 ; if(!qbevent)break;evnt(31851);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(31855);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDESAVEAS_UDT_P)+(4))+ 4 ,*(int32*)(((char*)_FUNC_IDESAVEAS_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(31855);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Path: ",6)); if (new_error) goto skip4046; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4046: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31855);}while(r); do{ qbs_set(_FUNC_IDESAVEAS_STRING_A,_FUNC_IDESAVEAS_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31856);}while(r); do{ *_FUNC_IDESAVEAS_LONG_W=*(int32*)(((char*)_FUNC_IDESAVEAS_UDT_P)+(8))- 8 ; if(!qbevent)break;evnt(31857);}while(r); S_35457:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDESAVEAS_STRING_A->len)>(*_FUNC_IDESAVEAS_LONG_W- 3 ))))||new_error){ if(qbevent){evnt(31858);if(r)goto S_35457;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_A,qbs_add(qbs_new_txt_len("\372\372\372",3),qbs_right(_FUNC_IDESAVEAS_STRING_A,*_FUNC_IDESAVEAS_LONG_W- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31858);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_IDESAVEAS_STRING_A); if (new_error) goto skip4048; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4048: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31859);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(31863);}while(r); S_35462:; if ((*_FUNC_IDESAVEAS_LONG_CX)||new_error){ if(qbevent){evnt(31864);if(r)goto S_35462;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31864);}while(r); do{ qbg_sub_locate(*_FUNC_IDESAVEAS_LONG_CY,*_FUNC_IDESAVEAS_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(31864);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31864);}while(r); } do{ *_FUNC_IDESAVEAS_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(31867);}while(r); S_35468:; do{ if(qbevent){evnt(31868);if(r)goto S_35468;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(31869);}while(r); S_35470:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(31870);if(r)goto S_35470;} do{ *_FUNC_IDESAVEAS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31870);}while(r); } S_35473:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(31871);if(r)goto S_35473;} do{ *_FUNC_IDESAVEAS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31871);}while(r); } S_35476:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(31872);if(r)goto S_35476;} do{ *_FUNC_IDESAVEAS_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(31872);}while(r); do{ *_FUNC_IDESAVEAS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31872);}while(r); } S_35480:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(31873);if(r)goto S_35480;} do{ *_FUNC_IDESAVEAS_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(31873);}while(r); do{ *_FUNC_IDESAVEAS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31873);}while(r); } S_35484:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(31874);if(r)goto S_35484;} do{ *_FUNC_IDESAVEAS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31874);}while(r); } do{ *_FUNC_IDESAVEAS_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(31875);}while(r); S_35488:; if ((-(*_FUNC_IDESAVEAS_LONG_ALT!=*_FUNC_IDESAVEAS_LONG_OLDALT))||new_error){ if(qbevent){evnt(31875);if(r)goto S_35488;} do{ *_FUNC_IDESAVEAS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(31875);}while(r); } do{ *_FUNC_IDESAVEAS_LONG_OLDALT=*_FUNC_IDESAVEAS_LONG_ALT; if(!qbevent)break;evnt(31876);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(31877);}while(r); S_35493:; }while((!(*_FUNC_IDESAVEAS_LONG_CHANGE))&&(!new_error)); dl_exit_4049:; if(qbevent){evnt(31878);if(r)goto S_35493;} S_35494:; if ((*_FUNC_IDESAVEAS_LONG_ALT)||new_error){ if(qbevent){evnt(31879);if(r)goto S_35494;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(31879);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(31879);}while(r); } do{ qbs_set(_FUNC_IDESAVEAS_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31881);}while(r); S_35500:; if ((*_FUNC_IDESAVEAS_LONG_ALT)||new_error){ if(qbevent){evnt(31882);if(r)goto S_35500;} S_35501:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(31883);if(r)goto S_35501;} do{ *_FUNC_IDESAVEAS_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31884);}while(r); S_35503:; if (((-(*_FUNC_IDESAVEAS_LONG_K>= 65 ))&(-(*_FUNC_IDESAVEAS_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(31885);if(r)goto S_35503;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_ALTLETTER,func_chr(*_FUNC_IDESAVEAS_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31885);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(31888);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(31888);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31888);}while(r); do{ *_FUNC_IDESAVEAS_LONG_INFO= 0 ; if(!qbevent)break;evnt(31892);}while(r); S_35512:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(31893);if(r)goto S_35512;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31893);}while(r); } S_35515:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31894);if(r)goto S_35515;} do{ *_FUNC_IDESAVEAS_LONG_FOCUS=*_FUNC_IDESAVEAS_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(31894);}while(r); } S_35518:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(31895);if(r)goto S_35518;} do{ *_FUNC_IDESAVEAS_LONG_FOCUS=*_FUNC_IDESAVEAS_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(31895);}while(r); } S_35521:; if ((-(*_FUNC_IDESAVEAS_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(31896);if(r)goto S_35521;} do{ *_FUNC_IDESAVEAS_LONG_FOCUS=*_FUNC_IDESAVEAS_LONG_LASTFOCUS; if(!qbevent)break;evnt(31896);}while(r); } S_35524:; if ((-(*_FUNC_IDESAVEAS_LONG_FOCUS>*_FUNC_IDESAVEAS_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(31897);if(r)goto S_35524;} do{ *_FUNC_IDESAVEAS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31897);}while(r); } do{ *_FUNC_IDESAVEAS_LONG_F= 1 ; if(!qbevent)break;evnt(31898);}while(r); S_35528:; fornext_value4052= 1 ; fornext_finalvalue4052= 100 ; fornext_step4052= 1 ; if (fornext_step4052<0) fornext_step_negative4052=1; else fornext_step_negative4052=0; if (new_error) goto fornext_error4052; goto fornext_entrylabel4052; while(1){ fornext_value4052=fornext_step4052+(*_FUNC_IDESAVEAS_LONG_I); fornext_entrylabel4052: *_FUNC_IDESAVEAS_LONG_I=fornext_value4052; if (fornext_step_negative4052){ if (fornext_value4052fornext_finalvalue4052) break; } fornext_error4052:; if(qbevent){evnt(31899);if(r)goto S_35528;} do{ *_FUNC_IDESAVEAS_LONG_T=*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(31900);}while(r); S_35530:; if ((*_FUNC_IDESAVEAS_LONG_T)||new_error){ if(qbevent){evnt(31901);if(r)goto S_35530;} do{ *_FUNC_IDESAVEAS_LONG_FOCUSOFFSET=*_FUNC_IDESAVEAS_LONG_FOCUS-*_FUNC_IDESAVEAS_LONG_F; if(!qbevent)break;evnt(31902);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDESAVEAS_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESAVEAS_LONG_I)-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESAVEAS_LONG_FOCUS,_FUNC_IDESAVEAS_LONG_F,_FUNC_IDESAVEAS_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDESAVEAS_STRING_ALTLETTER,__LONG_MB,_FUNC_IDESAVEAS_LONG_MOUSEDOWN,_FUNC_IDESAVEAS_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDESAVEAS_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31903);}while(r); } } fornext_exit_4051:; S_35535:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDESAVEAS_LONG_FOCUS== 4 ))&(-(*_FUNC_IDESAVEAS_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(31909);if(r)goto S_35535;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_IDESAVEAS,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31910);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31911);}while(r); } S_35539:; if ((-(*_FUNC_IDESAVEAS_LONG_FOCUS== 2 ))||new_error){ if(qbevent){evnt(31914);if(r)goto S_35539;} S_35540:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(-(*_FUNC_IDESAVEAS_LONG_INFO== 1 ))))||new_error){ if(qbevent){evnt(31915);if(r)goto S_35540;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_PATH,FUNC_IDEZCHANGEPATH(_FUNC_IDESAVEAS_STRING_PATH,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31916);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZPATHLIST(_FUNC_IDESAVEAS_STRING_PATH)); if(!qbevent)break;evnt(31917);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(31918);}while(r); S_35544:; if ((-(*_FUNC_IDESAVEAS_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(31919);if(r)goto S_35544;} do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31919);}while(r); } } } S_35549:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDESAVEAS_LONG_FOCUS!= 2 )))|((-(*_FUNC_IDESAVEAS_LONG_FOCUS== 3 ))&(-(*_FUNC_IDESAVEAS_LONG_INFO!= 0 )))))||new_error){ if(qbevent){evnt(31923);if(r)goto S_35549;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_F,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31924);}while(r); S_35551:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDESAVEAS_STRING_F,qbs_new_txt_len("..",2)))|(qbs_equal(_FUNC_IDESAVEAS_STRING_F,qbs_new_txt_len(".",1)))))||new_error){ if(qbevent){evnt(31927);if(r)goto S_35551;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_F,qbs_add(_FUNC_IDESAVEAS_STRING_F,__STRING1_IDEPATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31927);}while(r); } S_35554:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDESAVEAS_STRING_F, 1 ),__STRING1_IDEPATHSEP)))||new_error){ if(qbevent){evnt(31928);if(r)goto S_35554;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_PATH,FUNC_IDEZGETFILEPATH(_FUNC_IDESAVEAS_STRING_PATH,_FUNC_IDESAVEAS_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31929);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(31930);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_IDEZPATHLIST(_FUNC_IDESAVEAS_STRING_PATH)); if(!qbevent)break;evnt(31931);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVEAS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESAVEAS_ARRAY_UDT_O[4],_FUNC_IDESAVEAS_ARRAY_UDT_O[5]))*80+64))= -1 ; if(!qbevent)break;evnt(31932);}while(r); do{ goto LABEL_IDESAVEASLOOP; if(!qbevent)break;evnt(31933);}while(r); } S_35561:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_FILEHASEXTENSION(_FUNC_IDESAVEAS_STRING_F)== 0 )))||new_error){ if(qbevent){evnt(31936);if(r)goto S_35561;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_F,qbs_add(_FUNC_IDESAVEAS_STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31936);}while(r); } do{ qbs_set(_FUNC_IDESAVEAS_STRING_PATH,FUNC_IDEZGETFILEPATH(_FUNC_IDESAVEAS_STRING_PATH,_FUNC_IDESAVEAS_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31938);}while(r); do{ *__LONG_IDEERROR= 3 ; if(!qbevent)break;evnt(31939);}while(r); do{ sub_open(qbs_add(qbs_add(_FUNC_IDESAVEAS_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDESAVEAS_STRING_F), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31940);}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(31941);}while(r); S_35568:; if ((func_lof( 150 ))||new_error){ if(qbevent){evnt(31942);if(r)goto S_35568;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(31943);}while(r); do{ qbs_set(_FUNC_IDESAVEAS_STRING_A,FUNC_IDEFILEEXISTS()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31944);}while(r); S_35571:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDESAVEAS_STRING_A,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(31945);if(r)goto S_35571;} do{ qbs_set(_FUNC_IDESAVEAS_STRING_IDESAVEAS,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31946);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31947);}while(r); } }else{ do{ sub_close( 150 ,1); if(!qbevent)break;evnt(31950);}while(r); } do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_IDESAVEAS_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31952);}while(r); do{ sub__title(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - QB64",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31952);}while(r); do{ SUB_IDESAVE(qbs_add(qbs_add(_FUNC_IDESAVEAS_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDESAVEAS_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31953);}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_IDESAVEAS_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31954);}while(r); do{ SUB_IDEADDRECENT(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31955);}while(r); do{ SUB_IDESAVEBOOKMARKS(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31956);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(31957);}while(r); } LABEL_IDESAVEASLOOP:; if(qbevent){evnt(31960);r=0;} do{ *_FUNC_IDESAVEAS_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(31963);}while(r); do{ *_FUNC_IDESAVEAS_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(31964);}while(r); }while(1); dl_exit_4043:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free111.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDESAVEAS_STRING_IDESAVEAS);return _FUNC_IDESAVEAS_STRING_IDESAVEAS; } qbs* FUNC_IDESAVENOW(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data112.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(31972);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(31973);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(31974);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(31975);}while(r); do{ *_FUNC_IDESAVENOW_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(31976);}while(r); do{ if(!qbevent)break;evnt(31977);}while(r); do{ if (_FUNC_IDESAVENOW_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDESAVENOW_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDESAVENOW_ARRAY_UDT_O[4]= 1 ; _FUNC_IDESAVENOW_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDESAVENOW_ARRAY_UDT_O[4]+1; _FUNC_IDESAVENOW_ARRAY_UDT_O[6]=1; if (_FUNC_IDESAVENOW_ARRAY_UDT_O[2]&4){ _FUNC_IDESAVENOW_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESAVENOW_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDESAVENOW_ARRAY_UDT_O[0]),0,_FUNC_IDESAVENOW_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDESAVENOW_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDESAVENOW_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDESAVENOW_ARRAY_UDT_O[0]) error(257); } _FUNC_IDESAVENOW_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(31978);}while(r); do{ if(!qbevent)break;evnt(31979);}while(r); do{ if(!qbevent)break;evnt(31980);}while(r); do{ qbs_set(_FUNC_IDESAVENOW_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31981);}while(r); do{ *_FUNC_IDESAVENOW_LONG_I= 0 ; if(!qbevent)break;evnt(31985);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDESAVENOW_UDT_P)) + (0) ),&(pass4053= 40 ),&(pass4054= 4 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(31986);}while(r); do{ *_FUNC_IDESAVENOW_LONG_I=*_FUNC_IDESAVENOW_LONG_I+ 1 ; if(!qbevent)break;evnt(31987);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(31988);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(31989);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Yes",4),_FUNC_IDESAVENOW_STRING1_SEP),qbs_new_txt_len("#No",3)),_FUNC_IDESAVENOW_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(31990);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(31991);}while(r); S_35606:; fornext_value4056= 1 ; fornext_finalvalue4056= 100 ; fornext_step4056= 1 ; if (fornext_step4056<0) fornext_step_negative4056=1; else fornext_step_negative4056=0; if (new_error) goto fornext_error4056; goto fornext_entrylabel4056; while(1){ fornext_value4056=fornext_step4056+(*_FUNC_IDESAVENOW_LONG_I); fornext_entrylabel4056: *_FUNC_IDESAVENOW_LONG_I=fornext_value4056; if (fornext_step_negative4056){ if (fornext_value4056fornext_finalvalue4056) break; } fornext_error4056:; if(qbevent){evnt(31995);if(r)goto S_35606;} do{ memcpy((((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDESAVENOW_UDT_P)+(0)),20); if(!qbevent)break;evnt(31995);}while(r); } fornext_exit_4055:; S_35609:; do{ if(qbevent){evnt(31998);if(r)goto S_35609;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDESAVENOW_UDT_P)) + (0) )); if(!qbevent)break;evnt(32001);}while(r); do{ *_FUNC_IDESAVENOW_LONG_F= 1 ; if(!qbevent)break;evnt(32002);}while(r); do{ *_FUNC_IDESAVENOW_LONG_CX= 0 ; if(!qbevent)break;evnt(32002);}while(r); do{ *_FUNC_IDESAVENOW_LONG_CY= 0 ; if(!qbevent)break;evnt(32002);}while(r); S_35614:; fornext_value4059= 1 ; fornext_finalvalue4059= 100 ; fornext_step4059= 1 ; if (fornext_step4059<0) fornext_step_negative4059=1; else fornext_step_negative4059=0; if (new_error) goto fornext_error4059; goto fornext_entrylabel4059; while(1){ fornext_value4059=fornext_step4059+(*_FUNC_IDESAVENOW_LONG_I); fornext_entrylabel4059: *_FUNC_IDESAVENOW_LONG_I=fornext_value4059; if (fornext_step_negative4059){ if (fornext_value4059fornext_finalvalue4059) break; } fornext_error4059:; if(qbevent){evnt(32003);if(r)goto S_35614;} S_35615:; if ((*(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(32004);if(r)goto S_35615;} do{ *(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDESAVENOW_LONG_FOCUS-*_FUNC_IDESAVENOW_LONG_F; if(!qbevent)break;evnt(32006);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(32007);}while(r); do{ *(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(32007);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDESAVENOW_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESAVENOW_LONG_F); if(!qbevent)break;evnt(32008);}while(r); S_35620:; if ((*(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(32009);if(r)goto S_35620;} do{ *_FUNC_IDESAVENOW_LONG_CX=*(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(32009);}while(r); do{ *_FUNC_IDESAVENOW_LONG_CY=*(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(32009);}while(r); } } } fornext_exit_4058:; do{ *_FUNC_IDESAVENOW_LONG_LASTFOCUS=*_FUNC_IDESAVENOW_LONG_F- 1 ; if(!qbevent)break;evnt(32012);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(32016);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDESAVENOW_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDESAVENOW_UDT_P)+(0))+ 4 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32016);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Program is not saved. Save it now?",34)); if (new_error) goto skip4060; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4060: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32016);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(32020);}while(r); S_35631:; if ((*_FUNC_IDESAVENOW_LONG_CX)||new_error){ if(qbevent){evnt(32021);if(r)goto S_35631;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(32021);}while(r); do{ qbg_sub_locate(*_FUNC_IDESAVENOW_LONG_CY,*_FUNC_IDESAVENOW_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(32021);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32021);}while(r); } do{ *_FUNC_IDESAVENOW_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(32025);}while(r); S_35637:; do{ if(qbevent){evnt(32026);if(r)goto S_35637;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(32027);}while(r); S_35639:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(32028);if(r)goto S_35639;} do{ *_FUNC_IDESAVENOW_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32028);}while(r); } S_35642:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(32029);if(r)goto S_35642;} do{ *_FUNC_IDESAVENOW_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32029);}while(r); } S_35645:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(32030);if(r)goto S_35645;} do{ *_FUNC_IDESAVENOW_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(32030);}while(r); do{ *_FUNC_IDESAVENOW_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32030);}while(r); } S_35649:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(32031);if(r)goto S_35649;} do{ *_FUNC_IDESAVENOW_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(32031);}while(r); do{ *_FUNC_IDESAVENOW_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32031);}while(r); } S_35653:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(32032);if(r)goto S_35653;} do{ *_FUNC_IDESAVENOW_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32032);}while(r); } do{ *_FUNC_IDESAVENOW_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(32033);}while(r); S_35657:; if ((-(*_FUNC_IDESAVENOW_LONG_ALT!=*_FUNC_IDESAVENOW_LONG_OLDALT))||new_error){ if(qbevent){evnt(32033);if(r)goto S_35657;} do{ *_FUNC_IDESAVENOW_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32033);}while(r); } do{ *_FUNC_IDESAVENOW_LONG_OLDALT=*_FUNC_IDESAVENOW_LONG_ALT; if(!qbevent)break;evnt(32034);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(32035);}while(r); S_35662:; }while((!(*_FUNC_IDESAVENOW_LONG_CHANGE))&&(!new_error)); dl_exit_4061:; if(qbevent){evnt(32036);if(r)goto S_35662;} S_35663:; if ((*_FUNC_IDESAVENOW_LONG_ALT)||new_error){ if(qbevent){evnt(32037);if(r)goto S_35663;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(32037);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(32037);}while(r); } do{ qbs_set(_FUNC_IDESAVENOW_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32039);}while(r); S_35669:; if ((*_FUNC_IDESAVENOW_LONG_ALT)||new_error){ if(qbevent){evnt(32040);if(r)goto S_35669;} S_35670:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(32041);if(r)goto S_35670;} do{ *_FUNC_IDESAVENOW_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32042);}while(r); S_35672:; if (((-(*_FUNC_IDESAVENOW_LONG_K>= 65 ))&(-(*_FUNC_IDESAVENOW_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(32043);if(r)goto S_35672;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_ALTLETTER,func_chr(*_FUNC_IDESAVENOW_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32043);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(32046);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(32046);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32046);}while(r); S_35680:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(32049);if(r)goto S_35680;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_ALTLETTER,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32049);}while(r); } S_35683:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(32050);if(r)goto S_35683;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_ALTLETTER,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32050);}while(r); } S_35686:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(32051);if(r)goto S_35686;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_ALTLETTER,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32051);}while(r); } do{ *_FUNC_IDESAVENOW_LONG_INFO= 0 ; if(!qbevent)break;evnt(32054);}while(r); S_35690:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(32055);if(r)goto S_35690;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32055);}while(r); } S_35693:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(32056);if(r)goto S_35693;} do{ *_FUNC_IDESAVENOW_LONG_FOCUS=*_FUNC_IDESAVENOW_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(32056);}while(r); } S_35696:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(32057);if(r)goto S_35696;} do{ *_FUNC_IDESAVENOW_LONG_FOCUS=*_FUNC_IDESAVENOW_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(32057);}while(r); } S_35699:; if ((-(*_FUNC_IDESAVENOW_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(32058);if(r)goto S_35699;} do{ *_FUNC_IDESAVENOW_LONG_FOCUS=*_FUNC_IDESAVENOW_LONG_LASTFOCUS; if(!qbevent)break;evnt(32058);}while(r); } S_35702:; if ((-(*_FUNC_IDESAVENOW_LONG_FOCUS>*_FUNC_IDESAVENOW_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(32059);if(r)goto S_35702;} do{ *_FUNC_IDESAVENOW_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(32059);}while(r); } do{ *_FUNC_IDESAVENOW_LONG_F= 1 ; if(!qbevent)break;evnt(32060);}while(r); S_35706:; fornext_value4064= 1 ; fornext_finalvalue4064= 100 ; fornext_step4064= 1 ; if (fornext_step4064<0) fornext_step_negative4064=1; else fornext_step_negative4064=0; if (new_error) goto fornext_error4064; goto fornext_entrylabel4064; while(1){ fornext_value4064=fornext_step4064+(*_FUNC_IDESAVENOW_LONG_I); fornext_entrylabel4064: *_FUNC_IDESAVENOW_LONG_I=fornext_value4064; if (fornext_step_negative4064){ if (fornext_value4064fornext_finalvalue4064) break; } fornext_error4064:; if(qbevent){evnt(32061);if(r)goto S_35706;} do{ *_FUNC_IDESAVENOW_LONG_T=*(int32*)(((char*)_FUNC_IDESAVENOW_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(32062);}while(r); S_35708:; if ((*_FUNC_IDESAVENOW_LONG_T)||new_error){ if(qbevent){evnt(32063);if(r)goto S_35708;} do{ *_FUNC_IDESAVENOW_LONG_FOCUSOFFSET=*_FUNC_IDESAVENOW_LONG_FOCUS-*_FUNC_IDESAVENOW_LONG_F; if(!qbevent)break;evnt(32064);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDESAVENOW_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESAVENOW_LONG_I)-_FUNC_IDESAVENOW_ARRAY_UDT_O[4],_FUNC_IDESAVENOW_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESAVENOW_LONG_FOCUS,_FUNC_IDESAVENOW_LONG_F,_FUNC_IDESAVENOW_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDESAVENOW_STRING_ALTLETTER,__LONG_MB,_FUNC_IDESAVENOW_LONG_MOUSEDOWN,_FUNC_IDESAVENOW_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDESAVENOW_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32065);}while(r); } } fornext_exit_4063:; S_35713:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(32070);if(r)goto S_35713;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_IDESAVENOW,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32071);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(32072);}while(r); } S_35717:; if ((*_FUNC_IDESAVENOW_LONG_INFO)||new_error){ if(qbevent){evnt(32075);if(r)goto S_35717;} S_35718:; if ((-(*_FUNC_IDESAVENOW_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(32076);if(r)goto S_35718;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_IDESAVENOW,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32076);}while(r); } S_35721:; if ((-(*_FUNC_IDESAVENOW_LONG_INFO== 2 ))||new_error){ if(qbevent){evnt(32077);if(r)goto S_35721;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_IDESAVENOW,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32077);}while(r); } S_35724:; if ((-(*_FUNC_IDESAVENOW_LONG_INFO== 3 ))||new_error){ if(qbevent){evnt(32078);if(r)goto S_35724;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_IDESAVENOW,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32078);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(32079);}while(r); } do{ *_FUNC_IDESAVENOW_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(32083);}while(r); do{ *_FUNC_IDESAVENOW_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(32084);}while(r); }while(1); dl_exit_4057:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free112.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDESAVENOW_STRING_IDESAVENOW);return _FUNC_IDESAVENOW_STRING_IDESAVENOW; } void SUB_IDESETLINE(int32*_SUB_IDESETLINE_LONG_I,qbs*_SUB_IDESETLINE_STRING_TEXT){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data113.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_IDESETLINE_STRING_TEXT,qbs_rtrim(_SUB_IDESETLINE_STRING_TEXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32091);}while(r); S_35733:; if ((-(*_SUB_IDESETLINE_LONG_I!= -1 ))||new_error){ if(qbevent){evnt(32093);if(r)goto S_35733;} do{ SUB_IDEGOTOLINE(_SUB_IDESETLINE_LONG_I); if(!qbevent)break;evnt(32093);}while(r); } do{ *_SUB_IDESETLINE_LONG_TEXTLEN=_SUB_IDESETLINE_STRING_TEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32094);}while(r); do{ qbs_set(__STRING_IDET,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(__STRING_IDET,*__LONG_IDELI- 1 ),l2string(*_SUB_IDESETLINE_LONG_TEXTLEN)),_SUB_IDESETLINE_STRING_TEXT),l2string(*_SUB_IDESETLINE_LONG_TEXTLEN)),qbs_right(__STRING_IDET,__STRING_IDET->len-*__LONG_IDELI+ 1 -string2l(func_mid(__STRING_IDET,*__LONG_IDELI, 4 ,1))- 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32095);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free113.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDESHOWTEXT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data114.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_SUB_IDESHOWTEXT_LONG_CC= -1 ; if(!qbevent)break;evnt(32101);}while(r); S_35739:; if ((-(*__LONG_IDECX<*__LONG_IDESX))||new_error){ if(qbevent){evnt(32103);if(r)goto S_35739;} do{ *__LONG_IDESX=*__LONG_IDECX; if(!qbevent)break;evnt(32103);}while(r); } S_35742:; if ((-(*__LONG_IDECY<*__LONG_IDESY))||new_error){ if(qbevent){evnt(32104);if(r)goto S_35742;} do{ *__LONG_IDESY=*__LONG_IDECY; if(!qbevent)break;evnt(32104);}while(r); } S_35745:; if ((-((*__LONG_IDECX-*__LONG_IDESX)>=((*__LONG_IDEWX- 2 ))))||new_error){ if(qbevent){evnt(32105);if(r)goto S_35745;} do{ *__LONG_IDESX=*__LONG_IDECX-(*__LONG_IDEWX- 3 ); if(!qbevent)break;evnt(32105);}while(r); } S_35748:; if ((-((*__LONG_IDECY-*__LONG_IDESY)>=((*__LONG_IDEWY- 8 ))))||new_error){ if(qbevent){evnt(32106);if(r)goto S_35748;} do{ *__LONG_IDESY=*__LONG_IDECY-(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(32106);}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(32108);}while(r); do{ *_SUB_IDESHOWTEXT_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(32109);}while(r); S_35753:; if ((-(*_SUB_IDESHOWTEXT_LONG_SY1>*_SUB_IDESHOWTEXT_LONG_SY2))||new_error){ if(qbevent){evnt(32110);if(r)goto S_35753;} do{ swap_32(&*_SUB_IDESHOWTEXT_LONG_SY1,&*_SUB_IDESHOWTEXT_LONG_SY2); if(!qbevent)break;evnt(32110);}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(32111);}while(r); do{ *_SUB_IDESHOWTEXT_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(32112);}while(r); S_35758:; if ((-(*_SUB_IDESHOWTEXT_LONG_SX1>*_SUB_IDESHOWTEXT_LONG_SX2))||new_error){ if(qbevent){evnt(32113);if(r)goto S_35758;} do{ swap_32(&*_SUB_IDESHOWTEXT_LONG_SX1,&*_SUB_IDESHOWTEXT_LONG_SX2); if(!qbevent)break;evnt(32113);}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_L=*__LONG_IDESY; if(!qbevent)break;evnt(32115);}while(r); S_35762:; fornext_value4069= 0 ; fornext_finalvalue4069=(*__LONG_IDEWY- 9 ); fornext_step4069= 1 ; if (fornext_step4069<0) fornext_step_negative4069=1; else fornext_step_negative4069=0; if (new_error) goto fornext_error4069; goto fornext_entrylabel4069; while(1){ fornext_value4069=fornext_step4069+(*_SUB_IDESHOWTEXT_LONG_Y); fornext_entrylabel4069: *_SUB_IDESHOWTEXT_LONG_Y=fornext_value4069; if (fornext_step_negative4069){ if (fornext_value4069fornext_finalvalue4069) break; } fornext_error4069:; if(qbevent){evnt(32116);if(r)goto S_35762;} do{ qbg_sub_locate(*_SUB_IDESHOWTEXT_LONG_Y+ 3 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32117);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(32118);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr( 179 )); if (new_error) goto skip4070; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4070: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32119);}while(r); S_35766:; if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY!=*_SUB_IDESHOWTEXT_LONG_L)))||new_error){ if(qbevent){evnt(32120);if(r)goto S_35766;} do{ qbg_sub_color( 7 , 4 ,NULL,3); if(!qbevent)break;evnt(32120);}while(r); }else{ do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(32120);}while(r); } S_35771:; if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(32122);if(r)goto S_35771;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32123);}while(r); S_35773:; if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||new_error){ if(qbevent){evnt(32125);if(r)goto S_35773;} S_35774:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX<=_SUB_IDESHOWTEXT_STRING_A->len)))||new_error){ if(qbevent){evnt(32126);if(r)goto S_35774;} do{ *_SUB_IDESHOWTEXT_LONG_CC=qbs_asc(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32127);}while(r); S_35776:; if ((-(*_SUB_IDESHOWTEXT_LONG_CC== 32 ))||new_error){ if(qbevent){evnt(32128);if(r)goto S_35776;} S_35777:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ltrim(qbs_left(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX)),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(32129);if(r)goto S_35777;} do{ *_SUB_IDESHOWTEXT_LONG_CC= -1 ; if(!qbevent)break;evnt(32129);}while(r); } } } } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space(*__LONG_IDESX+(*__LONG_IDEWX- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32134);}while(r); do{ sub_mid(_SUB_IDESHOWTEXT_STRING_A2, 1 ,0,_SUB_IDESHOWTEXT_STRING_A,0); if(!qbevent)break;evnt(32135);}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A2,qbs_right(_SUB_IDESHOWTEXT_STRING_A2,(*__LONG_IDEWX- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32136);}while(r); }else{ do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space((*__LONG_IDEWX- 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32138);}while(r); } S_35789:; fornext_value4073= 1 ; fornext_finalvalue4073=_SUB_IDESHOWTEXT_STRING_A2->len; fornext_step4073= 1 ; if (fornext_step4073<0) fornext_step_negative4073=1; else fornext_step_negative4073=0; if (new_error) goto fornext_error4073; goto fornext_entrylabel4073; while(1){ fornext_value4073=fornext_step4073+(*_SUB_IDESHOWTEXT_LONG_X); fornext_entrylabel4073: *_SUB_IDESHOWTEXT_LONG_X=fornext_value4073; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4073){ if (fornext_value4073fornext_finalvalue4073) break; } fornext_error4073:; if(qbevent){evnt(32141);if(r)goto S_35789;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(qbs_asc(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_X))); if (new_error) goto skip4075; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4075: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32142);}while(r); } fornext_exit_4072:; S_35792:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(32146);if(r)goto S_35792;} S_35793:; if (((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_SY1))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_SY2)))||new_error){ if(qbevent){evnt(32147);if(r)goto S_35793;} S_35794:; if ((-(*_SUB_IDESHOWTEXT_LONG_SY1==*_SUB_IDESHOWTEXT_LONG_SY2))||new_error){ if(qbevent){evnt(32148);if(r)goto S_35794;} do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(32149);}while(r); do{ *_SUB_IDESHOWTEXT_LONG_X2=*__LONG_IDESX; if(!qbevent)break;evnt(32150);}while(r); S_35797:; fornext_value4077= 2 ; fornext_finalvalue4077=(*__LONG_IDEWX- 2 ); fornext_step4077= 1 ; if (fornext_step4077<0) fornext_step_negative4077=1; else fornext_step_negative4077=0; if (new_error) goto fornext_error4077; goto fornext_entrylabel4077; while(1){ fornext_value4077=fornext_step4077+(*_SUB_IDESHOWTEXT_LONG_X); fornext_entrylabel4077: *_SUB_IDESHOWTEXT_LONG_X=fornext_value4077; if (fornext_step_negative4077){ if (fornext_value4077fornext_finalvalue4077) break; } fornext_error4077:; if(qbevent){evnt(32151);if(r)goto S_35797;} S_35798:; if (((-(*_SUB_IDESHOWTEXT_LONG_X2>=*_SUB_IDESHOWTEXT_LONG_SX1))&(-(*_SUB_IDESHOWTEXT_LONG_X2<*_SUB_IDESHOWTEXT_LONG_SX2)))||new_error){ if(qbevent){evnt(32152);if(r)goto S_35798;} do{ *_SUB_IDESHOWTEXT_LONG_A=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,0); if(!qbevent)break;evnt(32153);}while(r); S_35800:; if ((-(*_SUB_IDESHOWTEXT_LONG_A== 63 ))||new_error){ if(qbevent){evnt(32155);if(r)goto S_35800;} do{ *_SUB_IDESHOWTEXT_LONG_C=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X, 1 ,1); if(!qbevent)break;evnt(32156);}while(r); }else{ do{ *_SUB_IDESHOWTEXT_LONG_C= 1 ; if(!qbevent)break;evnt(32158);}while(r); } S_35805:; if ((-((*_SUB_IDESHOWTEXT_LONG_C& 15 )== 0 ))||new_error){ if(qbevent){evnt(32160);if(r)goto S_35805;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(32161);}while(r); do{ qbg_sub_locate(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32162);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("?",1)); if (new_error) goto skip4078; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4078: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32162);}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(32163);}while(r); }else{ do{ qbg_sub_locate(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32165);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(*_SUB_IDESHOWTEXT_LONG_A)); if (new_error) goto skip4079; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4079: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32165);}while(r); } } do{ *_SUB_IDESHOWTEXT_LONG_X2=*_SUB_IDESHOWTEXT_LONG_X2+ 1 ; if(!qbevent)break;evnt(32170);}while(r); } fornext_exit_4076:; do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(32172);}while(r); }else{ S_35819:; if (((-(*__LONG_IDECX== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*_SUB_IDESHOWTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_SUB_IDESHOWTEXT_LONG_SY1)))||new_error){ if(qbevent){evnt(32174);if(r)goto S_35819;} do{ goto LABEL_NOFINALSELECT; if(!qbevent)break;evnt(32174);}while(r); } do{ qbg_sub_locate(*_SUB_IDESHOWTEXT_LONG_Y+ 3 , 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32175);}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(32176);}while(r); S_35824:; fornext_value4081= 1 ; fornext_finalvalue4081=_SUB_IDESHOWTEXT_STRING_A2->len; fornext_step4081= 1 ; if (fornext_step4081<0) fornext_step_negative4081=1; else fornext_step_negative4081=0; if (new_error) goto fornext_error4081; goto fornext_entrylabel4081; while(1){ fornext_value4081=fornext_step4081+(*_SUB_IDESHOWTEXT_LONG_X); fornext_entrylabel4081: *_SUB_IDESHOWTEXT_LONG_X=fornext_value4081; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4081){ if (fornext_value4081fornext_finalvalue4081) break; } fornext_error4081:; if(qbevent){evnt(32178);if(r)goto S_35824;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(qbs_asc(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_X))); if (new_error) goto skip4083; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4083: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32179);}while(r); } fornext_exit_4080:; do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(32182);}while(r); LABEL_NOFINALSELECT:; if(qbevent){evnt(32183);r=0;} } } } do{ *_SUB_IDESHOWTEXT_LONG_L=*_SUB_IDESHOWTEXT_LONG_L+ 1 ; if(!qbevent)break;evnt(32188);}while(r); } fornext_exit_4068:; do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(32191);}while(r); S_35834:; fornext_value4085= 1 ; fornext_finalvalue4085=*__LONG_IDEBMKN; fornext_step4085= 1 ; if (fornext_step4085<0) fornext_step_negative4085=1; else fornext_step_negative4085=0; if (new_error) goto fornext_error4085; goto fornext_entrylabel4085; while(1){ fornext_value4085=fornext_step4085+(*_SUB_IDESHOWTEXT_LONG_B); fornext_entrylabel4085: *_SUB_IDESHOWTEXT_LONG_B=fornext_value4085; if (fornext_step_negative4085){ if (fornext_value4085fornext_finalvalue4085) break; } fornext_error4085:; if(qbevent){evnt(32192);if(r)goto S_35834;} do{ *_SUB_IDESHOWTEXT_LONG_Y=*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_SUB_IDESHOWTEXT_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)); if(!qbevent)break;evnt(32193);}while(r); S_35836:; if (((-(*_SUB_IDESHOWTEXT_LONG_Y>=*__LONG_IDESY))&(-(*_SUB_IDESHOWTEXT_LONG_Y<=(*__LONG_IDESY+(*__LONG_IDEWY- 9 )))))||new_error){ if(qbevent){evnt(32194);if(r)goto S_35836;} do{ qbg_sub_locate( 3 +*_SUB_IDESHOWTEXT_LONG_Y-*__LONG_IDESY, 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32195);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\305",1)); if (new_error) goto skip4086; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4086: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32195);}while(r); } } fornext_exit_4084:; do{ *_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4087= 3 ),&(pass4088=(*__LONG_IDEWY- 8 )),__LONG_IDECY,__LONG_IDEN); if(!qbevent)break;evnt(32199);}while(r); do{ *_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEHBAR(&(pass4089= 2 ),&(pass4090=(*__LONG_IDEWY- 5 )),&(pass4091=(*__LONG_IDEWX- 2 )),__LONG_IDESX,&(pass4092= 608 )); if(!qbevent)break;evnt(32200);}while(r); do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(32203);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW,*__LONG_IDEWX- 20 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32204);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" : ",21)); if (new_error) goto skip4093; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4093: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32204);}while(r); S_35846:; if ((-(*__LONG_IDECX< 100000 ))||new_error){ if(qbevent){evnt(32205);if(r)goto S_35846;} do{ qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW,*__LONG_IDEWX- 9 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32206);}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_ltrim(qbs_str((int32)(*__LONG_IDECX)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32207);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDESHOWTEXT_STRING_A); if (new_error) goto skip4094; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4094: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32208);}while(r); S_35850:; if ((-(*_SUB_IDESHOWTEXT_LONG_CC!= -1 ))||new_error){ if(qbevent){evnt(32209);if(r)goto S_35850;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_STR2(_SUB_IDESHOWTEXT_LONG_CC)),qbs_new_txt_len(")",1))); if (new_error) goto skip4095; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4095: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32209);}while(r); } } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_ltrim(qbs_str((int32)(*__LONG_IDECY)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32211);}while(r); do{ qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW,(*__LONG_IDEWX- 10 )-_SUB_IDESHOWTEXT_STRING_A->len,NULL,NULL,NULL,3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32212);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDESHOWTEXT_STRING_A); if (new_error) goto skip4097; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4097: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32213);}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(32215);}while(r); do{ qbg_sub_locate(*__LONG_IDECY-*__LONG_IDESY+ 3 ,*__LONG_IDECX-*__LONG_IDESX+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32215);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(32215);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free114.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDESUBS(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data115.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(32222);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(32223);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32224);}while(r); do{ *_FUNC_IDESUBS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(32225);}while(r); do{ if(!qbevent)break;evnt(32226);}while(r); do{ if (_FUNC_IDESUBS_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDESUBS_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDESUBS_ARRAY_UDT_O[4]= 1 ; _FUNC_IDESUBS_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDESUBS_ARRAY_UDT_O[4]+1; _FUNC_IDESUBS_ARRAY_UDT_O[6]=1; if (_FUNC_IDESUBS_ARRAY_UDT_O[2]&4){ _FUNC_IDESUBS_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESUBS_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDESUBS_ARRAY_UDT_O[0]),0,_FUNC_IDESUBS_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDESUBS_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDESUBS_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDESUBS_ARRAY_UDT_O[0]) error(257); } _FUNC_IDESUBS_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(32227);}while(r); do{ if(!qbevent)break;evnt(32228);}while(r); do{ if(!qbevent)break;evnt(32229);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32230);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LY,l2string( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32235);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_L,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32236);}while(r); S_35871:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDESUBS_STRING_L,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(32237);if(r)goto S_35871;} do{ qbs_set(_FUNC_IDESUBS_STRING_L,qbs_add(qbs_new_txt_len("Untitled",8),__STRING_TEMPFOLDERINDEXSTR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32237);}while(r); } S_35874:; fornext_value4099= 1 ; fornext_finalvalue4099=*__LONG_IDEN; fornext_step4099= 1 ; if (fornext_step4099<0) fornext_step_negative4099=1; else fornext_step_negative4099=0; if (new_error) goto fornext_error4099; goto fornext_entrylabel4099; while(1){ fornext_value4099=fornext_step4099+(*_FUNC_IDESUBS_LONG_Y); fornext_entrylabel4099: *_FUNC_IDESUBS_LONG_Y=fornext_value4099; if (fornext_step_negative4099){ if (fornext_value4099fornext_finalvalue4099) break; } fornext_error4099:; if(qbevent){evnt(32238);if(r)goto S_35874;} do{ qbs_set(_FUNC_IDESUBS_STRING_A,FUNC_IDEGETLINE(_FUNC_IDESUBS_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32239);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_A,qbs_ltrim(qbs_rtrim(_FUNC_IDESUBS_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32240);}while(r); do{ *_FUNC_IDESUBS_LONG_SF= 0 ; if(!qbevent)break;evnt(32241);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_NCA,qbs_ucase(_FUNC_IDESUBS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32242);}while(r); S_35879:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDESUBS_STRING_NCA, 4 ),qbs_new_txt_len("SUB ",4))))||new_error){ if(qbevent){evnt(32243);if(r)goto S_35879;} do{ *_FUNC_IDESUBS_LONG_SF= 1 ; if(!qbevent)break;evnt(32243);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_SF,qbs_new_txt_len("SUB ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32243);}while(r); } S_35883:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDESUBS_STRING_NCA, 9 ),qbs_new_txt_len("FUNCTION ",9))))||new_error){ if(qbevent){evnt(32244);if(r)goto S_35883;} do{ *_FUNC_IDESUBS_LONG_SF= 2 ; if(!qbevent)break;evnt(32244);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_SF,qbs_new_txt_len("FUNC ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32244);}while(r); } S_35887:; if ((*_FUNC_IDESUBS_LONG_SF)||new_error){ if(qbevent){evnt(32245);if(r)goto S_35887;} S_35888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDESUBS_STRING_NCA, 7 ),qbs_new_txt_len(" STATIC",7))))||new_error){ if(qbevent){evnt(32246);if(r)goto S_35888;} do{ qbs_set(_FUNC_IDESUBS_STRING_A,qbs_rtrim(qbs_left(_FUNC_IDESUBS_STRING_A,_FUNC_IDESUBS_STRING_A->len- 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32247);}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_LY,qbs_add(_FUNC_IDESUBS_STRING_LY,l2string(*_FUNC_IDESUBS_LONG_Y))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32249);}while(r); S_35892:; if ((-(*_FUNC_IDESUBS_LONG_SF== 1 ))||new_error){ if(qbevent){evnt(32250);if(r)goto S_35892;} do{ qbs_set(_FUNC_IDESUBS_STRING_A,qbs_right(_FUNC_IDESUBS_STRING_A,_FUNC_IDESUBS_STRING_A->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32251);}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_A,qbs_right(_FUNC_IDESUBS_STRING_A,_FUNC_IDESUBS_STRING_A->len- 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32253);}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_A,qbs_ltrim(qbs_rtrim(_FUNC_IDESUBS_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32255);}while(r); do{ *_FUNC_IDESUBS_LONG_X=func_instr(NULL,_FUNC_IDESUBS_STRING_A,qbs_new_txt_len("(",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32256);}while(r); S_35899:; if ((*_FUNC_IDESUBS_LONG_X)||new_error){ if(qbevent){evnt(32257);if(r)goto S_35899;} do{ qbs_set(_FUNC_IDESUBS_STRING_N,qbs_rtrim(qbs_left(_FUNC_IDESUBS_STRING_A,*_FUNC_IDESUBS_LONG_X- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32258);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,qbs_right(_FUNC_IDESUBS_STRING_A,_FUNC_IDESUBS_STRING_A->len-*_FUNC_IDESUBS_LONG_X+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32259);}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_N,_FUNC_IDESUBS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32261);}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32262);}while(r); } S_35906:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_N->len<= 20 )))||new_error){ if(qbevent){evnt(32264);if(r)goto S_35906;} do{ qbs_set(_FUNC_IDESUBS_STRING_N,qbs_add(_FUNC_IDESUBS_STRING_N,func_space( 20 -_FUNC_IDESUBS_STRING_N->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32265);}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_N,qbs_add(qbs_left(_FUNC_IDESUBS_STRING_N, 17 ),qbs_new_txt_len("\372\372\372",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32267);}while(r); } S_35911:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_ARGS->len<=(*__LONG_IDEWX- 41 ))))||new_error){ if(qbevent){evnt(32269);if(r)goto S_35911;} do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,qbs_add(_FUNC_IDESUBS_STRING_ARGS,func_space((*__LONG_IDEWX- 41 )-_FUNC_IDESUBS_STRING_ARGS->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32270);}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,qbs_add(qbs_left(_FUNC_IDESUBS_STRING_ARGS,(*__LONG_IDEWX- 44 )),qbs_new_txt_len("\372\372\372",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32272);}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_L,_FUNC_IDESUBS_STRING1_SEP),qbs_new_txt_len("\303\304",2)),_FUNC_IDESUBS_STRING_N),qbs_new_txt_len(" ",1)),_FUNC_IDESUBS_STRING_SF),_FUNC_IDESUBS_STRING_ARGS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32274);}while(r); } } fornext_exit_4098:; S_35919:; fornext_value4109=_FUNC_IDESUBS_STRING_L->len; fornext_finalvalue4109= 1 ; fornext_step4109= -1 ; if (fornext_step4109<0) fornext_step_negative4109=1; else fornext_step_negative4109=0; if (new_error) goto fornext_error4109; goto fornext_entrylabel4109; while(1){ fornext_value4109=fornext_step4109+(*_FUNC_IDESUBS_LONG_X); fornext_entrylabel4109: *_FUNC_IDESUBS_LONG_X=fornext_value4109; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4109){ if (fornext_value4109fornext_finalvalue4109) break; } fornext_error4109:; if(qbevent){evnt(32279);if(r)goto S_35919;} do{ qbs_set(_FUNC_IDESUBS_STRING_A,func_mid(_FUNC_IDESUBS_STRING_L,*_FUNC_IDESUBS_LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32280);}while(r); S_35921:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDESUBS_STRING_A,qbs_new_txt_len("\303",1))))||new_error){ if(qbevent){evnt(32281);if(r)goto S_35921;} do{ sub_mid(_FUNC_IDESUBS_STRING_L,*_FUNC_IDESUBS_LONG_X, 1 ,qbs_new_txt_len("\300",1),1); if(!qbevent)break;evnt(32281);}while(r); do{ goto fornext_exit_4108; if(!qbevent)break;evnt(32281);}while(r); } } fornext_exit_4108:; do{ *_FUNC_IDESUBS_LONG_I= 0 ; if(!qbevent)break;evnt(32287);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDESUBS_UDT_P)) + (0) ),&(pass4111=*__LONG_IDEWX- 8 ),&(pass4112=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ),qbs_new_txt_len("SUBs",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32288);}while(r); do{ *_FUNC_IDESUBS_LONG_I=*_FUNC_IDESUBS_LONG_I+ 1 ; if(!qbevent)break;evnt(32290);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(32291);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+24))= 1 ; if(!qbevent)break;evnt(32292);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+28))=*__LONG_IDEWX- 12 ; if(!qbevent)break;evnt(32294);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 9 ; if(!qbevent)break;evnt(32294);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDESUBS_STRING_L); if(!qbevent)break;evnt(32295);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(32296);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Program Items",13)); if(!qbevent)break;evnt(32297);}while(r); do{ *_FUNC_IDESUBS_LONG_I=*_FUNC_IDESUBS_LONG_I+ 1 ; if(!qbevent)break;evnt(32300);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(32301);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(32302);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#Edit",5),_FUNC_IDESUBS_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(32303);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(32304);}while(r); S_35941:; fornext_value4114= 1 ; fornext_finalvalue4114= 100 ; fornext_step4114= 1 ; if (fornext_step4114<0) fornext_step_negative4114=1; else fornext_step_negative4114=0; if (new_error) goto fornext_error4114; goto fornext_entrylabel4114; while(1){ fornext_value4114=fornext_step4114+(*_FUNC_IDESUBS_LONG_I); fornext_entrylabel4114: *_FUNC_IDESUBS_LONG_I=fornext_value4114; if (fornext_step_negative4114){ if (fornext_value4114fornext_finalvalue4114) break; } fornext_error4114:; if(qbevent){evnt(32309);if(r)goto S_35941;} do{ memcpy((((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDESUBS_UDT_P)+(0)),20); if(!qbevent)break;evnt(32309);}while(r); } fornext_exit_4113:; S_35944:; do{ if(qbevent){evnt(32312);if(r)goto S_35944;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDESUBS_UDT_P)) + (0) )); if(!qbevent)break;evnt(32315);}while(r); do{ *_FUNC_IDESUBS_LONG_F= 1 ; if(!qbevent)break;evnt(32316);}while(r); do{ *_FUNC_IDESUBS_LONG_CX= 0 ; if(!qbevent)break;evnt(32316);}while(r); do{ *_FUNC_IDESUBS_LONG_CY= 0 ; if(!qbevent)break;evnt(32316);}while(r); S_35949:; fornext_value4117= 1 ; fornext_finalvalue4117= 100 ; fornext_step4117= 1 ; if (fornext_step4117<0) fornext_step_negative4117=1; else fornext_step_negative4117=0; if (new_error) goto fornext_error4117; goto fornext_entrylabel4117; while(1){ fornext_value4117=fornext_step4117+(*_FUNC_IDESUBS_LONG_I); fornext_entrylabel4117: *_FUNC_IDESUBS_LONG_I=fornext_value4117; if (fornext_step_negative4117){ if (fornext_value4117fornext_finalvalue4117) break; } fornext_error4117:; if(qbevent){evnt(32317);if(r)goto S_35949;} S_35950:; if ((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(32318);if(r)goto S_35950;} do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDESUBS_LONG_FOCUS-*_FUNC_IDESUBS_LONG_F; if(!qbevent)break;evnt(32321);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(32322);}while(r); do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(32322);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDESUBS_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESUBS_LONG_F); if(!qbevent)break;evnt(32323);}while(r); S_35955:; if ((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(32324);if(r)goto S_35955;} do{ *_FUNC_IDESUBS_LONG_CX=*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(32324);}while(r); do{ *_FUNC_IDESUBS_LONG_CY=*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(32324);}while(r); } } } fornext_exit_4116:; do{ *_FUNC_IDESUBS_LONG_LASTFOCUS=*_FUNC_IDESUBS_LONG_F- 1 ; if(!qbevent)break;evnt(32327);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(32334);}while(r); S_35963:; if ((*_FUNC_IDESUBS_LONG_CX)||new_error){ if(qbevent){evnt(32335);if(r)goto S_35963;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(32335);}while(r); do{ qbg_sub_locate(*_FUNC_IDESUBS_LONG_CY,*_FUNC_IDESUBS_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(32335);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32335);}while(r); } do{ *_FUNC_IDESUBS_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(32338);}while(r); S_35969:; do{ if(qbevent){evnt(32339);if(r)goto S_35969;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(32340);}while(r); S_35971:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(32341);if(r)goto S_35971;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32341);}while(r); } S_35974:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(32342);if(r)goto S_35974;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32342);}while(r); } S_35977:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(32343);if(r)goto S_35977;} do{ *_FUNC_IDESUBS_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(32343);}while(r); do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32343);}while(r); } S_35981:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(32344);if(r)goto S_35981;} do{ *_FUNC_IDESUBS_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(32344);}while(r); do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32344);}while(r); } S_35985:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(32345);if(r)goto S_35985;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32345);}while(r); } do{ *_FUNC_IDESUBS_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(32346);}while(r); S_35989:; if ((-(*_FUNC_IDESUBS_LONG_ALT!=*_FUNC_IDESUBS_LONG_OLDALT))||new_error){ if(qbevent){evnt(32346);if(r)goto S_35989;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32346);}while(r); } do{ *_FUNC_IDESUBS_LONG_OLDALT=*_FUNC_IDESUBS_LONG_ALT; if(!qbevent)break;evnt(32347);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(32348);}while(r); S_35994:; }while((!(*_FUNC_IDESUBS_LONG_CHANGE))&&(!new_error)); dl_exit_4118:; if(qbevent){evnt(32349);if(r)goto S_35994;} S_35995:; if ((*_FUNC_IDESUBS_LONG_ALT)||new_error){ if(qbevent){evnt(32350);if(r)goto S_35995;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(32350);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(32350);}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32352);}while(r); S_36001:; if ((*_FUNC_IDESUBS_LONG_ALT)||new_error){ if(qbevent){evnt(32353);if(r)goto S_36001;} S_36002:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(32354);if(r)goto S_36002;} do{ *_FUNC_IDESUBS_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32355);}while(r); S_36004:; if (((-(*_FUNC_IDESUBS_LONG_K>= 65 ))&(-(*_FUNC_IDESUBS_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(32356);if(r)goto S_36004;} do{ qbs_set(_FUNC_IDESUBS_STRING_ALTLETTER,func_chr(*_FUNC_IDESUBS_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32356);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(32359);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(32359);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32359);}while(r); do{ *_FUNC_IDESUBS_LONG_INFO= 0 ; if(!qbevent)break;evnt(32363);}while(r); S_36013:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(32364);if(r)goto S_36013;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32364);}while(r); } S_36016:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(32365);if(r)goto S_36016;} do{ *_FUNC_IDESUBS_LONG_FOCUS=*_FUNC_IDESUBS_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(32365);}while(r); } S_36019:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(32366);if(r)goto S_36019;} do{ *_FUNC_IDESUBS_LONG_FOCUS=*_FUNC_IDESUBS_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(32366);}while(r); } S_36022:; if ((-(*_FUNC_IDESUBS_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(32367);if(r)goto S_36022;} do{ *_FUNC_IDESUBS_LONG_FOCUS=*_FUNC_IDESUBS_LONG_LASTFOCUS; if(!qbevent)break;evnt(32367);}while(r); } S_36025:; if ((-(*_FUNC_IDESUBS_LONG_FOCUS>*_FUNC_IDESUBS_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(32368);if(r)goto S_36025;} do{ *_FUNC_IDESUBS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(32368);}while(r); } do{ *_FUNC_IDESUBS_LONG_F= 1 ; if(!qbevent)break;evnt(32369);}while(r); S_36029:; fornext_value4121= 1 ; fornext_finalvalue4121= 100 ; fornext_step4121= 1 ; if (fornext_step4121<0) fornext_step_negative4121=1; else fornext_step_negative4121=0; if (new_error) goto fornext_error4121; goto fornext_entrylabel4121; while(1){ fornext_value4121=fornext_step4121+(*_FUNC_IDESUBS_LONG_I); fornext_entrylabel4121: *_FUNC_IDESUBS_LONG_I=fornext_value4121; if (fornext_step_negative4121){ if (fornext_value4121fornext_finalvalue4121) break; } fornext_error4121:; if(qbevent){evnt(32370);if(r)goto S_36029;} do{ *_FUNC_IDESUBS_LONG_T=*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(32371);}while(r); S_36031:; if ((*_FUNC_IDESUBS_LONG_T)||new_error){ if(qbevent){evnt(32372);if(r)goto S_36031;} do{ *_FUNC_IDESUBS_LONG_FOCUSOFFSET=*_FUNC_IDESUBS_LONG_FOCUS-*_FUNC_IDESUBS_LONG_F; if(!qbevent)break;evnt(32373);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDESUBS_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDESUBS_LONG_I)-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80) ),_FUNC_IDESUBS_LONG_FOCUS,_FUNC_IDESUBS_LONG_F,_FUNC_IDESUBS_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDESUBS_STRING_ALTLETTER,__LONG_MB,_FUNC_IDESUBS_LONG_MOUSEDOWN,_FUNC_IDESUBS_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDESUBS_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32374);}while(r); } } fornext_exit_4120:; S_36036:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDESUBS_LONG_FOCUS== 3 ))&(-(*_FUNC_IDESUBS_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(32379);if(r)goto S_36036;} do{ qbs_set(_FUNC_IDESUBS_STRING_IDESUBS,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32380);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(32381);}while(r); } S_36040:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDESUBS_LONG_FOCUS== 2 ))&(-(*_FUNC_IDESUBS_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDESUBS_LONG_INFO== 1 ))&(-(*_FUNC_IDESUBS_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(32384);if(r)goto S_36040;} do{ *_FUNC_IDESUBS_LONG_Y=*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(32385);}while(r); S_36042:; if ((-(*_FUNC_IDESUBS_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(32386);if(r)goto S_36042;} do{ *_FUNC_IDESUBS_LONG_Y=-(*_FUNC_IDESUBS_LONG_Y); if(!qbevent)break;evnt(32386);}while(r); } do{ *__LONG_IDECY=string2l(func_mid(_FUNC_IDESUBS_STRING_LY,(*_FUNC_IDESUBS_LONG_Y* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32387);}while(r); do{ *__LONG_IDESY=*__LONG_IDECY; if(!qbevent)break;evnt(32388);}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(32389);}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(32390);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(32391);}while(r); } do{ *_FUNC_IDESUBS_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(32396);}while(r); do{ *_FUNC_IDESUBS_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(32397);}while(r); }while(1); dl_exit_4115:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free115.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDESUBS_STRING_IDESUBS);return _FUNC_IDESUBS_STRING_IDESUBS; } int32 FUNC_IDELANGUAGEBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data116.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(32408);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(32409);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32410);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(32411);}while(r); do{ if(!qbevent)break;evnt(32412);}while(r); do{ if (_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4]+1; _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]),0,_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(32413);}while(r); do{ if(!qbevent)break;evnt(32414);}while(r); do{ if(!qbevent)break;evnt(32415);}while(r); do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32416);}while(r); do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_L,((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[array_check(( 1 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32422);}while(r); S_36064:; fornext_value4123= 2 ; fornext_finalvalue4123= 27 ; fornext_step4123= 1 ; if (fornext_step4123<0) fornext_step_negative4123=1; else fornext_step_negative4123=0; if (new_error) goto fornext_error4123; goto fornext_entrylabel4123; while(1){ fornext_value4123=fornext_step4123+(*_FUNC_IDELANGUAGEBOX_LONG_X); fornext_entrylabel4123: *_FUNC_IDELANGUAGEBOX_LONG_X=fornext_value4123; if (fornext_step_negative4123){ if (fornext_value4123fornext_finalvalue4123) break; } fornext_error4123:; if(qbevent){evnt(32423);if(r)goto S_36064;} do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDELANGUAGEBOX_STRING_L,_FUNC_IDELANGUAGEBOX_STRING1_SEP),((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[array_check((*_FUNC_IDELANGUAGEBOX_LONG_X)-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32424);}while(r); } fornext_exit_4122:; do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_L,qbs_ucase(_FUNC_IDELANGUAGEBOX_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32426);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_I= 0 ; if(!qbevent)break;evnt(32428);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_UDT_P)) + (0) ),&(pass4124=*__LONG_IDEWX- 8 ),&(pass4125=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ),qbs_new_txt_len("Language",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32429);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_I=*_FUNC_IDELANGUAGEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(32431);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+36))= 2 ; if(!qbevent)break;evnt(32432);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(32433);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+28))=*__LONG_IDEWX- 12 ; if(!qbevent)break;evnt(32434);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 10 ; if(!qbevent)break;evnt(32434);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDELANGUAGEBOX_STRING_L); if(!qbevent)break;evnt(32435);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+64))= 1 ; if(!qbevent)break;evnt(32436);}while(r); S_36077:; if ((*__LONG_IDECPINDEX)||new_error){ if(qbevent){evnt(32436);if(r)goto S_36077;} do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDECPINDEX; if(!qbevent)break;evnt(32436);}while(r); } do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Code Pages",10)); if(!qbevent)break;evnt(32437);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_I=*_FUNC_IDELANGUAGEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(32439);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(32440);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(32441);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDELANGUAGEBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(32442);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(32443);}while(r); S_36086:; fornext_value4127= 1 ; fornext_finalvalue4127= 100 ; fornext_step4127= 1 ; if (fornext_step4127<0) fornext_step_negative4127=1; else fornext_step_negative4127=0; if (new_error) goto fornext_error4127; goto fornext_entrylabel4127; while(1){ fornext_value4127=fornext_step4127+(*_FUNC_IDELANGUAGEBOX_LONG_I); fornext_entrylabel4127: *_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value4127; if (fornext_step_negative4127){ if (fornext_value4127fornext_finalvalue4127) break; } fornext_error4127:; if(qbevent){evnt(32452);if(r)goto S_36086;} do{ memcpy((((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(32452);}while(r); } fornext_exit_4126:; S_36089:; do{ if(qbevent){evnt(32455);if(r)goto S_36089;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(32458);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(32459);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(32459);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(32459);}while(r); S_36094:; fornext_value4130= 1 ; fornext_finalvalue4130= 100 ; fornext_step4130= 1 ; if (fornext_step4130<0) fornext_step_negative4130=1; else fornext_step_negative4130=0; if (new_error) goto fornext_error4130; goto fornext_entrylabel4130; while(1){ fornext_value4130=fornext_step4130+(*_FUNC_IDELANGUAGEBOX_LONG_I); fornext_entrylabel4130: *_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value4130; if (fornext_step_negative4130){ if (fornext_value4130fornext_finalvalue4130) break; } fornext_error4130:; if(qbevent){evnt(32460);if(r)goto S_36094;} S_36095:; if ((*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(32461);if(r)goto S_36095;} do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS-*_FUNC_IDELANGUAGEBOX_LONG_F; if(!qbevent)break;evnt(32463);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(32464);}while(r); do{ *(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(32464);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDELANGUAGEBOX_LONG_F); if(!qbevent)break;evnt(32465);}while(r); S_36100:; if ((*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(32466);if(r)goto S_36100;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(32466);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(32466);}while(r); } } } fornext_exit_4129:; do{ *_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS=*_FUNC_IDELANGUAGEBOX_LONG_F- 1 ; if(!qbevent)break;evnt(32469);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(32473);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(4))+ 1 ,*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32473);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Code-page for ASCII-UNICODE mapping: (Default: CP437)",53)); if (new_error) goto skip4131; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4131: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32473);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(32478);}while(r); S_36111:; if ((*_FUNC_IDELANGUAGEBOX_LONG_CX)||new_error){ if(qbevent){evnt(32479);if(r)goto S_36111;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(32479);}while(r); do{ qbg_sub_locate(*_FUNC_IDELANGUAGEBOX_LONG_CY,*_FUNC_IDELANGUAGEBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(32479);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32479);}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(32482);}while(r); S_36117:; do{ if(qbevent){evnt(32483);if(r)goto S_36117;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(32484);}while(r); S_36119:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(32485);if(r)goto S_36119;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32485);}while(r); } S_36122:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(32486);if(r)goto S_36122;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32486);}while(r); } S_36125:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(32487);if(r)goto S_36125;} do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(32487);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32487);}while(r); } S_36129:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(32488);if(r)goto S_36129;} do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(32488);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32488);}while(r); } S_36133:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(32489);if(r)goto S_36133;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32489);}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(32490);}while(r); S_36137:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_ALT!=*_FUNC_IDELANGUAGEBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(32490);if(r)goto S_36137;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(32490);}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_OLDALT=*_FUNC_IDELANGUAGEBOX_LONG_ALT; if(!qbevent)break;evnt(32491);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(32492);}while(r); S_36142:; }while((!(*_FUNC_IDELANGUAGEBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4132:; if(qbevent){evnt(32493);if(r)goto S_36142;} S_36143:; if ((*_FUNC_IDELANGUAGEBOX_LONG_ALT)||new_error){ if(qbevent){evnt(32494);if(r)goto S_36143;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(32494);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(32494);}while(r); } do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32496);}while(r); S_36149:; if ((*_FUNC_IDELANGUAGEBOX_LONG_ALT)||new_error){ if(qbevent){evnt(32497);if(r)goto S_36149;} S_36150:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(32498);if(r)goto S_36150;} do{ *_FUNC_IDELANGUAGEBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32499);}while(r); S_36152:; if (((-(*_FUNC_IDELANGUAGEBOX_LONG_K>= 65 ))&(-(*_FUNC_IDELANGUAGEBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(32500);if(r)goto S_36152;} do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDELANGUAGEBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32500);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(32503);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(32503);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(32503);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(32507);}while(r); S_36161:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(32508);if(r)goto S_36161;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32508);}while(r); } S_36164:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(32509);if(r)goto S_36164;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(32509);}while(r); } S_36167:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(32510);if(r)goto S_36167;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(32510);}while(r); } S_36170:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(32511);if(r)goto S_36170;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(32511);}while(r); } S_36173:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS>*_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(32512);if(r)goto S_36173;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(32512);}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(32513);}while(r); S_36177:; fornext_value4135= 1 ; fornext_finalvalue4135= 100 ; fornext_step4135= 1 ; if (fornext_step4135<0) fornext_step_negative4135=1; else fornext_step_negative4135=0; if (new_error) goto fornext_error4135; goto fornext_entrylabel4135; while(1){ fornext_value4135=fornext_step4135+(*_FUNC_IDELANGUAGEBOX_LONG_I); fornext_entrylabel4135: *_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value4135; if (fornext_step_negative4135){ if (fornext_value4135fornext_finalvalue4135) break; } fornext_error4135:; if(qbevent){evnt(32514);if(r)goto S_36177;} do{ *_FUNC_IDELANGUAGEBOX_LONG_T=*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(32515);}while(r); S_36179:; if ((*_FUNC_IDELANGUAGEBOX_LONG_T)||new_error){ if(qbevent){evnt(32516);if(r)goto S_36179;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUSOFFSET=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS-*_FUNC_IDELANGUAGEBOX_LONG_F; if(!qbevent)break;evnt(32517);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDELANGUAGEBOX_LONG_FOCUS,_FUNC_IDELANGUAGEBOX_LONG_F,_FUNC_IDELANGUAGEBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN,_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDELANGUAGEBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32518);}while(r); } } fornext_exit_4134:; S_36184:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDELANGUAGEBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(32523);if(r)goto S_36184;} do{ goto exit_subfunc; if(!qbevent)break;evnt(32525);}while(r); } S_36187:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDELANGUAGEBOX_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDELANGUAGEBOX_LONG_INFO== 1 ))&(-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(32528);if(r)goto S_36187;} do{ *_FUNC_IDELANGUAGEBOX_LONG_Y=*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(32529);}while(r); S_36189:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(32530);if(r)goto S_36189;} do{ *_FUNC_IDELANGUAGEBOX_LONG_Y=-(*_FUNC_IDELANGUAGEBOX_LONG_Y); if(!qbevent)break;evnt(32530);}while(r); } S_36192:; fornext_value4137= 128 ; fornext_finalvalue4137= 255 ; fornext_step4137= 1 ; if (fornext_step4137<0) fornext_step_negative4137=1; else fornext_step_negative4137=0; if (new_error) goto fornext_error4137; goto fornext_entrylabel4137; while(1){ fornext_value4137=fornext_step4137+(*_FUNC_IDELANGUAGEBOX_LONG_X); fornext_entrylabel4137: *_FUNC_IDELANGUAGEBOX_LONG_X=fornext_value4137; if (fornext_step_negative4137){ if (fornext_value4137fornext_finalvalue4137) break; } fornext_error4137:; if(qbevent){evnt(32532);if(r)goto S_36192;} do{ *_FUNC_IDELANGUAGEBOX_LONG_U=qbr(func_val(qbs_add(qbs_add(qbs_new_txt_len("&H",2),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[array_check((*_FUNC_IDELANGUAGEBOX_LONG_Y)-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5])])),(*_FUNC_IDELANGUAGEBOX_LONG_X* 8 )+( 1 ), 8 ,1)),qbs_new_txt_len("&",1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32533);}while(r); S_36194:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_U== 0 ))||new_error){ if(qbevent){evnt(32534);if(r)goto S_36194;} do{ *_FUNC_IDELANGUAGEBOX_LONG_U= 9744 ; if(!qbevent)break;evnt(32534);}while(r); } do{ sub__mapunicode(*_FUNC_IDELANGUAGEBOX_LONG_U,*_FUNC_IDELANGUAGEBOX_LONG_X); if(!qbevent)break;evnt(32535);}while(r); } fornext_exit_4136:; do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32543);}while(r); do{ sub_seek( 150 , 1049 ); if(!qbevent)break;evnt(32544);}while(r); do{ *_FUNC_IDELANGUAGEBOX_INTEGER_V=*_FUNC_IDELANGUAGEBOX_LONG_Y; if(!qbevent)break;evnt(32545);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDELANGUAGEBOX_INTEGER_V,2,byte_element_4138),0); if(!qbevent)break;evnt(32545);}while(r); do{ *__LONG_IDECPINDEX=*_FUNC_IDELANGUAGEBOX_INTEGER_V; if(!qbevent)break;evnt(32545);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(32546);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(32548);}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(32553);}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(32554);}while(r); }while(1); dl_exit_4128:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free116.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDELANGUAGEBOX_LONG_IDELANGUAGEBOX; } void SUB_IDEUPDATEOBJ(void*_SUB_IDEUPDATEOBJ_UDT_O,int32*_SUB_IDEUPDATEOBJ_LONG_FOCUS,int32*_SUB_IDEUPDATEOBJ_LONG_F,int32*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET,qbs*_SUB_IDEUPDATEOBJ_STRING_KK,qbs*_SUB_IDEUPDATEOBJ_STRING_ALTLETTER,int32*_SUB_IDEUPDATEOBJ_LONG_MB,int32*_SUB_IDEUPDATEOBJ_LONG_MOUSEDOWN,int32*_SUB_IDEUPDATEOBJ_LONG_MOUSEUP,int32*_SUB_IDEUPDATEOBJ_LONG_MX,int32*_SUB_IDEUPDATEOBJ_LONG_MY,int32*_SUB_IDEUPDATEOBJ_LONG_INFO,int32*_SUB_IDEUPDATEOBJ_LONG_MW){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data117.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(32562);}while(r); do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32563);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_T=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(36)); if(!qbevent)break;evnt(32565);}while(r); S_36213:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_T== 1 ))||new_error){ if(qbevent){evnt(32567);if(r)goto S_36213;} S_36214:; if ((*_SUB_IDEUPDATEOBJ_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(32568);if(r)goto S_36214;} do{ *_SUB_IDEUPDATEOBJ_LONG_X1=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(32569);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_Y=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(32569);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X2=*_SUB_IDEUPDATEOBJ_LONG_X1; if(!qbevent)break;evnt(32570);}while(r); S_36218:; if ((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(32571);if(r)goto S_36218;} do{ *_SUB_IDEUPDATEOBJ_LONG_X2=*_SUB_IDEUPDATEOBJ_LONG_X2+FUNC_IDEHLEN(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32572);}while(r); } S_36221:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MY>=(*_SUB_IDEUPDATEOBJ_LONG_Y- 1 )))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY<=(*_SUB_IDEUPDATEOBJ_LONG_Y+ 1 ))))||new_error){ if(qbevent){evnt(32574);if(r)goto S_36221;} S_36222:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX>=*_SUB_IDEUPDATEOBJ_LONG_X1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MX<=(*_SUB_IDEUPDATEOBJ_LONG_X2+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(28))+ 3 ))))||new_error){ if(qbevent){evnt(32575);if(r)goto S_36222;} do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F; if(!qbevent)break;evnt(32576);}while(r); S_36224:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_MY==*_SUB_IDEUPDATEOBJ_LONG_Y))||new_error){ if(qbevent){evnt(32578);if(r)goto S_36224;} S_36225:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX>(*_SUB_IDEUPDATEOBJ_LONG_X2+ 1 )))&(-(*_SUB_IDEUPDATEOBJ_LONG_MX<(*_SUB_IDEUPDATEOBJ_LONG_X2+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(28))+ 2 ))))||new_error){ if(qbevent){evnt(32579);if(r)goto S_36225;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32580);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X=*_SUB_IDEUPDATEOBJ_LONG_MX-*_SUB_IDEUPDATEOBJ_LONG_X2- 2 ; if(!qbevent)break;evnt(32581);}while(r); S_36228:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDEUPDATEOBJ_LONG_X==*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))))&(-(*_SUB_IDEUPDATEOBJ_LONG_X!=_SUB_IDEUPDATEOBJ_STRING_A->len))))||new_error){ if(qbevent){evnt(32582);if(r)goto S_36228;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32583);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_SUB_IDEUPDATEOBJ_STRING_A); if(!qbevent)break;evnt(32584);}while(r); do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))= 0 ; if(!qbevent)break;evnt(32585);}while(r); }else{ S_36233:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEUPDATEOBJ_LONG_X<=_SUB_IDEUPDATEOBJ_STRING_A->len)))||new_error){ if(qbevent){evnt(32587);if(r)goto S_36233;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=*_SUB_IDEUPDATEOBJ_LONG_X; if(!qbevent)break;evnt(32587);}while(r); }else{ do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=_SUB_IDEUPDATEOBJ_STRING_A->len; if(!qbevent)break;evnt(32587);}while(r); } } } } } } } S_36244:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(32594);if(r)goto S_36244;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32595);}while(r); S_36246:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEUPDATEOBJ_STRING_KK->len== 1 )))||new_error){ if(qbevent){evnt(32596);if(r)goto S_36246;} do{ *_SUB_IDEUPDATEOBJ_LONG_K=qbs_asc(_SUB_IDEUPDATEOBJ_STRING_KK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32597);}while(r); S_36248:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_K== 8 ))&(-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))> 0 )))||new_error){ if(qbevent){evnt(32598);if(r)goto S_36248;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A1,qbs_left(_SUB_IDEUPDATEOBJ_STRING_A,*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32599);}while(r); S_36250:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))<=_SUB_IDEUPDATEOBJ_STRING_A->len)))||new_error){ if(qbevent){evnt(32600);if(r)goto S_36250;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_right(_SUB_IDEUPDATEOBJ_STRING_A,_SUB_IDEUPDATEOBJ_STRING_A->len-*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32600);}while(r); }else{ do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32600);}while(r); } do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,qbs_add(_SUB_IDEUPDATEOBJ_STRING_A1,_SUB_IDEUPDATEOBJ_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32601);}while(r); do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))- 1 ; if(!qbevent)break;evnt(32601);}while(r); } S_36258:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_K!= 8 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_K!= 9 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_K!= 0 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_K!= 10 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_K!= 13 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_K!= 26 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_K!= 255 )))||new_error){ if(qbevent){evnt(32603);if(r)goto S_36258;} S_36259:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))> 0 ))||new_error){ if(qbevent){evnt(32604);if(r)goto S_36259;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A1,qbs_left(_SUB_IDEUPDATEOBJ_STRING_A,*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32604);}while(r); }else{ do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32604);}while(r); } S_36264:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))<=_SUB_IDEUPDATEOBJ_STRING_A->len)))||new_error){ if(qbevent){evnt(32605);if(r)goto S_36264;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_right(_SUB_IDEUPDATEOBJ_STRING_A,_SUB_IDEUPDATEOBJ_STRING_A->len-*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32605);}while(r); }else{ do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32605);}while(r); } do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,qbs_add(qbs_add(_SUB_IDEUPDATEOBJ_STRING_A1,_SUB_IDEUPDATEOBJ_STRING_KK),_SUB_IDEUPDATEOBJ_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32606);}while(r); do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))+ 1 ; if(!qbevent)break;evnt(32606);}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_SUB_IDEUPDATEOBJ_STRING_A); if(!qbevent)break;evnt(32608);}while(r); } S_36274:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("S",1))))))||new_error){ if(qbevent){evnt(32610);if(r)goto S_36274;} S_36275:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))> 0 ))||new_error){ if(qbevent){evnt(32611);if(r)goto S_36275;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A1,qbs_left(_SUB_IDEUPDATEOBJ_STRING_A,*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32611);}while(r); }else{ do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32611);}while(r); } S_36280:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))<_SUB_IDEUPDATEOBJ_STRING_A->len)))||new_error){ if(qbevent){evnt(32612);if(r)goto S_36280;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_right(_SUB_IDEUPDATEOBJ_STRING_A,_SUB_IDEUPDATEOBJ_STRING_A->len-*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32612);}while(r); }else{ do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32612);}while(r); } do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,qbs_add(_SUB_IDEUPDATEOBJ_STRING_A1,_SUB_IDEUPDATEOBJ_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32613);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_SUB_IDEUPDATEOBJ_STRING_A); if(!qbevent)break;evnt(32614);}while(r); } S_36288:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("V",1))))))||new_error){ if(qbevent){evnt(32617);if(r)goto S_36288;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32618);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X=func_instr(NULL,_SUB_IDEUPDATEOBJ_STRING_CLIP,func_chr( 13 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32619);}while(r); S_36291:; if ((*_SUB_IDEUPDATEOBJ_LONG_X)||new_error){ if(qbevent){evnt(32620);if(r)goto S_36291;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_CLIP,qbs_left(_SUB_IDEUPDATEOBJ_STRING_CLIP,*_SUB_IDEUPDATEOBJ_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32620);}while(r); } do{ *_SUB_IDEUPDATEOBJ_LONG_X=func_instr(NULL,_SUB_IDEUPDATEOBJ_STRING_CLIP,func_chr( 10 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32621);}while(r); S_36295:; if ((*_SUB_IDEUPDATEOBJ_LONG_X)||new_error){ if(qbevent){evnt(32622);if(r)goto S_36295;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_CLIP,qbs_left(_SUB_IDEUPDATEOBJ_STRING_CLIP,*_SUB_IDEUPDATEOBJ_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32622);}while(r); } S_36298:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEUPDATEOBJ_STRING_CLIP->len))||new_error){ if(qbevent){evnt(32623);if(r)goto S_36298;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,_SUB_IDEUPDATEOBJ_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32624);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_SUB_IDEUPDATEOBJ_STRING_A); if(!qbevent)break;evnt(32625);}while(r); do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=_SUB_IDEUPDATEOBJ_STRING_A->len; if(!qbevent)break;evnt(32626);}while(r); } } S_36304:; if ((qbs_cleanup(qbs_tmp_base,((*__LONG_KCTRL&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1)))))))||new_error){ if(qbevent){evnt(32630);if(r)goto S_36304;} do{ sub__clipboard(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32631);}while(r); } S_36307:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("K",1))))))||new_error){ if(qbevent){evnt(32635);if(r)goto S_36307;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))- 1 ; if(!qbevent)break;evnt(32635);}while(r); } S_36310:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("M",1))))))||new_error){ if(qbevent){evnt(32636);if(r)goto S_36310;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))+ 1 ; if(!qbevent)break;evnt(32636);}while(r); } S_36313:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("G",1))))))||new_error){ if(qbevent){evnt(32637);if(r)goto S_36313;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))= 0 ; if(!qbevent)break;evnt(32637);}while(r); } S_36316:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("O",1))))))||new_error){ if(qbevent){evnt(32638);if(r)goto S_36316;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=_SUB_IDEUPDATEOBJ_STRING_A->len; if(!qbevent)break;evnt(32638);}while(r); } S_36319:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))< 0 ))||new_error){ if(qbevent){evnt(32639);if(r)goto S_36319;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))= 0 ; if(!qbevent)break;evnt(32639);}while(r); } S_36322:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))>_SUB_IDEUPDATEOBJ_STRING_A->len)))||new_error){ if(qbevent){evnt(32640);if(r)goto S_36322;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))=_SUB_IDEUPDATEOBJ_STRING_A->len; if(!qbevent)break;evnt(32640);}while(r); } } S_36326:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEUPDATEOBJ_STRING_ALTLETTER->len))||new_error){ if(qbevent){evnt(32643);if(r)goto S_36326;} S_36327:; if ((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(32644);if(r)goto S_36327;} do{ *_SUB_IDEUPDATEOBJ_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32645);}while(r); S_36329:; if ((*_SUB_IDEUPDATEOBJ_LONG_X)||new_error){ if(qbevent){evnt(32646);if(r)goto S_36329;} S_36330:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_SUB_IDEUPDATEOBJ_LONG_X+ 1 , 1 ,1)),_SUB_IDEUPDATEOBJ_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(32647);if(r)goto S_36330;} do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F; if(!qbevent)break;evnt(32647);}while(r); } } } } do{ *_SUB_IDEUPDATEOBJ_LONG_F=*_SUB_IDEUPDATEOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(32651);}while(r); } S_36338:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_T== 2 ))||new_error){ if(qbevent){evnt(32654);if(r)goto S_36338;} do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(32655);}while(r); S_36340:; if ((*_SUB_IDEUPDATEOBJ_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(32657);if(r)goto S_36340;} do{ *_SUB_IDEUPDATEOBJ_LONG_X1=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(32658);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_Y1=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(32658);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X2=*_SUB_IDEUPDATEOBJ_LONG_X1+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(28))+ 1 ; if(!qbevent)break;evnt(32659);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_Y2=*_SUB_IDEUPDATEOBJ_LONG_Y1+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(32))+ 1 ; if(!qbevent)break;evnt(32659);}while(r); S_36345:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX>=*_SUB_IDEUPDATEOBJ_LONG_X1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MX<=*_SUB_IDEUPDATEOBJ_LONG_X2))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY>=*_SUB_IDEUPDATEOBJ_LONG_Y1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY<=*_SUB_IDEUPDATEOBJ_LONG_Y2)))||new_error){ if(qbevent){evnt(32660);if(r)goto S_36345;} do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F; if(!qbevent)break;evnt(32661);}while(r); S_36347:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX>*_SUB_IDEUPDATEOBJ_LONG_X1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MX<*_SUB_IDEUPDATEOBJ_LONG_X2))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY>*_SUB_IDEUPDATEOBJ_LONG_Y1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY<*_SUB_IDEUPDATEOBJ_LONG_Y2)))||new_error){ if(qbevent){evnt(32662);if(r)goto S_36347;} do{ *_SUB_IDEUPDATEOBJ_LONG_Y=*_SUB_IDEUPDATEOBJ_LONG_MY-*_SUB_IDEUPDATEOBJ_LONG_Y1- 1 ; if(!qbevent)break;evnt(32663);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_Y=*_SUB_IDEUPDATEOBJ_LONG_Y+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72)); if(!qbevent)break;evnt(32664);}while(r); S_36350:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))==*_SUB_IDEUPDATEOBJ_LONG_Y))||new_error){ if(qbevent){evnt(32665);if(r)goto S_36350;} do{ *_SUB_IDEUPDATEOBJ_LONG_INFO= 1 ; if(!qbevent)break;evnt(32665);}while(r); } do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*_SUB_IDEUPDATEOBJ_LONG_Y; if(!qbevent)break;evnt(32666);}while(r); S_36354:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76))))||new_error){ if(qbevent){evnt(32667);if(r)goto S_36354;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76)); if(!qbevent)break;evnt(32667);}while(r); } } } } S_36360:; if ((*_SUB_IDEUPDATEOBJ_LONG_MB)||new_error){ if(qbevent){evnt(32673);if(r)goto S_36360;} S_36361:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(32674);if(r)goto S_36361;} do{ *_SUB_IDEUPDATEOBJ_LONG_X1=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(32676);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_Y1=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(32676);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X2=*_SUB_IDEUPDATEOBJ_LONG_X1+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(28))+ 1 ; if(!qbevent)break;evnt(32677);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_Y2=*_SUB_IDEUPDATEOBJ_LONG_Y1+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(32))+ 1 ; if(!qbevent)break;evnt(32677);}while(r); S_36366:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX>=*_SUB_IDEUPDATEOBJ_LONG_X1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MX<=*_SUB_IDEUPDATEOBJ_LONG_X2))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY>=*_SUB_IDEUPDATEOBJ_LONG_Y1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY<=*_SUB_IDEUPDATEOBJ_LONG_Y2)))||new_error){ if(qbevent){evnt(32678);if(r)goto S_36366;} S_36367:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX==*_SUB_IDEUPDATEOBJ_LONG_X2))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY>(*_SUB_IDEUPDATEOBJ_LONG_Y1+ 1 )))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY<(*_SUB_IDEUPDATEOBJ_LONG_Y2- 1 ))))||new_error){ if(qbevent){evnt(32680);if(r)goto S_36367;} do{ *_SUB_IDEUPDATEOBJ_LONG_TSEL=func_abs((int32)(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64)))); if(!qbevent)break;evnt(32682);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_TNUM=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76)); if(!qbevent)break;evnt(32683);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_Q=FUNC_IDEVBAR(_SUB_IDEUPDATEOBJ_LONG_X2,&(pass4157=*_SUB_IDEUPDATEOBJ_LONG_Y1+ 1 ),(int32*)(void*)( ((char*)(_SUB_IDEUPDATEOBJ_UDT_O)) + (32) ),_SUB_IDEUPDATEOBJ_LONG_TSEL,_SUB_IDEUPDATEOBJ_LONG_TNUM); if(!qbevent)break;evnt(32684);}while(r); S_36371:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_MY<*_SUB_IDEUPDATEOBJ_LONG_Q))||new_error){ if(qbevent){evnt(32686);if(r)goto S_36371;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 73 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32687);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(32688);}while(r); } S_36375:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_MY>*_SUB_IDEUPDATEOBJ_LONG_Q))||new_error){ if(qbevent){evnt(32690);if(r)goto S_36375;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 81 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32691);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(32692);}while(r); } } S_36380:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX==*_SUB_IDEUPDATEOBJ_LONG_X2))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY==(*_SUB_IDEUPDATEOBJ_LONG_Y1+ 1 ))))||new_error){ if(qbevent){evnt(32696);if(r)goto S_36380;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 72 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32697);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(32698);}while(r); } S_36384:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX==*_SUB_IDEUPDATEOBJ_LONG_X2))&(-(*_SUB_IDEUPDATEOBJ_LONG_MY==(*_SUB_IDEUPDATEOBJ_LONG_Y2- 1 ))))||new_error){ if(qbevent){evnt(32700);if(r)goto S_36384;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 80 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32701);}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(32702);}while(r); } } } } S_36391:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(32710);if(r)goto S_36391;} S_36392:; if ((*_SUB_IDEUPDATEOBJ_LONG_MW)||new_error){ if(qbevent){evnt(32711);if(r)goto S_36392;} S_36393:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_MW< 0 ))||new_error){ if(qbevent){evnt(32713);if(r)goto S_36393;} S_36394:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))))||new_error){ if(qbevent){evnt(32714);if(r)goto S_36394;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72)); if(!qbevent)break;evnt(32714);}while(r); } }else{ do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(72))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(32))- 1 ; if(!qbevent)break;evnt(32716);}while(r); } do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))+(*_SUB_IDEUPDATEOBJ_LONG_MW* 3 ); if(!qbevent)break;evnt(32718);}while(r); S_36401:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))< 1 ))||new_error){ if(qbevent){evnt(32719);if(r)goto S_36401;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(32719);}while(r); } S_36404:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76))))||new_error){ if(qbevent){evnt(32720);if(r)goto S_36404;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76)); if(!qbevent)break;evnt(32720);}while(r); } } S_36408:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 72 ))))))||new_error){ if(qbevent){evnt(32723);if(r)goto S_36408;} S_36409:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(32724);if(r)goto S_36409;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))); if(!qbevent)break;evnt(32725);}while(r); }else{ do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))- 1 ; if(!qbevent)break;evnt(32727);}while(r); S_36413:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))< 1 ))||new_error){ if(qbevent){evnt(32728);if(r)goto S_36413;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(32728);}while(r); } } } S_36418:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 80 ))))))||new_error){ if(qbevent){evnt(32732);if(r)goto S_36418;} S_36419:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(32733);if(r)goto S_36419;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))); if(!qbevent)break;evnt(32734);}while(r); }else{ do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))+ 1 ; if(!qbevent)break;evnt(32736);}while(r); S_36423:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76))))||new_error){ if(qbevent){evnt(32737);if(r)goto S_36423;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76)); if(!qbevent)break;evnt(32737);}while(r); } } } S_36428:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 73 ))))))||new_error){ if(qbevent){evnt(32741);if(r)goto S_36428;} S_36429:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(32742);if(r)goto S_36429;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))); if(!qbevent)break;evnt(32743);}while(r); } do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))-*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(32))+ 1 ; if(!qbevent)break;evnt(32745);}while(r); S_36433:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))< 1 ))||new_error){ if(qbevent){evnt(32746);if(r)goto S_36433;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(32746);}while(r); } } S_36437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 81 ))))))||new_error){ if(qbevent){evnt(32749);if(r)goto S_36437;} S_36438:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(32750);if(r)goto S_36438;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))); if(!qbevent)break;evnt(32751);}while(r); } do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(32))- 1 ; if(!qbevent)break;evnt(32753);}while(r); S_36442:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76))))||new_error){ if(qbevent){evnt(32754);if(r)goto S_36442;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76)); if(!qbevent)break;evnt(32754);}while(r); } } S_36446:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("w",1))))))||new_error){ if(qbevent){evnt(32757);if(r)goto S_36446;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(32758);}while(r); } S_36449:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("u",1))))))||new_error){ if(qbevent){evnt(32761);if(r)goto S_36449;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(76)); if(!qbevent)break;evnt(32762);}while(r); } S_36452:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEUPDATEOBJ_STRING_KK->len== 1 )))||new_error){ if(qbevent){evnt(32765);if(r)goto S_36452;} do{ *_SUB_IDEUPDATEOBJ_LONG_K=qbs_asc(qbs_ucase(_SUB_IDEUPDATEOBJ_STRING_KK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32766);}while(r); S_36454:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_K< 32 ))|(-(*_SUB_IDEUPDATEOBJ_LONG_K> 126 )))||new_error){ if(qbevent){evnt(32766);if(r)goto S_36454;} do{ *_SUB_IDEUPDATEOBJ_LONG_K= 255 ; if(!qbevent)break;evnt(32766);}while(r); } do{ *_SUB_IDEUPDATEOBJ_LONG_OLD_SEL=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64)); if(!qbevent)break;evnt(32768);}while(r); do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32769);}while(r); LABEL_RETRYFIND:; if(qbevent){evnt(32771);r=0;} do{ *_SUB_IDEUPDATEOBJ_LONG_N= 1 ; if(!qbevent)break;evnt(32772);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X= 1 ; if(!qbevent)break;evnt(32773);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X2=func_instr(*_SUB_IDEUPDATEOBJ_LONG_X,_SUB_IDEUPDATEOBJ_STRING_A,_SUB_IDEUPDATEOBJ_STRING1_SEP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32774);}while(r); S_36462:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEUPDATEOBJ_STRING_A->len))||new_error){ if(qbevent){evnt(32775);if(r)goto S_36462;} do{ *_SUB_IDEUPDATEOBJ_LONG_AGAIN= 1 ; if(!qbevent)break;evnt(32775);}while(r); }else{ do{ *_SUB_IDEUPDATEOBJ_LONG_AGAIN= 0 ; if(!qbevent)break;evnt(32775);}while(r); } S_36467:; while(((-(*_SUB_IDEUPDATEOBJ_LONG_X2!= 0 ))|(-(*_SUB_IDEUPDATEOBJ_LONG_AGAIN!= 0 )))||new_error){ if(qbevent){evnt(32776);if(r)goto S_36467;} S_36468:; if ((*_SUB_IDEUPDATEOBJ_LONG_X2)||new_error){ if(qbevent){evnt(32777);if(r)goto S_36468;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_CA2,func_mid(_SUB_IDEUPDATEOBJ_STRING_A,*_SUB_IDEUPDATEOBJ_LONG_X,*_SUB_IDEUPDATEOBJ_LONG_X2-*_SUB_IDEUPDATEOBJ_LONG_X,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32778);}while(r); do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_ucase(_SUB_IDEUPDATEOBJ_STRING_CA2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32779);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X=*_SUB_IDEUPDATEOBJ_LONG_X2+ 1 ; if(!qbevent)break;evnt(32780);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_AGAIN= 1 ; if(!qbevent)break;evnt(32781);}while(r); }else{ do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_CA2,qbs_right(_SUB_IDEUPDATEOBJ_STRING_A,_SUB_IDEUPDATEOBJ_STRING_A->len-*_SUB_IDEUPDATEOBJ_LONG_X+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32783);}while(r); do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_ucase(_SUB_IDEUPDATEOBJ_STRING_CA2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32784);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_AGAIN= 0 ; if(!qbevent)break;evnt(32785);}while(r); } S_36478:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_N>*_SUB_IDEUPDATEOBJ_LONG_OLD_SEL))||new_error){ if(qbevent){evnt(32788);if(r)goto S_36478;} do{ *_SUB_IDEUPDATEOBJ_LONG_MATCH= 0 ; if(!qbevent)break;evnt(32789);}while(r); S_36480:; fornext_value4163= 1 ; fornext_finalvalue4163=_SUB_IDEUPDATEOBJ_STRING_A2->len; fornext_step4163= 1 ; if (fornext_step4163<0) fornext_step_negative4163=1; else fornext_step_negative4163=0; if (new_error) goto fornext_error4163; goto fornext_entrylabel4163; while(1){ fornext_value4163=fornext_step4163+(*_SUB_IDEUPDATEOBJ_LONG_AI); fornext_entrylabel4163: *_SUB_IDEUPDATEOBJ_LONG_AI=fornext_value4163; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4163){ if (fornext_value4163fornext_finalvalue4163) break; } fornext_error4163:; if(qbevent){evnt(32790);if(r)goto S_36480;} do{ *_SUB_IDEUPDATEOBJ_LONG_AA=qbs_asc(_SUB_IDEUPDATEOBJ_STRING_A2,*_SUB_IDEUPDATEOBJ_LONG_AI); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32791);}while(r); S_36482:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_AA> 126 ))|(((-(*_SUB_IDEUPDATEOBJ_LONG_K!= 95 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_AA== 95 )))))||new_error){ if(qbevent){evnt(32792);if(r)goto S_36482;} }else{ S_36484:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_AA==*_SUB_IDEUPDATEOBJ_LONG_K))||new_error){ if(qbevent){evnt(32795);if(r)goto S_36484;} do{ *_SUB_IDEUPDATEOBJ_LONG_MATCH= 1 ; if(!qbevent)break;evnt(32795);}while(r); } do{ goto fornext_exit_4162; if(!qbevent)break;evnt(32796);}while(r); } } fornext_exit_4162:; S_36490:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_MATCH== 1 ))||new_error){ if(qbevent){evnt(32799);if(r)goto S_36490;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*_SUB_IDEUPDATEOBJ_LONG_N; if(!qbevent)break;evnt(32800);}while(r); do{ goto LABEL_SELECTED; if(!qbevent)break;evnt(32801);}while(r); } } S_36495:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_N==*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))))||new_error){ if(qbevent){evnt(32805);if(r)goto S_36495;} do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(68)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_SUB_IDEUPDATEOBJ_STRING_CA2); if(!qbevent)break;evnt(32805);}while(r); } do{ *_SUB_IDEUPDATEOBJ_LONG_N=*_SUB_IDEUPDATEOBJ_LONG_N+ 1 ; if(!qbevent)break;evnt(32806);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X2=func_instr(*_SUB_IDEUPDATEOBJ_LONG_X,_SUB_IDEUPDATEOBJ_STRING_A,_SUB_IDEUPDATEOBJ_STRING1_SEP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32807);}while(r); } dl_exit_4160:; S_36501:; if ((*_SUB_IDEUPDATEOBJ_LONG_OLD_SEL)||new_error){ if(qbevent){evnt(32809);if(r)goto S_36501;} do{ *_SUB_IDEUPDATEOBJ_LONG_OLD_SEL= 0 ; if(!qbevent)break;evnt(32809);}while(r); do{ goto LABEL_RETRYFIND; if(!qbevent)break;evnt(32809);}while(r); } LABEL_SELECTED:; if(qbevent){evnt(32810);r=0;} } } S_36507:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEUPDATEOBJ_STRING_ALTLETTER->len))||new_error){ if(qbevent){evnt(32816);if(r)goto S_36507;} S_36508:; if ((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(32817);if(r)goto S_36508;} do{ *_SUB_IDEUPDATEOBJ_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32818);}while(r); S_36510:; if ((*_SUB_IDEUPDATEOBJ_LONG_X)||new_error){ if(qbevent){evnt(32819);if(r)goto S_36510;} S_36511:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_SUB_IDEUPDATEOBJ_LONG_X+ 1 , 1 ,1)),_SUB_IDEUPDATEOBJ_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(32820);if(r)goto S_36511;} do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F; if(!qbevent)break;evnt(32820);}while(r); } } } } do{ *_SUB_IDEUPDATEOBJ_LONG_F=*_SUB_IDEUPDATEOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(32824);}while(r); } S_36519:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_T== 3 ))||new_error){ if(qbevent){evnt(32827);if(r)goto S_36519;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32830);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_N= 1 ; if(!qbevent)break;evnt(32831);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X= 0 ; if(!qbevent)break;evnt(32832);}while(r); S_36523:; fornext_value4167= 1 ; fornext_finalvalue4167=_SUB_IDEUPDATEOBJ_STRING_A->len; fornext_step4167= 1 ; if (fornext_step4167<0) fornext_step_negative4167=1; else fornext_step_negative4167=0; if (new_error) goto fornext_error4167; goto fornext_entrylabel4167; while(1){ fornext_value4167=fornext_step4167+(*_SUB_IDEUPDATEOBJ_LONG_I2); fornext_entrylabel4167: *_SUB_IDEUPDATEOBJ_LONG_I2=fornext_value4167; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4167){ if (fornext_value4167fornext_finalvalue4167) break; } fornext_error4167:; if(qbevent){evnt(32833);if(r)goto S_36523;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,func_mid(_SUB_IDEUPDATEOBJ_STRING_A,*_SUB_IDEUPDATEOBJ_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32834);}while(r); S_36525:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(32835);if(r)goto S_36525;} do{ *_SUB_IDEUPDATEOBJ_LONG_N=*_SUB_IDEUPDATEOBJ_LONG_N+ 1 ; if(!qbevent)break;evnt(32835);}while(r); } S_36528:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_X== 1 ))||new_error){ if(qbevent){evnt(32836);if(r)goto S_36528;} S_36529:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_IDEUPDATEOBJ_STRING_A2),_SUB_IDEUPDATEOBJ_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(32837);if(r)goto S_36529;} do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F+*_SUB_IDEUPDATEOBJ_LONG_N- 1 ; if(!qbevent)break;evnt(32838);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_INFO=*_SUB_IDEUPDATEOBJ_LONG_N; if(!qbevent)break;evnt(32839);}while(r); } } S_36534:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_A2,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(32842);if(r)goto S_36534;} do{ *_SUB_IDEUPDATEOBJ_LONG_X= 1 ; if(!qbevent)break;evnt(32842);}while(r); }else{ do{ *_SUB_IDEUPDATEOBJ_LONG_X= 0 ; if(!qbevent)break;evnt(32842);}while(r); } } fornext_exit_4166:; S_36540:; if ((*_SUB_IDEUPDATEOBJ_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(32846);if(r)goto S_36540;} S_36541:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_MY==(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(24)))))||new_error){ if(qbevent){evnt(32847);if(r)goto S_36541;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32848);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_N= 1 ; if(!qbevent)break;evnt(32849);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_C= 0 ; if(!qbevent)break;evnt(32850);}while(r); S_36545:; fornext_value4170= 1 ; fornext_finalvalue4170=_SUB_IDEUPDATEOBJ_STRING_A->len; fornext_step4170= 1 ; if (fornext_step4170<0) fornext_step_negative4170=1; else fornext_step_negative4170=0; if (new_error) goto fornext_error4170; goto fornext_entrylabel4170; while(1){ fornext_value4170=fornext_step4170+(*_SUB_IDEUPDATEOBJ_LONG_I2); fornext_entrylabel4170: *_SUB_IDEUPDATEOBJ_LONG_I2=fornext_value4170; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4170){ if (fornext_value4170fornext_finalvalue4170) break; } fornext_error4170:; if(qbevent){evnt(32851);if(r)goto S_36545;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,func_mid(_SUB_IDEUPDATEOBJ_STRING_A,*_SUB_IDEUPDATEOBJ_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32852);}while(r); S_36547:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(32853);if(r)goto S_36547;} do{ *_SUB_IDEUPDATEOBJ_LONG_N=*_SUB_IDEUPDATEOBJ_LONG_N+ 1 ; if(!qbevent)break;evnt(32854);}while(r); }else{ S_36550:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEUPDATEOBJ_STRING_A,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(32856);if(r)goto S_36550;} do{ *_SUB_IDEUPDATEOBJ_LONG_C=*_SUB_IDEUPDATEOBJ_LONG_C+ 1 ; if(!qbevent)break;evnt(32856);}while(r); } } } fornext_exit_4169:; do{ *_SUB_IDEUPDATEOBJ_LONG_W=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(28)); if(!qbevent)break;evnt(32859);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_C=*_SUB_IDEUPDATEOBJ_LONG_C+(*_SUB_IDEUPDATEOBJ_LONG_N* 4 ); if(!qbevent)break;evnt(32860);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_WHITESPACE=*_SUB_IDEUPDATEOBJ_LONG_W-*_SUB_IDEUPDATEOBJ_LONG_C; if(!qbevent)break;evnt(32861);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_SPACING=*_SUB_IDEUPDATEOBJ_LONG_WHITESPACE/ (*_SUB_IDEUPDATEOBJ_LONG_N+ 1 ); if(!qbevent)break;evnt(32862);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_N2= 1 ; if(!qbevent)break;evnt(32867);}while(r); do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32868);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(32870);}while(r); S_36562:; fornext_value4173= 1 ; fornext_finalvalue4173=_SUB_IDEUPDATEOBJ_STRING_A->len; fornext_step4173= 1 ; if (fornext_step4173<0) fornext_step_negative4173=1; else fornext_step_negative4173=0; if (new_error) goto fornext_error4173; goto fornext_entrylabel4173; while(1){ fornext_value4173=fornext_step4173+(*_SUB_IDEUPDATEOBJ_LONG_I2); fornext_entrylabel4173: *_SUB_IDEUPDATEOBJ_LONG_I2=fornext_value4173; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4173){ if (fornext_value4173fornext_finalvalue4173) break; } fornext_error4173:; if(qbevent){evnt(32872);if(r)goto S_36562;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A2,func_mid(_SUB_IDEUPDATEOBJ_STRING_A,*_SUB_IDEUPDATEOBJ_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32873);}while(r); S_36564:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEUPDATEOBJ_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(32874);if(r)goto S_36564;} do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A3,qbs_add(_SUB_IDEUPDATEOBJ_STRING_A3,_SUB_IDEUPDATEOBJ_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32874);}while(r); } S_36567:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDEUPDATEOBJ_STRING_A2,func_chr( 0 )))|(-(*_SUB_IDEUPDATEOBJ_LONG_I2==_SUB_IDEUPDATEOBJ_STRING_A->len))))||new_error){ if(qbevent){evnt(32875);if(r)goto S_36567;} do{ *_SUB_IDEUPDATEOBJ_LONG_X=*_SUB_IDEUPDATEOBJ_LONG_X+*_SUB_IDEUPDATEOBJ_LONG_SPACING; if(!qbevent)break;evnt(32877);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X2=FUNC_IDEHLEN(_SUB_IDEUPDATEOBJ_STRING_A3)+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32887);}while(r); S_36570:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX>=*_SUB_IDEUPDATEOBJ_LONG_X))&(-(*_SUB_IDEUPDATEOBJ_LONG_MX<(*_SUB_IDEUPDATEOBJ_LONG_X+*_SUB_IDEUPDATEOBJ_LONG_X2))))||new_error){ if(qbevent){evnt(32888);if(r)goto S_36570;} do{ *_SUB_IDEUPDATEOBJ_LONG_INFO=*_SUB_IDEUPDATEOBJ_LONG_N2; if(!qbevent)break;evnt(32888);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F+*_SUB_IDEUPDATEOBJ_LONG_N2- 1 ; if(!qbevent)break;evnt(32888);}while(r); } do{ *_SUB_IDEUPDATEOBJ_LONG_X=*_SUB_IDEUPDATEOBJ_LONG_X+*_SUB_IDEUPDATEOBJ_LONG_X2; if(!qbevent)break;evnt(32891);}while(r); do{ qbs_set(_SUB_IDEUPDATEOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32892);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_N2=*_SUB_IDEUPDATEOBJ_LONG_N2+ 1 ; if(!qbevent)break;evnt(32893);}while(r); } } fornext_exit_4172:; } } S_36581:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET>= 0 ))&(-(*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET<*_SUB_IDEUPDATEOBJ_LONG_N)))||new_error){ if(qbevent){evnt(32900);if(r)goto S_36581;} do{ *_SUB_IDEUPDATEOBJ_LONG_F2=*_SUB_IDEUPDATEOBJ_LONG_F+*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET; if(!qbevent)break;evnt(32901);}while(r); S_36583:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,func_chr( 13 ))))||new_error){ if(qbevent){evnt(32902);if(r)goto S_36583;} do{ *_SUB_IDEUPDATEOBJ_LONG_INFO=*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET+ 1 ; if(!qbevent)break;evnt(32903);}while(r); } } do{ *_SUB_IDEUPDATEOBJ_LONG_F=*_SUB_IDEUPDATEOBJ_LONG_F+*_SUB_IDEUPDATEOBJ_LONG_N; if(!qbevent)break;evnt(32907);}while(r); } S_36589:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_T== 4 ))||new_error){ if(qbevent){evnt(32910);if(r)goto S_36589;} S_36590:; if ((*_SUB_IDEUPDATEOBJ_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(32912);if(r)goto S_36590;} do{ *_SUB_IDEUPDATEOBJ_LONG_Y=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(24)); if(!qbevent)break;evnt(32913);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X1=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(20)); if(!qbevent)break;evnt(32914);}while(r); do{ *_SUB_IDEUPDATEOBJ_LONG_X2=*_SUB_IDEUPDATEOBJ_LONG_X1+ 2 ; if(!qbevent)break;evnt(32914);}while(r); S_36594:; if ((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(32915);if(r)goto S_36594;} do{ *_SUB_IDEUPDATEOBJ_LONG_X2=*_SUB_IDEUPDATEOBJ_LONG_X2+ 1 +FUNC_IDEHLEN(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32916);}while(r); } S_36597:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_MY==*_SUB_IDEUPDATEOBJ_LONG_Y))||new_error){ if(qbevent){evnt(32918);if(r)goto S_36597;} S_36598:; if (((-(*_SUB_IDEUPDATEOBJ_LONG_MX>=*_SUB_IDEUPDATEOBJ_LONG_X1))&(-(*_SUB_IDEUPDATEOBJ_LONG_MX<=*_SUB_IDEUPDATEOBJ_LONG_X2)))||new_error){ if(qbevent){evnt(32919);if(r)goto S_36598;} do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F; if(!qbevent)break;evnt(32920);}while(r); do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))+ 1 ; if(!qbevent)break;evnt(32921);}while(r); S_36601:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))> 1 ))||new_error){ if(qbevent){evnt(32921);if(r)goto S_36601;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 0 ; if(!qbevent)break;evnt(32921);}while(r); } } } } S_36607:; if ((-(*_SUB_IDEUPDATEOBJ_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(32925);if(r)goto S_36607;} S_36608:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("H",1))))))||new_error){ if(qbevent){evnt(32956);if(r)goto S_36608;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(32956);}while(r); } S_36611:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("P",1))))))||new_error){ if(qbevent){evnt(32957);if(r)goto S_36611;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 0 ; if(!qbevent)break;evnt(32957);}while(r); } S_36614:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEUPDATEOBJ_STRING_KK,qbs_new_txt_len(" ",1))))||new_error){ if(qbevent){evnt(32958);if(r)goto S_36614;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))+ 1 ; if(!qbevent)break;evnt(32959);}while(r); S_36616:; if ((-(*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))> 1 ))||new_error){ if(qbevent){evnt(32959);if(r)goto S_36616;} do{ *(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(64))= 0 ; if(!qbevent)break;evnt(32959);}while(r); } } } S_36621:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEUPDATEOBJ_STRING_ALTLETTER->len))||new_error){ if(qbevent){evnt(32964);if(r)goto S_36621;} S_36622:; if ((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(32965);if(r)goto S_36622;} do{ *_SUB_IDEUPDATEOBJ_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32966);}while(r); S_36624:; if ((*_SUB_IDEUPDATEOBJ_LONG_X)||new_error){ if(qbevent){evnt(32967);if(r)goto S_36624;} S_36625:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEUPDATEOBJ_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_SUB_IDEUPDATEOBJ_LONG_X+ 1 , 1 ,1)),_SUB_IDEUPDATEOBJ_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(32968);if(r)goto S_36625;} do{ *_SUB_IDEUPDATEOBJ_LONG_FOCUS=*_SUB_IDEUPDATEOBJ_LONG_F; if(!qbevent)break;evnt(32968);}while(r); } } } } do{ *_SUB_IDEUPDATEOBJ_LONG_F=*_SUB_IDEUPDATEOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(32972);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free117.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_IDEVBAR(int32*_FUNC_IDEVBAR_LONG_X,int32*_FUNC_IDEVBAR_LONG_Y,int32*_FUNC_IDEVBAR_LONG_H,int32*_FUNC_IDEVBAR_LONG_I2,int32*_FUNC_IDEVBAR_LONG_N2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data118.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_IDEVBAR_LONG_I=*_FUNC_IDEVBAR_LONG_I2; if(!qbevent)break;evnt(32979);}while(r); do{ *_FUNC_IDEVBAR_LONG_N=*_FUNC_IDEVBAR_LONG_N2; if(!qbevent)break;evnt(32979);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(32984);}while(r); do{ qbg_sub_locate(*_FUNC_IDEVBAR_LONG_Y,*_FUNC_IDEVBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32985);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr( 24 )); if (new_error) goto skip4177; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4177: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32985);}while(r); do{ qbg_sub_locate(*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 1 ,*_FUNC_IDEVBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32986);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr( 25 )); if (new_error) goto skip4178; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4178: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32986);}while(r); S_36640:; fornext_value4180=*_FUNC_IDEVBAR_LONG_Y+ 1 ; fornext_finalvalue4180=*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 2 ; fornext_step4180= 1 ; if (fornext_step4180<0) fornext_step_negative4180=1; else fornext_step_negative4180=0; if (new_error) goto fornext_error4180; goto fornext_entrylabel4180; while(1){ fornext_value4180=fornext_step4180+(*_FUNC_IDEVBAR_LONG_Y2); fornext_entrylabel4180: *_FUNC_IDEVBAR_LONG_Y2=fornext_value4180; if (fornext_step_negative4180){ if (fornext_value4180fornext_finalvalue4180) break; } fornext_error4180:; if(qbevent){evnt(32987);if(r)goto S_36640;} do{ qbg_sub_locate(*_FUNC_IDEVBAR_LONG_Y2,*_FUNC_IDEVBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(32988);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\260",1)); if (new_error) goto skip4181; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4181: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(32988);}while(r); } fornext_exit_4179:; S_36644:; if ((-(*_FUNC_IDEVBAR_LONG_N< 1 ))||new_error){ if(qbevent){evnt(32993);if(r)goto S_36644;} do{ *_FUNC_IDEVBAR_LONG_N= 1 ; if(!qbevent)break;evnt(32993);}while(r); } S_36647:; if ((-(*_FUNC_IDEVBAR_LONG_I< 1 ))||new_error){ if(qbevent){evnt(32994);if(r)goto S_36647;} do{ *_FUNC_IDEVBAR_LONG_I= 1 ; if(!qbevent)break;evnt(32994);}while(r); } S_36650:; if ((-(*_FUNC_IDEVBAR_LONG_I>*_FUNC_IDEVBAR_LONG_N))||new_error){ if(qbevent){evnt(32995);if(r)goto S_36650;} do{ *_FUNC_IDEVBAR_LONG_I=*_FUNC_IDEVBAR_LONG_N; if(!qbevent)break;evnt(32995);}while(r); } S_36653:; if ((-(*_FUNC_IDEVBAR_LONG_H== 2 ))||new_error){ if(qbevent){evnt(32997);if(r)goto S_36653;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y; if(!qbevent)break;evnt(32998);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(32999);}while(r); } S_36657:; if ((-(*_FUNC_IDEVBAR_LONG_H== 3 ))||new_error){ if(qbevent){evnt(33002);if(r)goto S_36657;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(33003);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33005);}while(r); } S_36661:; if ((-(*_FUNC_IDEVBAR_LONG_H== 4 ))||new_error){ if(qbevent){evnt(33008);if(r)goto S_36661;} S_36662:; if ((-(*_FUNC_IDEVBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(33009);if(r)goto S_36662;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(33010);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33012);}while(r); }else{ do{ *_FUNC_IDEVBAR_SINGLE_P=(*_FUNC_IDEVBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEVBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(33015);}while(r); S_36667:; if ((-(((float)(*_FUNC_IDEVBAR_SINGLE_P))<((float)( 0.5E+0 ))))||new_error){ if(qbevent){evnt(33016);if(r)goto S_36667;} do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(33016);}while(r); }else{ do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 2 ; if(!qbevent)break;evnt(33016);}while(r); } do{ qbg_sub_locate(*_FUNC_IDEVBAR_LONG_Y2,*_FUNC_IDEVBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(33017);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip4182; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4182: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33017);}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(33018);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33019);}while(r); } } S_36678:; if ((-(*_FUNC_IDEVBAR_LONG_H> 4 ))||new_error){ if(qbevent){evnt(33023);if(r)goto S_36678;} S_36679:; if ((-(*_FUNC_IDEVBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(33024);if(r)goto S_36679;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+(*_FUNC_IDEVBAR_LONG_H/ 4 ); if(!qbevent)break;evnt(33025);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33027);}while(r); } S_36683:; if ((-(*_FUNC_IDEVBAR_LONG_I== 1 ))||new_error){ if(qbevent){evnt(33029);if(r)goto S_36683;} do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(33030);}while(r); do{ qbg_sub_locate(*_FUNC_IDEVBAR_LONG_Y2,*_FUNC_IDEVBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(33031);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip4183; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4183: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33031);}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(33032);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33033);}while(r); } S_36690:; if ((-(*_FUNC_IDEVBAR_LONG_I==*_FUNC_IDEVBAR_LONG_N))||new_error){ if(qbevent){evnt(33035);if(r)goto S_36690;} do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 2 ; if(!qbevent)break;evnt(33036);}while(r); do{ qbg_sub_locate(*_FUNC_IDEVBAR_LONG_Y2,*_FUNC_IDEVBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(33037);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip4184; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4184: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33037);}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(33038);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33039);}while(r); } do{ *_FUNC_IDEVBAR_SINGLE_P=(*_FUNC_IDEVBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEVBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(33042);}while(r); do{ *_FUNC_IDEVBAR_SINGLE_P=*_FUNC_IDEVBAR_SINGLE_P*(*_FUNC_IDEVBAR_LONG_H- 4 ); if(!qbevent)break;evnt(33043);}while(r); do{ *_FUNC_IDEVBAR_LONG_Y2=qbr(*_FUNC_IDEVBAR_LONG_Y+ 2 +floor(*_FUNC_IDEVBAR_SINGLE_P)); if(!qbevent)break;evnt(33044);}while(r); do{ qbg_sub_locate(*_FUNC_IDEVBAR_LONG_Y2,*_FUNC_IDEVBAR_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(33045);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\333",1)); if (new_error) goto skip4185; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4185: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33045);}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(33046);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33047);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free118.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEVBAR_LONG_IDEVBAR; } void SUB_IDEWAIT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data119.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub__delay( 0.1E+0 ); if(!qbevent)break;evnt(33052);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free119.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEWAIT4ALT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data120.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free120.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDEWAIT4MOUS(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data121.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free121.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDEZFILENAME(qbs*_FUNC_IDEZFILENAME_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data122.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_36706:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33065);if(r)goto S_36706;} do{ qbs_set(_FUNC_IDEZFILENAME_STRING_IDEZFILENAME,qbs_add(qbs_add(func_chr( 34 ),_FUNC_IDEZFILENAME_STRING_F),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33066);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33067);}while(r); } S_36710:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33070);if(r)goto S_36710;} do{ qbs_set(_FUNC_IDEZFILENAME_STRING_IDEZFILENAME,qbs_add(qbs_add(qbs_new_txt_len("'",1),_FUNC_IDEZFILENAME_STRING_F),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33071);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33072);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free122.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEZFILENAME_STRING_IDEZFILENAME);return _FUNC_IDEZFILENAME_STRING_IDEZFILENAME; } qbs* FUNC_IDEZCHANGEPATH(qbs*_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs*_FUNC_IDEZCHANGEPATH_STRING_NEWPATH){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data123.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,_FUNC_IDEZCHANGEPATH_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33079);}while(r); S_36715:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33081);if(r)goto S_36715;} S_36716:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH,qbs_new_txt_len("..",2))))||new_error){ if(qbevent){evnt(33083);if(r)goto S_36716;} S_36717:; fornext_value4190=_FUNC_IDEZCHANGEPATH_STRING_PATH->len; fornext_finalvalue4190= 1 ; fornext_step4190= -1 ; if (fornext_step4190<0) fornext_step_negative4190=1; else fornext_step_negative4190=0; if (new_error) goto fornext_error4190; goto fornext_entrylabel4190; while(1){ fornext_value4190=fornext_step4190+(*_FUNC_IDEZCHANGEPATH_LONG_X); fornext_entrylabel4190: *_FUNC_IDEZCHANGEPATH_LONG_X=fornext_value4190; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4190){ if (fornext_value4190fornext_finalvalue4190) break; } fornext_error4190:; if(qbevent){evnt(33084);if(r)goto S_36717;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_A,func_mid(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33085);}while(r); S_36719:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_A,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(33086);if(r)goto S_36719;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_left(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33087);}while(r); do{ goto fornext_exit_4189; if(!qbevent)break;evnt(33088);}while(r); } } fornext_exit_4189:; do{ goto exit_subfunc; if(!qbevent)break;evnt(33091);}while(r); } S_36726:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH->len== 2 ))&(qbs_equal(qbs_right(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH, 1 ),qbs_new_txt_len(":",1)))))||new_error){ if(qbevent){evnt(33094);if(r)goto S_36726;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,_FUNC_IDEZCHANGEPATH_STRING_NEWPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33095);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33096);}while(r); } do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_add(qbs_add(_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs_new_txt_len("\\",1)),_FUNC_IDEZCHANGEPATH_STRING_NEWPATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33098);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33099);}while(r); } S_36733:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33102);if(r)goto S_36733;} S_36734:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH,qbs_new_txt_len("..",2))))||new_error){ if(qbevent){evnt(33105);if(r)goto S_36734;} S_36735:; fornext_value4194=_FUNC_IDEZCHANGEPATH_STRING_PATH->len; fornext_finalvalue4194= 1 ; fornext_step4194= -1 ; if (fornext_step4194<0) fornext_step_negative4194=1; else fornext_step_negative4194=0; if (new_error) goto fornext_error4194; goto fornext_entrylabel4194; while(1){ fornext_value4194=fornext_step4194+(*_FUNC_IDEZCHANGEPATH_LONG_X); fornext_entrylabel4194: *_FUNC_IDEZCHANGEPATH_LONG_X=fornext_value4194; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4194){ if (fornext_value4194fornext_finalvalue4194) break; } fornext_error4194:; if(qbevent){evnt(33106);if(r)goto S_36735;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_A,func_mid(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33107);}while(r); S_36737:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_A,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(33108);if(r)goto S_36737;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_left(_FUNC_IDEZCHANGEPATH_STRING_PATH,*_FUNC_IDEZCHANGEPATH_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33109);}while(r); S_36739:; if ((-(*_FUNC_IDEZCHANGEPATH_LONG_X== 1 ))||new_error){ if(qbevent){evnt(33110);if(r)goto S_36739;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_new_txt_len("/",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33110);}while(r); } do{ goto fornext_exit_4193; if(!qbevent)break;evnt(33111);}while(r); } } fornext_exit_4193:; do{ goto exit_subfunc; if(!qbevent)break;evnt(33114);}while(r); } S_36747:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(33116);if(r)goto S_36747;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_add(qbs_new_txt_len("/",1),_FUNC_IDEZCHANGEPATH_STRING_NEWPATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33116);}while(r); }else{ do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_add(qbs_add(_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs_new_txt_len("/",1)),_FUNC_IDEZCHANGEPATH_STRING_NEWPATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33116);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(33117);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free123.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH);return _FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH; } qbs* FUNC_IDEZFILELIST(qbs*_FUNC_IDEZFILELIST_STRING_PATH,int32*_FUNC_IDEZFILELIST_LONG_METHOD){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data124.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(33123);}while(r); do{ qbs_set(_FUNC_IDEZFILELIST_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33124);}while(r); S_36756:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33126);if(r)goto S_36756;} do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\files.txt",25), 4 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33127);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33127);}while(r); S_36759:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(33128);if(r)goto S_36759;} do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /A-D ",16),FUNC_IDEZFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len("\\*.bas >.\\internal\\temp\\files.txt",33)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33128);}while(r); } S_36762:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(33129);if(r)goto S_36762;} do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /A-D ",16),FUNC_IDEZFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len("\\*.* >.\\internal\\temp\\files.txt",31)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33129);}while(r); } do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33130);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\files.txt",25), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33131);}while(r); S_36767:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(33132);if(r)goto S_36767;} do{ tmp_fileno= 150 ; if (new_error) goto skip4198; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZFILELIST_STRING_A); if (new_error) goto skip4198; skip4198: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33133);}while(r); S_36769:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEZFILELIST_STRING_A->len))||new_error){ if(qbevent){evnt(33134);if(r)goto S_36769;} S_36770:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33135);if(r)goto S_36770;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,_FUNC_IDEZFILELIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33135);}while(r); }else{ do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_add(qbs_add(_FUNC_IDEZFILELIST_STRING_FILELIST,_FUNC_IDEZFILELIST_STRING1_SEP),_FUNC_IDEZFILELIST_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33135);}while(r); } } } dl_exit_4197:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33138);}while(r); do{ qbs_set(_FUNC_IDEZFILELIST_STRING_IDEZFILELIST,_FUNC_IDEZFILELIST_STRING_FILELIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33139);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33140);}while(r); } S_36781:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33143);if(r)goto S_36781;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33144);}while(r); S_36783:; fornext_value4201= 1 ; fornext_finalvalue4201= 2 -*_FUNC_IDEZFILELIST_LONG_METHOD; fornext_step4201= 1 ; if (fornext_step4201<0) fornext_step_negative4201=1; else fornext_step_negative4201=0; if (new_error) goto fornext_error4201; goto fornext_entrylabel4201; while(1){ fornext_value4201=fornext_step4201+(*_FUNC_IDEZFILELIST_LONG_I); fornext_entrylabel4201: *_FUNC_IDEZFILELIST_LONG_I=fornext_value4201; if (fornext_step_negative4201){ if (fornext_value4201fornext_finalvalue4201) break; } fornext_error4201:; if(qbevent){evnt(33145);if(r)goto S_36783;} do{ sub_open(qbs_new_txt_len("./internal/temp/files.txt",25), 4 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33146);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33146);}while(r); S_36786:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(33147);if(r)goto S_36786;} S_36787:; if ((-(*_FUNC_IDEZFILELIST_LONG_I== 1 ))||new_error){ if(qbevent){evnt(33148);if(r)goto S_36787;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_IDEZFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len(" -maxdepth 1 -type f -name ",27)),func_chr( 34 )),qbs_new_txt_len("*.bas",5)),func_chr( 34 )),qbs_new_txt_len(" >./internal/temp/files.txt",27)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33148);}while(r); } S_36790:; if ((-(*_FUNC_IDEZFILELIST_LONG_I== 2 ))||new_error){ if(qbevent){evnt(33149);if(r)goto S_36790;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_IDEZFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len(" -maxdepth 1 -type f -name ",27)),func_chr( 34 )),qbs_new_txt_len("*.BAS",5)),func_chr( 34 )),qbs_new_txt_len(" >./internal/temp/files.txt",27)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33149);}while(r); } } S_36794:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(33151);if(r)goto S_36794;} S_36795:; if ((-(*_FUNC_IDEZFILELIST_LONG_I== 1 ))||new_error){ if(qbevent){evnt(33152);if(r)goto S_36795;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_IDEZFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len(" -maxdepth 1 -type f -name ",27)),func_chr( 34 )),qbs_new_txt_len("*",1)),func_chr( 34 )),qbs_new_txt_len(" >./internal/temp/files.txt",27)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33152);}while(r); } } do{ sub_open(qbs_new_txt_len("./internal/temp/files.txt",25), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33154);}while(r); S_36800:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(33155);if(r)goto S_36800;} do{ tmp_fileno= 150 ; if (new_error) goto skip4203; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZFILELIST_STRING_A); if (new_error) goto skip4203; skip4203: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33156);}while(r); S_36802:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEZFILELIST_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(33157);if(r)goto S_36802;} do{ goto dl_exit_4202; if(!qbevent)break;evnt(33157);}while(r); } S_36805:; fornext_value4206=_FUNC_IDEZFILELIST_STRING_A->len; fornext_finalvalue4206= 1 ; fornext_step4206= -1 ; if (fornext_step4206<0) fornext_step_negative4206=1; else fornext_step_negative4206=0; if (new_error) goto fornext_error4206; goto fornext_entrylabel4206; while(1){ fornext_value4206=fornext_step4206+(*_FUNC_IDEZFILELIST_LONG_X); fornext_entrylabel4206: *_FUNC_IDEZFILELIST_LONG_X=fornext_value4206; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4206){ if (fornext_value4206fornext_finalvalue4206) break; } fornext_error4206:; if(qbevent){evnt(33158);if(r)goto S_36805;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_A2,func_mid(_FUNC_IDEZFILELIST_STRING_A,*_FUNC_IDEZFILELIST_LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33159);}while(r); S_36807:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_A2,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(33160);if(r)goto S_36807;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_A,qbs_right(_FUNC_IDEZFILELIST_STRING_A,_FUNC_IDEZFILELIST_STRING_A->len-*_FUNC_IDEZFILELIST_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33161);}while(r); do{ goto fornext_exit_4205; if(!qbevent)break;evnt(33162);}while(r); } } fornext_exit_4205:; S_36812:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33165);if(r)goto S_36812;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,_FUNC_IDEZFILELIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33165);}while(r); }else{ do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_add(qbs_add(_FUNC_IDEZFILELIST_STRING_FILELIST,_FUNC_IDEZFILELIST_STRING1_SEP),_FUNC_IDEZFILELIST_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33165);}while(r); } } dl_exit_4202:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33167);}while(r); } fornext_exit_4200:; do{ qbs_set(_FUNC_IDEZFILELIST_STRING_IDEZFILELIST,_FUNC_IDEZFILELIST_STRING_FILELIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33169);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33170);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free124.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEZFILELIST_STRING_IDEZFILELIST);return _FUNC_IDEZFILELIST_STRING_IDEZFILELIST; } qbs* FUNC_IDEZGETROOT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data125.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_36823:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33178);if(r)goto S_36823;} do{ sub_shell2(qbs_new_txt_len("cd >.\\internal\\temp\\root.txt",28),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33179);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\root.txt",24), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33180);}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip4209; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZGETROOT_STRING_A); if (new_error) goto skip4209; skip4209: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33181);}while(r); do{ qbs_set(_FUNC_IDEZGETROOT_STRING_IDEZGETROOT,_FUNC_IDEZGETROOT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33182);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33183);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33184);}while(r); } S_36831:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33187);if(r)goto S_36831;} do{ sub_shell2(qbs_new_txt_len("pwd >./internal/temp/root.txt",29),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33188);}while(r); do{ sub_open(qbs_new_txt_len("./internal/temp/root.txt",24), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33189);}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip4210; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZGETROOT_STRING_A); if (new_error) goto skip4210; skip4210: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33190);}while(r); do{ qbs_set(_FUNC_IDEZGETROOT_STRING_IDEZGETROOT,_FUNC_IDEZGETROOT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33191);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33192);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33193);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free125.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEZGETROOT_STRING_IDEZGETROOT);return _FUNC_IDEZGETROOT_STRING_IDEZGETROOT; } qbs* FUNC_IDEZPATHLIST(qbs*_FUNC_IDEZPATHLIST_STRING_PATH){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data126.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(33199);}while(r); do{ qbs_set(_FUNC_IDEZPATHLIST_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33200);}while(r); S_36841:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33202);if(r)goto S_36841;} do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\paths.txt",25), 4 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33203);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33203);}while(r); do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33204);}while(r); S_36845:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEZPATHLIST_STRING_PATH, 1 ),qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(33204);if(r)goto S_36845;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33204);}while(r); } do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /AD ",15),FUNC_IDEZFILENAME(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATH,_FUNC_IDEZPATHLIST_STRING_A))),qbs_new_txt_len(" >.\\internal\\temp\\paths.txt",27)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33205);}while(r); do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33206);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\paths.txt",25), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33207);}while(r); S_36851:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(33208);if(r)goto S_36851;} do{ tmp_fileno= 150 ; if (new_error) goto skip4213; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZPATHLIST_STRING_A); if (new_error) goto skip4213; skip4213: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33209);}while(r); S_36853:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33210);if(r)goto S_36853;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33210);}while(r); }else{ do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33210);}while(r); } } dl_exit_4212:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33212);}while(r); do{ *_FUNC_IDEZPATHLIST_LONG_C= 0 ; if(!qbevent)break;evnt(33214);}while(r); S_36861:; fornext_value4215= 1 ; fornext_finalvalue4215=_FUNC_IDEZPATHLIST_STRING_PATH->len; fornext_step4215= 1 ; if (fornext_step4215<0) fornext_step_negative4215=1; else fornext_step_negative4215=0; if (new_error) goto fornext_error4215; goto fornext_entrylabel4215; while(1){ fornext_value4215=fornext_step4215+(*_FUNC_IDEZPATHLIST_LONG_X); fornext_entrylabel4215: *_FUNC_IDEZPATHLIST_LONG_X=fornext_value4215; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4215){ if (fornext_value4215fornext_finalvalue4215) break; } fornext_error4215:; if(qbevent){evnt(33215);if(r)goto S_36861;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_B,func_mid(_FUNC_IDEZPATHLIST_STRING_PATH,*_FUNC_IDEZPATHLIST_LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33216);}while(r); S_36863:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_B,__STRING1_IDEPATHSEP)))||new_error){ if(qbevent){evnt(33217);if(r)goto S_36863;} do{ *_FUNC_IDEZPATHLIST_LONG_C=*_FUNC_IDEZPATHLIST_LONG_C+ 1 ; if(!qbevent)break;evnt(33217);}while(r); } } fornext_exit_4214:; S_36867:; if ((-(*_FUNC_IDEZPATHLIST_LONG_C>= 1 ))||new_error){ if(qbevent){evnt(33219);if(r)goto S_36867;} S_36868:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEZPATHLIST_STRING_PATHLIST->len))||new_error){ if(qbevent){evnt(33220);if(r)goto S_36868;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(qbs_new_txt_len("..",2),_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_PATHLIST)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33220);}while(r); }else{ do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("..",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33220);}while(r); } } S_36874:; fornext_value4219= 0 ; fornext_finalvalue4219= 25 ; fornext_step4219= 1 ; if (fornext_step4219<0) fornext_step_negative4219=1; else fornext_step_negative4219=0; if (new_error) goto fornext_error4219; goto fornext_entrylabel4219; while(1){ fornext_value4219=fornext_step4219+(*_FUNC_IDEZPATHLIST_LONG_I); fornext_entrylabel4219: *_FUNC_IDEZPATHLIST_LONG_I=fornext_value4219; if (fornext_step_negative4219){ if (fornext_value4219fornext_finalvalue4219) break; } fornext_error4219:; if(qbevent){evnt(33223);if(r)goto S_36874;} S_36875:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEZPATHLIST_STRING_PATHLIST->len))||new_error){ if(qbevent){evnt(33224);if(r)goto S_36875;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING1_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33224);}while(r); } do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,func_chr( 65 +*_FUNC_IDEZPATHLIST_LONG_I)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33225);}while(r); } fornext_exit_4218:; do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST,_FUNC_IDEZPATHLIST_STRING_PATHLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33227);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33228);}while(r); } S_36883:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33231);if(r)goto S_36883;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33232);}while(r); do{ sub_open(qbs_new_txt_len("./internal/temp/paths.txt",25), 4 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33233);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33233);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_IDEZFILENAME(_FUNC_IDEZPATHLIST_STRING_PATH)),qbs_new_txt_len(" -maxdepth 1 -mindepth 1 -type d >./internal/temp/paths.txt",59)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33234);}while(r); do{ sub_open(qbs_new_txt_len("./internal/temp/paths.txt",25), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33235);}while(r); S_36889:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(33236);if(r)goto S_36889;} do{ tmp_fileno= 150 ; if (new_error) goto skip4222; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZPATHLIST_STRING_A); if (new_error) goto skip4222; skip4222: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33237);}while(r); S_36891:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEZPATHLIST_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(33238);if(r)goto S_36891;} do{ goto dl_exit_4221; if(!qbevent)break;evnt(33238);}while(r); } S_36894:; fornext_value4225=_FUNC_IDEZPATHLIST_STRING_A->len; fornext_finalvalue4225= 1 ; fornext_step4225= -1 ; if (fornext_step4225<0) fornext_step_negative4225=1; else fornext_step_negative4225=0; if (new_error) goto fornext_error4225; goto fornext_entrylabel4225; while(1){ fornext_value4225=fornext_step4225+(*_FUNC_IDEZPATHLIST_LONG_X); fornext_entrylabel4225: *_FUNC_IDEZPATHLIST_LONG_X=fornext_value4225; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4225){ if (fornext_value4225fornext_finalvalue4225) break; } fornext_error4225:; if(qbevent){evnt(33239);if(r)goto S_36894;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A2,func_mid(_FUNC_IDEZPATHLIST_STRING_A,*_FUNC_IDEZPATHLIST_LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33240);}while(r); S_36896:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_A2,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(33241);if(r)goto S_36896;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_right(_FUNC_IDEZPATHLIST_STRING_A,_FUNC_IDEZPATHLIST_STRING_A->len-*_FUNC_IDEZPATHLIST_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33242);}while(r); do{ goto fornext_exit_4224; if(!qbevent)break;evnt(33243);}while(r); } } fornext_exit_4224:; S_36901:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33246);if(r)goto S_36901;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33246);}while(r); }else{ do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33246);}while(r); } } dl_exit_4221:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33248);}while(r); S_36908:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEZPATHLIST_STRING_PATH,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(33250);if(r)goto S_36908;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("..",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33251);}while(r); S_36910:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33253);if(r)goto S_36910;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33253);}while(r); }else{ do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_add(qbs_add(_FUNC_IDEZPATHLIST_STRING_A,_FUNC_IDEZPATHLIST_STRING1_SEP),_FUNC_IDEZPATHLIST_STRING_PATHLIST)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33253);}while(r); } } do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST,_FUNC_IDEZPATHLIST_STRING_PATHLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33256);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33257);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free126.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST);return _FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST; } qbs* FUNC_IDEZTAKEPATH(qbs*_FUNC_IDEZTAKEPATH_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data127.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_P,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33263);}while(r); S_36920:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33265);if(r)goto S_36920;} S_36921:; fornext_value4230=_FUNC_IDEZTAKEPATH_STRING_F->len; fornext_finalvalue4230= 1 ; fornext_step4230= -1 ; if (fornext_step4230<0) fornext_step_negative4230=1; else fornext_step_negative4230=0; if (new_error) goto fornext_error4230; goto fornext_entrylabel4230; while(1){ fornext_value4230=fornext_step4230+(*_FUNC_IDEZTAKEPATH_LONG_I); fornext_entrylabel4230: *_FUNC_IDEZTAKEPATH_LONG_I=fornext_value4230; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4230){ if (fornext_value4230fornext_finalvalue4230) break; } fornext_error4230:; if(qbevent){evnt(33266);if(r)goto S_36921;} do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_A,func_mid(_FUNC_IDEZTAKEPATH_STRING_F,*_FUNC_IDEZTAKEPATH_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33267);}while(r); S_36923:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZTAKEPATH_STRING_A,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(33268);if(r)goto S_36923;} do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_P,qbs_left(_FUNC_IDEZTAKEPATH_STRING_F,*_FUNC_IDEZTAKEPATH_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33269);}while(r); do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_F,qbs_right(_FUNC_IDEZTAKEPATH_STRING_F,_FUNC_IDEZTAKEPATH_STRING_F->len-*_FUNC_IDEZTAKEPATH_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33270);}while(r); do{ goto fornext_exit_4229; if(!qbevent)break;evnt(33271);}while(r); } } fornext_exit_4229:; do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_IDEZTAKEPATH,_FUNC_IDEZTAKEPATH_STRING_P); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33274);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33275);}while(r); } S_36932:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33278);if(r)goto S_36932;} S_36933:; fornext_value4234=_FUNC_IDEZTAKEPATH_STRING_F->len; fornext_finalvalue4234= 1 ; fornext_step4234= -1 ; if (fornext_step4234<0) fornext_step_negative4234=1; else fornext_step_negative4234=0; if (new_error) goto fornext_error4234; goto fornext_entrylabel4234; while(1){ fornext_value4234=fornext_step4234+(*_FUNC_IDEZTAKEPATH_LONG_I); fornext_entrylabel4234: *_FUNC_IDEZTAKEPATH_LONG_I=fornext_value4234; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4234){ if (fornext_value4234fornext_finalvalue4234) break; } fornext_error4234:; if(qbevent){evnt(33279);if(r)goto S_36933;} do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_A,func_mid(_FUNC_IDEZTAKEPATH_STRING_F,*_FUNC_IDEZTAKEPATH_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33280);}while(r); S_36935:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZTAKEPATH_STRING_A,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(33281);if(r)goto S_36935;} do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_P,qbs_left(_FUNC_IDEZTAKEPATH_STRING_F,*_FUNC_IDEZTAKEPATH_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33282);}while(r); do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_F,qbs_right(_FUNC_IDEZTAKEPATH_STRING_F,_FUNC_IDEZTAKEPATH_STRING_F->len-*_FUNC_IDEZTAKEPATH_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33283);}while(r); do{ goto fornext_exit_4233; if(!qbevent)break;evnt(33284);}while(r); } } fornext_exit_4233:; do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_IDEZTAKEPATH,_FUNC_IDEZTAKEPATH_STRING_P); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33287);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33288);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free127.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEZTAKEPATH_STRING_IDEZTAKEPATH);return _FUNC_IDEZTAKEPATH_STRING_IDEZTAKEPATH; } qbs* FUNC_IDEZGETFILEPATH(qbs*_FUNC_IDEZGETFILEPATH_STRING_ROOT,qbs*_FUNC_IDEZGETFILEPATH_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data128.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P,FUNC_IDEZTAKEPATH(_FUNC_IDEZGETFILEPATH_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33299);}while(r); S_36945:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEZGETFILEPATH_STRING_P->len== 0 )))||new_error){ if(qbevent){evnt(33301);if(r)goto S_36945;} do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P,_FUNC_IDEZGETFILEPATH_STRING_ROOT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33301);}while(r); } S_36948:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDEZGETFILEPATH_STRING_P, 1 ),qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(33303);if(r)goto S_36948;} do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P,qbs_add(qbs_add(_FUNC_IDEZGETFILEPATH_STRING_ROOT,__STRING1_IDEPATHSEP),_FUNC_IDEZGETFILEPATH_STRING_P)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33303);}while(r); } do{ *__LONG_IDEERROR= 4 ; if(!qbevent)break;evnt(33306);}while(r); do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P2,_FUNC_IDEZGETFILEPATH_STRING_P); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33307);}while(r); S_36953:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33308);if(r)goto S_36953;} S_36954:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEZGETFILEPATH_STRING_P2, 1 ),qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(33309);if(r)goto S_36954;} do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P2,qbs_add(_FUNC_IDEZGETFILEPATH_STRING_P2,qbs_new_txt_len("\\",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33309);}while(r); } } do{ sub_chdir(_FUNC_IDEZGETFILEPATH_STRING_P2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33311);}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(33312);}while(r); S_36960:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33314);if(r)goto S_36960;} do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("cd >",4),FUNC_IDEZFILENAME(__STRING_IDEROOT)),qbs_new_txt_len("\\internal\\temp\\root.txt",23)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33315);}while(r); do{ sub_open(qbs_add(__STRING_IDEROOT,qbs_new_txt_len("\\internal\\temp\\root.txt",23)), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33316);}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip4240; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZGETFILEPATH_STRING_P); if (new_error) goto skip4240; skip4240: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33317);}while(r); S_36964:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEZGETFILEPATH_STRING_P, 1 ),qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(33318);if(r)goto S_36964;} do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P,qbs_left(_FUNC_IDEZGETFILEPATH_STRING_P,_FUNC_IDEZGETFILEPATH_STRING_P->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33318);}while(r); } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33319);}while(r); } S_36969:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33321);if(r)goto S_36969;} do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("pwd >",5),FUNC_IDEZFILENAME(__STRING_IDEROOT)),qbs_new_txt_len("/internal/temp/root.txt",23)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33322);}while(r); do{ sub_open(qbs_add(__STRING_IDEROOT,qbs_new_txt_len("/internal/temp/root.txt",23)), 3 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33323);}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip4242; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZGETFILEPATH_STRING_P); if (new_error) goto skip4242; skip4242: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33324);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33325);}while(r); } do{ sub_chdir(__STRING_IDEROOT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33328);}while(r); do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_IDEZGETFILEPATH,_FUNC_IDEZGETFILEPATH_STRING_P); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33330);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free128.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEZGETFILEPATH_STRING_IDEZGETFILEPATH);return _FUNC_IDEZGETFILEPATH_STRING_IDEZGETFILEPATH; } void SUB_INITMOUSE(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data129.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub__mouseshow(); if(!qbevent)break;evnt(33334);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free129.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_IDELAYOUTBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data130.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(33345);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(33346);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33347);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33348);}while(r); do{ if(!qbevent)break;evnt(33349);}while(r); do{ if (_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4]+1; _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0]),0,_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(33350);}while(r); do{ if(!qbevent)break;evnt(33351);}while(r); do{ if(!qbevent)break;evnt(33352);}while(r); do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33353);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I= 0 ; if(!qbevent)break;evnt(33357);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDELAYOUTBOX_UDT_P)) + (0) ),&(pass4243= 60 ),&(pass4244= 7 ),qbs_new_txt_len("Code Layout",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33358);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33360);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(33361);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(33362);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Auto Spacing & Upper/Lowercase Formatting",42)); if(!qbevent)break;evnt(33363);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDEAUTOLAYOUT; if(!qbevent)break;evnt(33364);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33366);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(33367);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(33368);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Auto #Indent -",14)); if(!qbevent)break;evnt(33369);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDEAUTOINDENT; if(!qbevent)break;evnt(33370);}while(r); do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A2,FUNC_STR2(__LONG_IDEAUTOINDENTSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33372);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33373);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(33374);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+20))= 20 ; if(!qbevent)break;evnt(33375);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(33376);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Spacing",8)); if(!qbevent)break;evnt(33377);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDELAYOUTBOX_STRING_A2); if(!qbevent)break;evnt(33378);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDELAYOUTBOX_STRING_A2->len; if(!qbevent)break;evnt(33379);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33381);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(33382);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+24))= 7 ; if(!qbevent)break;evnt(33383);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDELAYOUTBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(33384);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(33385);}while(r); S_37012:; fornext_value4247= 1 ; fornext_finalvalue4247= 100 ; fornext_step4247= 1 ; if (fornext_step4247<0) fornext_step_negative4247=1; else fornext_step_negative4247=0; if (new_error) goto fornext_error4247; goto fornext_entrylabel4247; while(1){ fornext_value4247=fornext_step4247+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel4247: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value4247; if (fornext_step_negative4247){ if (fornext_value4247fornext_finalvalue4247) break; } fornext_error4247:; if(qbevent){evnt(33389);if(r)goto S_37012;} do{ memcpy((((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDELAYOUTBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(33389);}while(r); } fornext_exit_4246:; S_37015:; do{ if(qbevent){evnt(33392);if(r)goto S_37015;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDELAYOUTBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(33396);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33397);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(33397);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(33397);}while(r); S_37020:; fornext_value4250= 1 ; fornext_finalvalue4250= 100 ; fornext_step4250= 1 ; if (fornext_step4250<0) fornext_step_negative4250=1; else fornext_step_negative4250=0; if (new_error) goto fornext_error4250; goto fornext_entrylabel4250; while(1){ fornext_value4250=fornext_step4250+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel4250: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value4250; if (fornext_step_negative4250){ if (fornext_value4250fornext_finalvalue4250) break; } fornext_error4250:; if(qbevent){evnt(33398);if(r)goto S_37020;} S_37021:; if ((*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(33399);if(r)goto S_37021;} do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDELAYOUTBOX_LONG_FOCUS-*_FUNC_IDELAYOUTBOX_LONG_F; if(!qbevent)break;evnt(33402);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(33403);}while(r); do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(33403);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDELAYOUTBOX_LONG_F); if(!qbevent)break;evnt(33404);}while(r); S_37026:; if ((*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(33405);if(r)goto S_37026;} do{ *_FUNC_IDELAYOUTBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(33405);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(33405);}while(r); } } } fornext_exit_4249:; do{ *_FUNC_IDELAYOUTBOX_LONG_LASTFOCUS=*_FUNC_IDELAYOUTBOX_LONG_F- 1 ; if(!qbevent)break;evnt(33408);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(33415);}while(r); S_37034:; if ((*_FUNC_IDELAYOUTBOX_LONG_CX)||new_error){ if(qbevent){evnt(33416);if(r)goto S_37034;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33416);}while(r); do{ qbg_sub_locate(*_FUNC_IDELAYOUTBOX_LONG_CY,*_FUNC_IDELAYOUTBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(33416);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33416);}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(33419);}while(r); S_37040:; do{ if(qbevent){evnt(33420);if(r)goto S_37040;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(33421);}while(r); S_37042:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(33422);if(r)goto S_37042;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33422);}while(r); } S_37045:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(33423);if(r)goto S_37045;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33423);}while(r); } S_37048:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(33424);if(r)goto S_37048;} do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(33424);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33424);}while(r); } S_37052:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(33425);if(r)goto S_37052;} do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(33425);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33425);}while(r); } S_37056:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(33426);if(r)goto S_37056;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33426);}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(33427);}while(r); S_37060:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_ALT!=*_FUNC_IDELAYOUTBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(33427);if(r)goto S_37060;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33427);}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_OLDALT=*_FUNC_IDELAYOUTBOX_LONG_ALT; if(!qbevent)break;evnt(33428);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(33429);}while(r); S_37065:; }while((!(*_FUNC_IDELAYOUTBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4251:; if(qbevent){evnt(33430);if(r)goto S_37065;} S_37066:; if ((*_FUNC_IDELAYOUTBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33431);if(r)goto S_37066;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(33431);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(33431);}while(r); } do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33433);}while(r); S_37072:; if ((*_FUNC_IDELAYOUTBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33434);if(r)goto S_37072;} S_37073:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(33435);if(r)goto S_37073;} do{ *_FUNC_IDELAYOUTBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33436);}while(r); S_37075:; if (((-(*_FUNC_IDELAYOUTBOX_LONG_K>= 65 ))&(-(*_FUNC_IDELAYOUTBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(33437);if(r)goto S_37075;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDELAYOUTBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33437);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33440);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(33440);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33440);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(33444);}while(r); S_37084:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33445);if(r)goto S_37084;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33445);}while(r); } S_37087:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33446);if(r)goto S_37087;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS=*_FUNC_IDELAYOUTBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(33446);}while(r); } S_37090:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33447);if(r)goto S_37090;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS=*_FUNC_IDELAYOUTBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(33447);}while(r); } S_37093:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(33448);if(r)goto S_37093;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS=*_FUNC_IDELAYOUTBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(33448);}while(r); } S_37096:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS>*_FUNC_IDELAYOUTBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(33449);if(r)goto S_37096;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33449);}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33450);}while(r); S_37100:; fornext_value4254= 1 ; fornext_finalvalue4254= 100 ; fornext_step4254= 1 ; if (fornext_step4254<0) fornext_step_negative4254=1; else fornext_step_negative4254=0; if (new_error) goto fornext_error4254; goto fornext_entrylabel4254; while(1){ fornext_value4254=fornext_step4254+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel4254: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value4254; if (fornext_step_negative4254){ if (fornext_value4254fornext_finalvalue4254) break; } fornext_error4254:; if(qbevent){evnt(33451);if(r)goto S_37100;} do{ *_FUNC_IDELAYOUTBOX_LONG_T=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(33452);}while(r); S_37102:; if ((*_FUNC_IDELAYOUTBOX_LONG_T)||new_error){ if(qbevent){evnt(33453);if(r)goto S_37102;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUSOFFSET=*_FUNC_IDELAYOUTBOX_LONG_FOCUS-*_FUNC_IDELAYOUTBOX_LONG_F; if(!qbevent)break;evnt(33454);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDELAYOUTBOX_LONG_I)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDELAYOUTBOX_LONG_FOCUS,_FUNC_IDELAYOUTBOX_LONG_F,_FUNC_IDELAYOUTBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDELAYOUTBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDELAYOUTBOX_LONG_MOUSEDOWN,_FUNC_IDELAYOUTBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDELAYOUTBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33455);}while(r); } } fornext_exit_4253:; do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33462);}while(r); S_37108:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDELAYOUTBOX_STRING_A->len> 2 )))||new_error){ if(qbevent){evnt(33463);if(r)goto S_37108;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_left(_FUNC_IDELAYOUTBOX_STRING_A, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33463);}while(r); } S_37111:; fornext_value4257= 1 ; fornext_finalvalue4257=_FUNC_IDELAYOUTBOX_STRING_A->len; fornext_step4257= 1 ; if (fornext_step4257<0) fornext_step_negative4257=1; else fornext_step_negative4257=0; if (new_error) goto fornext_error4257; goto fornext_entrylabel4257; while(1){ fornext_value4257=fornext_step4257+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel4257: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value4257; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4257){ if (fornext_value4257fornext_finalvalue4257) break; } fornext_error4257:; if(qbevent){evnt(33464);if(r)goto S_37111;} do{ *_FUNC_IDELAYOUTBOX_LONG_A=qbs_asc(_FUNC_IDELAYOUTBOX_STRING_A,*_FUNC_IDELAYOUTBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33465);}while(r); S_37113:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDELAYOUTBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDELAYOUTBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(33466);if(r)goto S_37113;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33466);}while(r); do{ goto fornext_exit_4256; if(!qbevent)break;evnt(33466);}while(r); } S_37117:; if (((-(*_FUNC_IDELAYOUTBOX_LONG_A< 48 ))|(-(*_FUNC_IDELAYOUTBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(33467);if(r)goto S_37117;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33467);}while(r); do{ goto fornext_exit_4256; if(!qbevent)break;evnt(33467);}while(r); } } fornext_exit_4256:; S_37122:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDELAYOUTBOX_STRING_A->len))||new_error){ if(qbevent){evnt(33469);if(r)goto S_37122;} do{ *_FUNC_IDELAYOUTBOX_LONG_A=qbr(func_val(_FUNC_IDELAYOUTBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33470);}while(r); S_37124:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_A> 64 ))||new_error){ if(qbevent){evnt(33471);if(r)goto S_37124;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_new_txt_len("64",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33471);}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDELAYOUTBOX_STRING_A); if(!qbevent)break;evnt(33473);}while(r); S_37129:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS== 5 ))&(-(*_FUNC_IDELAYOUTBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33475);if(r)goto S_37129;} do{ goto exit_subfunc; if(!qbevent)break;evnt(33475);}while(r); } S_37132:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS== 4 ))&(-(*_FUNC_IDELAYOUTBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33476);if(r)goto S_37132;} do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33478);}while(r); do{ *_FUNC_IDELAYOUTBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(33479);}while(r); S_37135:; if ((-(*_FUNC_IDELAYOUTBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(33479);if(r)goto S_37135;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(33479);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDELAYOUTBOX_INTEGER_V,2,byte_element_4260),0); if(!qbevent)break;evnt(33480);}while(r); S_37139:; if ((-(*__LONG_IDEAUTOLAYOUT!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(33481);if(r)goto S_37139;} do{ *__LONG_IDEAUTOLAYOUT=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(33481);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(33481);}while(r); } do{ *_FUNC_IDELAYOUTBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(33482);}while(r); S_37144:; if ((-(*_FUNC_IDELAYOUTBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(33482);if(r)goto S_37144;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(33482);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDELAYOUTBOX_INTEGER_V,2,byte_element_4261),0); if(!qbevent)break;evnt(33483);}while(r); S_37148:; if ((-(*__LONG_IDEAUTOINDENT!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(33484);if(r)goto S_37148;} do{ *__LONG_IDEAUTOINDENT=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(33484);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(33484);}while(r); } do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33485);}while(r); S_37153:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDELAYOUTBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33486);if(r)goto S_37153;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_V,qbs_new_txt_len("4",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33486);}while(r); } do{ *_FUNC_IDELAYOUTBOX_INTEGER_V=qbr_float_to_long(func_val(_FUNC_IDELAYOUTBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33487);}while(r); S_37157:; if (((-(*_FUNC_IDELAYOUTBOX_INTEGER_V< 0 ))|(-(*_FUNC_IDELAYOUTBOX_INTEGER_V> 64 )))||new_error){ if(qbevent){evnt(33488);if(r)goto S_37157;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 4 ; if(!qbevent)break;evnt(33488);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDELAYOUTBOX_INTEGER_V,2,byte_element_4262),0); if(!qbevent)break;evnt(33489);}while(r); S_37161:; if ((-(*__LONG_IDEAUTOINDENTSIZE!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(33490);if(r)goto S_37161;} do{ *__LONG_IDEAUTOINDENTSIZE=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(33491);}while(r); S_37163:; if ((-(*__LONG_IDEAUTOINDENT!= 0 ))||new_error){ if(qbevent){evnt(33492);if(r)goto S_37163;} do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(33492);}while(r); } } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33494);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33495);}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(33500);}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(33501);}while(r); }while(1); dl_exit_4248:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free130.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX; } int32 FUNC_IDEBACKUPBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data131.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(33513);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(33514);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33515);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33516);}while(r); do{ if(!qbevent)break;evnt(33517);}while(r); do{ if (_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEBACKUPBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEBACKUPBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(33518);}while(r); do{ if(!qbevent)break;evnt(33519);}while(r); do{ if(!qbevent)break;evnt(33520);}while(r); do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33521);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_I= 0 ; if(!qbevent)break;evnt(33525);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEBACKUPBOX_UDT_P)) + (0) ),&(pass4263= 50 ),&(pass4264= 5 ),qbs_new_txt_len("Backup/Undo",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33526);}while(r); do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A2,FUNC_STR2(__LONG_IDEBACKUPSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33528);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_I=*_FUNC_IDEBACKUPBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33529);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(33530);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(33531);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Undo buffer limit (10-2000MB)",30)); if(!qbevent)break;evnt(33532);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEBACKUPBOX_STRING_A2); if(!qbevent)break;evnt(33533);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDEBACKUPBOX_STRING_A2->len; if(!qbevent)break;evnt(33534);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_I=*_FUNC_IDEBACKUPBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33536);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(33537);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(33538);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDEBACKUPBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(33539);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(33540);}while(r); S_37196:; fornext_value4267= 1 ; fornext_finalvalue4267= 100 ; fornext_step4267= 1 ; if (fornext_step4267<0) fornext_step_negative4267=1; else fornext_step_negative4267=0; if (new_error) goto fornext_error4267; goto fornext_entrylabel4267; while(1){ fornext_value4267=fornext_step4267+(*_FUNC_IDEBACKUPBOX_LONG_I); fornext_entrylabel4267: *_FUNC_IDEBACKUPBOX_LONG_I=fornext_value4267; if (fornext_step_negative4267){ if (fornext_value4267fornext_finalvalue4267) break; } fornext_error4267:; if(qbevent){evnt(33544);if(r)goto S_37196;} do{ memcpy((((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEBACKUPBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(33544);}while(r); } fornext_exit_4266:; S_37199:; do{ if(qbevent){evnt(33547);if(r)goto S_37199;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEBACKUPBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(33551);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33552);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(33552);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(33552);}while(r); S_37204:; fornext_value4270= 1 ; fornext_finalvalue4270= 100 ; fornext_step4270= 1 ; if (fornext_step4270<0) fornext_step_negative4270=1; else fornext_step_negative4270=0; if (new_error) goto fornext_error4270; goto fornext_entrylabel4270; while(1){ fornext_value4270=fornext_step4270+(*_FUNC_IDEBACKUPBOX_LONG_I); fornext_entrylabel4270: *_FUNC_IDEBACKUPBOX_LONG_I=fornext_value4270; if (fornext_step_negative4270){ if (fornext_value4270fornext_finalvalue4270) break; } fornext_error4270:; if(qbevent){evnt(33553);if(r)goto S_37204;} S_37205:; if ((*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(33554);if(r)goto S_37205;} do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEBACKUPBOX_LONG_FOCUS-*_FUNC_IDEBACKUPBOX_LONG_F; if(!qbevent)break;evnt(33557);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(33558);}while(r); do{ *(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(33558);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEBACKUPBOX_LONG_F); if(!qbevent)break;evnt(33559);}while(r); S_37210:; if ((*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(33560);if(r)goto S_37210;} do{ *_FUNC_IDEBACKUPBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(33560);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(33560);}while(r); } } } fornext_exit_4269:; do{ *_FUNC_IDEBACKUPBOX_LONG_LASTFOCUS=*_FUNC_IDEBACKUPBOX_LONG_F- 1 ; if(!qbevent)break;evnt(33563);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(33570);}while(r); S_37218:; if ((*_FUNC_IDEBACKUPBOX_LONG_CX)||new_error){ if(qbevent){evnt(33571);if(r)goto S_37218;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33571);}while(r); do{ qbg_sub_locate(*_FUNC_IDEBACKUPBOX_LONG_CY,*_FUNC_IDEBACKUPBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(33571);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33571);}while(r); } do{ *_FUNC_IDEBACKUPBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(33574);}while(r); S_37224:; do{ if(qbevent){evnt(33575);if(r)goto S_37224;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(33576);}while(r); S_37226:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(33577);if(r)goto S_37226;} do{ *_FUNC_IDEBACKUPBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33577);}while(r); } S_37229:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(33578);if(r)goto S_37229;} do{ *_FUNC_IDEBACKUPBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33578);}while(r); } S_37232:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(33579);if(r)goto S_37232;} do{ *_FUNC_IDEBACKUPBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(33579);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33579);}while(r); } S_37236:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(33580);if(r)goto S_37236;} do{ *_FUNC_IDEBACKUPBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(33580);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33580);}while(r); } S_37240:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(33581);if(r)goto S_37240;} do{ *_FUNC_IDEBACKUPBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33581);}while(r); } do{ *_FUNC_IDEBACKUPBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(33582);}while(r); S_37244:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_ALT!=*_FUNC_IDEBACKUPBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(33582);if(r)goto S_37244;} do{ *_FUNC_IDEBACKUPBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33582);}while(r); } do{ *_FUNC_IDEBACKUPBOX_LONG_OLDALT=*_FUNC_IDEBACKUPBOX_LONG_ALT; if(!qbevent)break;evnt(33583);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(33584);}while(r); S_37249:; }while((!(*_FUNC_IDEBACKUPBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4271:; if(qbevent){evnt(33585);if(r)goto S_37249;} S_37250:; if ((*_FUNC_IDEBACKUPBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33586);if(r)goto S_37250;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(33586);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(33586);}while(r); } do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33588);}while(r); S_37256:; if ((*_FUNC_IDEBACKUPBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33589);if(r)goto S_37256;} S_37257:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(33590);if(r)goto S_37257;} do{ *_FUNC_IDEBACKUPBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33591);}while(r); S_37259:; if (((-(*_FUNC_IDEBACKUPBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEBACKUPBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(33592);if(r)goto S_37259;} do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEBACKUPBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33592);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33595);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(33595);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33595);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(33599);}while(r); S_37268:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33600);if(r)goto S_37268;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33600);}while(r); } S_37271:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33601);if(r)goto S_37271;} do{ *_FUNC_IDEBACKUPBOX_LONG_FOCUS=*_FUNC_IDEBACKUPBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(33601);}while(r); } S_37274:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33602);if(r)goto S_37274;} do{ *_FUNC_IDEBACKUPBOX_LONG_FOCUS=*_FUNC_IDEBACKUPBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(33602);}while(r); } S_37277:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(33603);if(r)goto S_37277;} do{ *_FUNC_IDEBACKUPBOX_LONG_FOCUS=*_FUNC_IDEBACKUPBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(33603);}while(r); } S_37280:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_FOCUS>*_FUNC_IDEBACKUPBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(33604);if(r)goto S_37280;} do{ *_FUNC_IDEBACKUPBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33604);}while(r); } do{ *_FUNC_IDEBACKUPBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33605);}while(r); S_37284:; fornext_value4274= 1 ; fornext_finalvalue4274= 100 ; fornext_step4274= 1 ; if (fornext_step4274<0) fornext_step_negative4274=1; else fornext_step_negative4274=0; if (new_error) goto fornext_error4274; goto fornext_entrylabel4274; while(1){ fornext_value4274=fornext_step4274+(*_FUNC_IDEBACKUPBOX_LONG_I); fornext_entrylabel4274: *_FUNC_IDEBACKUPBOX_LONG_I=fornext_value4274; if (fornext_step_negative4274){ if (fornext_value4274fornext_finalvalue4274) break; } fornext_error4274:; if(qbevent){evnt(33606);if(r)goto S_37284;} do{ *_FUNC_IDEBACKUPBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(33607);}while(r); S_37286:; if ((*_FUNC_IDEBACKUPBOX_LONG_T)||new_error){ if(qbevent){evnt(33608);if(r)goto S_37286;} do{ *_FUNC_IDEBACKUPBOX_LONG_FOCUSOFFSET=*_FUNC_IDEBACKUPBOX_LONG_FOCUS-*_FUNC_IDEBACKUPBOX_LONG_F; if(!qbevent)break;evnt(33609);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEBACKUPBOX_LONG_I)-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEBACKUPBOX_LONG_FOCUS,_FUNC_IDEBACKUPBOX_LONG_F,_FUNC_IDEBACKUPBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEBACKUPBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEBACKUPBOX_LONG_MOUSEDOWN,_FUNC_IDEBACKUPBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEBACKUPBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33610);}while(r); } } fornext_exit_4273:; do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33617);}while(r); S_37292:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEBACKUPBOX_STRING_A->len> 4 )))||new_error){ if(qbevent){evnt(33618);if(r)goto S_37292;} do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A,qbs_left(_FUNC_IDEBACKUPBOX_STRING_A, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33618);}while(r); } S_37295:; fornext_value4277= 1 ; fornext_finalvalue4277=_FUNC_IDEBACKUPBOX_STRING_A->len; fornext_step4277= 1 ; if (fornext_step4277<0) fornext_step_negative4277=1; else fornext_step_negative4277=0; if (new_error) goto fornext_error4277; goto fornext_entrylabel4277; while(1){ fornext_value4277=fornext_step4277+(*_FUNC_IDEBACKUPBOX_LONG_I); fornext_entrylabel4277: *_FUNC_IDEBACKUPBOX_LONG_I=fornext_value4277; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4277){ if (fornext_value4277fornext_finalvalue4277) break; } fornext_error4277:; if(qbevent){evnt(33619);if(r)goto S_37295;} do{ *_FUNC_IDEBACKUPBOX_LONG_A=qbs_asc(_FUNC_IDEBACKUPBOX_STRING_A,*_FUNC_IDEBACKUPBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33620);}while(r); S_37297:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEBACKUPBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEBACKUPBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(33621);if(r)goto S_37297;} do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33621);}while(r); do{ goto fornext_exit_4276; if(!qbevent)break;evnt(33621);}while(r); } S_37301:; if (((-(*_FUNC_IDEBACKUPBOX_LONG_A< 48 ))|(-(*_FUNC_IDEBACKUPBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(33622);if(r)goto S_37301;} do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A,qbs_left(_FUNC_IDEBACKUPBOX_STRING_A,*_FUNC_IDEBACKUPBOX_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33622);}while(r); do{ goto fornext_exit_4276; if(!qbevent)break;evnt(33622);}while(r); } } fornext_exit_4276:; S_37306:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_FOCUS!= 1 ))||new_error){ if(qbevent){evnt(33624);if(r)goto S_37306;} do{ *_FUNC_IDEBACKUPBOX_LONG_A=qbr(func_val(_FUNC_IDEBACKUPBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33625);}while(r); S_37308:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_A< 10 ))||new_error){ if(qbevent){evnt(33626);if(r)goto S_37308;} do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A,qbs_new_txt_len("10",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33626);}while(r); } S_37311:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_A> 2000 ))||new_error){ if(qbevent){evnt(33627);if(r)goto S_37311;} do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A,qbs_new_txt_len("2000",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33627);}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEBACKUPBOX_STRING_A); if(!qbevent)break;evnt(33629);}while(r); S_37316:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEBACKUPBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDEBACKUPBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33633);if(r)goto S_37316;} do{ goto exit_subfunc; if(!qbevent)break;evnt(33633);}while(r); } S_37319:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEBACKUPBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEBACKUPBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33635);if(r)goto S_37319;} do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33637);}while(r); do{ sub_seek( 150 , 1051 ); if(!qbevent)break;evnt(33638);}while(r); do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[4],_FUNC_IDEBACKUPBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33639);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_V=qbr(func_val(_FUNC_IDEBACKUPBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33640);}while(r); S_37324:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_V< 10 ))||new_error){ if(qbevent){evnt(33641);if(r)goto S_37324;} do{ *_FUNC_IDEBACKUPBOX_LONG_V= 10 ; if(!qbevent)break;evnt(33641);}while(r); } S_37327:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_V> 2000 ))||new_error){ if(qbevent){evnt(33642);if(r)goto S_37327;} do{ *_FUNC_IDEBACKUPBOX_LONG_V= 2000 ; if(!qbevent)break;evnt(33642);}while(r); } S_37330:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_V<*__LONG_IDEBACKUPSIZE))||new_error){ if(qbevent){evnt(33644);if(r)goto S_37330;} do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("undo2.bin",9)), 4 ,NULL,NULL, 151 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33645);}while(r); do{ sub_close( 151 ,1); if(!qbevent)break;evnt(33645);}while(r); do{ *__LONG_IDEUNDOBASE= 0 ; if(!qbevent)break;evnt(33646);}while(r); do{ *__LONG_IDEUNDOPOS= 0 ; if(!qbevent)break;evnt(33647);}while(r); } do{ *__LONG_IDEBACKUPSIZE=*_FUNC_IDEBACKUPBOX_LONG_V; if(!qbevent)break;evnt(33650);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEBACKUPBOX_LONG_V,4,byte_element_4279),0); if(!qbevent)break;evnt(33651);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33652);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_IDEBACKUPBOX= 1 ; if(!qbevent)break;evnt(33653);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33654);}while(r); } do{ *_FUNC_IDEBACKUPBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(33659);}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(33660);}while(r); }while(1); dl_exit_4268:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free131.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEBACKUPBOX_LONG_IDEBACKUPBOX; } int32 FUNC_IDEGOTOBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data132.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(33673);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(33674);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33675);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33676);}while(r); do{ if(!qbevent)break;evnt(33677);}while(r); do{ if (_FUNC_IDEGOTOBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEGOTOBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEGOTOBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEGOTOBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEGOTOBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEGOTOBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEGOTOBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEGOTOBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(33678);}while(r); do{ if(!qbevent)break;evnt(33679);}while(r); do{ if(!qbevent)break;evnt(33680);}while(r); do{ qbs_set(_FUNC_IDEGOTOBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33681);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_I= 0 ; if(!qbevent)break;evnt(33685);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEGOTOBOX_UDT_P)) + (0) ),&(pass4280= 30 ),&(pass4281= 5 ),qbs_new_txt_len("Go To Line",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33686);}while(r); do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33688);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_I=*_FUNC_IDEGOTOBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33689);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(33690);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(33691);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Line",5)); if(!qbevent)break;evnt(33692);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEGOTOBOX_STRING_A2); if(!qbevent)break;evnt(33693);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDEGOTOBOX_STRING_A2->len; if(!qbevent)break;evnt(33694);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_I=*_FUNC_IDEGOTOBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33696);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(33697);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(33698);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDEGOTOBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(33699);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(33700);}while(r); S_37368:; fornext_value4284= 1 ; fornext_finalvalue4284= 100 ; fornext_step4284= 1 ; if (fornext_step4284<0) fornext_step_negative4284=1; else fornext_step_negative4284=0; if (new_error) goto fornext_error4284; goto fornext_entrylabel4284; while(1){ fornext_value4284=fornext_step4284+(*_FUNC_IDEGOTOBOX_LONG_I); fornext_entrylabel4284: *_FUNC_IDEGOTOBOX_LONG_I=fornext_value4284; if (fornext_step_negative4284){ if (fornext_value4284fornext_finalvalue4284) break; } fornext_error4284:; if(qbevent){evnt(33704);if(r)goto S_37368;} do{ memcpy((((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEGOTOBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(33704);}while(r); } fornext_exit_4283:; S_37371:; do{ if(qbevent){evnt(33707);if(r)goto S_37371;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEGOTOBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(33711);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33712);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(33712);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(33712);}while(r); S_37376:; fornext_value4287= 1 ; fornext_finalvalue4287= 100 ; fornext_step4287= 1 ; if (fornext_step4287<0) fornext_step_negative4287=1; else fornext_step_negative4287=0; if (new_error) goto fornext_error4287; goto fornext_entrylabel4287; while(1){ fornext_value4287=fornext_step4287+(*_FUNC_IDEGOTOBOX_LONG_I); fornext_entrylabel4287: *_FUNC_IDEGOTOBOX_LONG_I=fornext_value4287; if (fornext_step_negative4287){ if (fornext_value4287fornext_finalvalue4287) break; } fornext_error4287:; if(qbevent){evnt(33713);if(r)goto S_37376;} S_37377:; if ((*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(33714);if(r)goto S_37377;} do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEGOTOBOX_LONG_FOCUS-*_FUNC_IDEGOTOBOX_LONG_F; if(!qbevent)break;evnt(33717);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(33718);}while(r); do{ *(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(33718);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEGOTOBOX_LONG_F); if(!qbevent)break;evnt(33719);}while(r); S_37382:; if ((*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(33720);if(r)goto S_37382;} do{ *_FUNC_IDEGOTOBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(33720);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(33720);}while(r); } } } fornext_exit_4286:; do{ *_FUNC_IDEGOTOBOX_LONG_LASTFOCUS=*_FUNC_IDEGOTOBOX_LONG_F- 1 ; if(!qbevent)break;evnt(33723);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(33730);}while(r); S_37390:; if ((*_FUNC_IDEGOTOBOX_LONG_CX)||new_error){ if(qbevent){evnt(33731);if(r)goto S_37390;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33731);}while(r); do{ qbg_sub_locate(*_FUNC_IDEGOTOBOX_LONG_CY,*_FUNC_IDEGOTOBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(33731);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33731);}while(r); } do{ *_FUNC_IDEGOTOBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(33734);}while(r); S_37396:; do{ if(qbevent){evnt(33735);if(r)goto S_37396;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(33736);}while(r); S_37398:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(33737);if(r)goto S_37398;} do{ *_FUNC_IDEGOTOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33737);}while(r); } S_37401:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(33738);if(r)goto S_37401;} do{ *_FUNC_IDEGOTOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33738);}while(r); } S_37404:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(33739);if(r)goto S_37404;} do{ *_FUNC_IDEGOTOBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(33739);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33739);}while(r); } S_37408:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(33740);if(r)goto S_37408;} do{ *_FUNC_IDEGOTOBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(33740);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33740);}while(r); } S_37412:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(33741);if(r)goto S_37412;} do{ *_FUNC_IDEGOTOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33741);}while(r); } do{ *_FUNC_IDEGOTOBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(33742);}while(r); S_37416:; if ((-(*_FUNC_IDEGOTOBOX_LONG_ALT!=*_FUNC_IDEGOTOBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(33742);if(r)goto S_37416;} do{ *_FUNC_IDEGOTOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33742);}while(r); } do{ *_FUNC_IDEGOTOBOX_LONG_OLDALT=*_FUNC_IDEGOTOBOX_LONG_ALT; if(!qbevent)break;evnt(33743);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(33744);}while(r); S_37421:; }while((!(*_FUNC_IDEGOTOBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4288:; if(qbevent){evnt(33745);if(r)goto S_37421;} S_37422:; if ((*_FUNC_IDEGOTOBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33746);if(r)goto S_37422;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(33746);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(33746);}while(r); } do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33748);}while(r); S_37428:; if ((*_FUNC_IDEGOTOBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33749);if(r)goto S_37428;} S_37429:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(33750);if(r)goto S_37429;} do{ *_FUNC_IDEGOTOBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33751);}while(r); S_37431:; if (((-(*_FUNC_IDEGOTOBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEGOTOBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(33752);if(r)goto S_37431;} do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEGOTOBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33752);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33755);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(33755);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33755);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(33759);}while(r); S_37440:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33760);if(r)goto S_37440;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33760);}while(r); } S_37443:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33761);if(r)goto S_37443;} do{ *_FUNC_IDEGOTOBOX_LONG_FOCUS=*_FUNC_IDEGOTOBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(33761);}while(r); } S_37446:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33762);if(r)goto S_37446;} do{ *_FUNC_IDEGOTOBOX_LONG_FOCUS=*_FUNC_IDEGOTOBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(33762);}while(r); } S_37449:; if ((-(*_FUNC_IDEGOTOBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(33763);if(r)goto S_37449;} do{ *_FUNC_IDEGOTOBOX_LONG_FOCUS=*_FUNC_IDEGOTOBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(33763);}while(r); } S_37452:; if ((-(*_FUNC_IDEGOTOBOX_LONG_FOCUS>*_FUNC_IDEGOTOBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(33764);if(r)goto S_37452;} do{ *_FUNC_IDEGOTOBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33764);}while(r); } do{ *_FUNC_IDEGOTOBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33765);}while(r); S_37456:; fornext_value4291= 1 ; fornext_finalvalue4291= 100 ; fornext_step4291= 1 ; if (fornext_step4291<0) fornext_step_negative4291=1; else fornext_step_negative4291=0; if (new_error) goto fornext_error4291; goto fornext_entrylabel4291; while(1){ fornext_value4291=fornext_step4291+(*_FUNC_IDEGOTOBOX_LONG_I); fornext_entrylabel4291: *_FUNC_IDEGOTOBOX_LONG_I=fornext_value4291; if (fornext_step_negative4291){ if (fornext_value4291fornext_finalvalue4291) break; } fornext_error4291:; if(qbevent){evnt(33766);if(r)goto S_37456;} do{ *_FUNC_IDEGOTOBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(33767);}while(r); S_37458:; if ((*_FUNC_IDEGOTOBOX_LONG_T)||new_error){ if(qbevent){evnt(33768);if(r)goto S_37458;} do{ *_FUNC_IDEGOTOBOX_LONG_FOCUSOFFSET=*_FUNC_IDEGOTOBOX_LONG_FOCUS-*_FUNC_IDEGOTOBOX_LONG_F; if(!qbevent)break;evnt(33769);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEGOTOBOX_LONG_I)-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEGOTOBOX_LONG_FOCUS,_FUNC_IDEGOTOBOX_LONG_F,_FUNC_IDEGOTOBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEGOTOBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEGOTOBOX_LONG_MOUSEDOWN,_FUNC_IDEGOTOBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEGOTOBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33770);}while(r); } } fornext_exit_4290:; do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33777);}while(r); S_37464:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEGOTOBOX_STRING_A->len> 8 )))||new_error){ if(qbevent){evnt(33778);if(r)goto S_37464;} do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_A,qbs_left(_FUNC_IDEGOTOBOX_STRING_A, 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33778);}while(r); } S_37467:; fornext_value4294= 1 ; fornext_finalvalue4294=_FUNC_IDEGOTOBOX_STRING_A->len; fornext_step4294= 1 ; if (fornext_step4294<0) fornext_step_negative4294=1; else fornext_step_negative4294=0; if (new_error) goto fornext_error4294; goto fornext_entrylabel4294; while(1){ fornext_value4294=fornext_step4294+(*_FUNC_IDEGOTOBOX_LONG_I); fornext_entrylabel4294: *_FUNC_IDEGOTOBOX_LONG_I=fornext_value4294; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4294){ if (fornext_value4294fornext_finalvalue4294) break; } fornext_error4294:; if(qbevent){evnt(33779);if(r)goto S_37467;} do{ *_FUNC_IDEGOTOBOX_LONG_A=qbs_asc(_FUNC_IDEGOTOBOX_STRING_A,*_FUNC_IDEGOTOBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33780);}while(r); S_37469:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEGOTOBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEGOTOBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(33781);if(r)goto S_37469;} do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33781);}while(r); do{ goto fornext_exit_4293; if(!qbevent)break;evnt(33781);}while(r); } S_37473:; if (((-(*_FUNC_IDEGOTOBOX_LONG_A< 48 ))|(-(*_FUNC_IDEGOTOBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(33782);if(r)goto S_37473;} do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_A,qbs_left(_FUNC_IDEGOTOBOX_STRING_A,*_FUNC_IDEGOTOBOX_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33782);}while(r); do{ goto fornext_exit_4293; if(!qbevent)break;evnt(33782);}while(r); } } fornext_exit_4293:; S_37478:; if ((-(*_FUNC_IDEGOTOBOX_LONG_FOCUS!= 1 ))||new_error){ if(qbevent){evnt(33784);if(r)goto S_37478;} do{ *_FUNC_IDEGOTOBOX_LONG_A=qbr(func_val(_FUNC_IDEGOTOBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33785);}while(r); S_37480:; if ((-(*_FUNC_IDEGOTOBOX_LONG_A< 1 ))||new_error){ if(qbevent){evnt(33786);if(r)goto S_37480;} do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_A,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33786);}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEGOTOBOX_STRING_A); if(!qbevent)break;evnt(33788);}while(r); S_37485:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEGOTOBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDEGOTOBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33790);if(r)goto S_37485;} do{ goto exit_subfunc; if(!qbevent)break;evnt(33790);}while(r); } S_37488:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEGOTOBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEGOTOBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33792);if(r)goto S_37488;} do{ qbs_set(_FUNC_IDEGOTOBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEGOTOBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEGOTOBOX_ARRAY_UDT_O[4],_FUNC_IDEGOTOBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33793);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_V=qbr(func_val(_FUNC_IDEGOTOBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33794);}while(r); S_37491:; if ((-(*_FUNC_IDEGOTOBOX_LONG_V< 1 ))||new_error){ if(qbevent){evnt(33795);if(r)goto S_37491;} do{ *_FUNC_IDEGOTOBOX_LONG_V= 1 ; if(!qbevent)break;evnt(33795);}while(r); } S_37494:; if ((-(*_FUNC_IDEGOTOBOX_LONG_V>*__LONG_IDEN))||new_error){ if(qbevent){evnt(33796);if(r)goto S_37494;} do{ *_FUNC_IDEGOTOBOX_LONG_V=*__LONG_IDEN; if(!qbevent)break;evnt(33796);}while(r); } do{ *__LONG_IDECY=*_FUNC_IDEGOTOBOX_LONG_V; if(!qbevent)break;evnt(33797);}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(33798);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33799);}while(r); } do{ *_FUNC_IDEGOTOBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(33804);}while(r); do{ *_FUNC_IDEGOTOBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(33805);}while(r); }while(1); dl_exit_4285:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free132.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEGOTOBOX_LONG_IDEGOTOBOX; } int32 FUNC_IDEADVANCEDBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data133.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(33816);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(33817);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33818);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33819);}while(r); do{ if(!qbevent)break;evnt(33820);}while(r); do{ if (_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(33821);}while(r); do{ if(!qbevent)break;evnt(33822);}while(r); do{ if(!qbevent)break;evnt(33823);}while(r); do{ qbs_set(_FUNC_IDEADVANCEDBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33824);}while(r); do{ if (_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[2]&2){ error(10); }else{ if (_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[2]&1){ error(10); }else{ _FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4]= 0 ; _FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]=( 100 )-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4]+1; _FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[6]=1; _FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]=(ptrszint)malloc(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]*8); if (!_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]) error(257); _FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[2]|=1; tmp_long=_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]; if (_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(33828);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_I= 0 ; if(!qbevent)break;evnt(33830);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_I=*_FUNC_IDEADVANCEDBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33832);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(33833);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDEADVANCEDBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(33835);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(33836);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y= 2 ; if(!qbevent)break;evnt(33838);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_I=*_FUNC_IDEADVANCEDBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(33840);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(33841);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+24))=*_FUNC_IDEADVANCEDBOX_LONG_Y; if(!qbevent)break;evnt(33842);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Embed C++ debug information into executable",43)); if(!qbevent)break;evnt(33843);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDEDEBUGINFO; if(!qbevent)break;evnt(33844);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y=*_FUNC_IDEADVANCEDBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(33845);}while(r); do{ tmp_long=array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len(" ",5),func_chr( 254 )),qbs_new_txt_len(" Investigate crashes/freezes at C++ (not QB64) code level",57))); if(!qbevent)break;evnt(33845);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y=*_FUNC_IDEADVANCEDBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(33846);}while(r); do{ tmp_long=array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len(" ",5),func_chr( 254 )),qbs_new_txt_len(" Use internal/temp/debug batch file to debug your executable",60))); if(!qbevent)break;evnt(33846);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y=*_FUNC_IDEADVANCEDBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(33847);}while(r); do{ tmp_long=array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len(" ",5),func_chr( 254 )),qbs_new_txt_len(" Increases executable size",26))); if(!qbevent)break;evnt(33847);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y=*_FUNC_IDEADVANCEDBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(33848);}while(r); do{ tmp_long=array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len(" ",5),func_chr( 254 )),qbs_new_txt_len(" Makes public the names of variables in your program's code",59))); if(!qbevent)break;evnt(33848);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y=*_FUNC_IDEADVANCEDBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(33849);}while(r); do{ tmp_long=array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len(" ",5),func_chr( 254 )),qbs_new_txt_len(" QB64 libraries will be purged then rebuilt",43))); if(!qbevent)break;evnt(33849);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y=*_FUNC_IDEADVANCEDBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(33850);}while(r); do{ tmp_long=array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_new_txt_len(" ",5),func_chr( 254 )),qbs_new_txt_len(" This setting also affects command line compilation",51))); if(!qbevent)break;evnt(33850);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_Y=*_FUNC_IDEADVANCEDBOX_LONG_Y+ 2 ; if(!qbevent)break;evnt(33852);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+24))=*_FUNC_IDEADVANCEDBOX_LONG_Y; if(!qbevent)break;evnt(33854);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEADVANCEDBOX_UDT_P)) + (0) ),&(pass4296= 75 ),_FUNC_IDEADVANCEDBOX_LONG_Y,qbs_new_txt_len("Advanced Options",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33858);}while(r); S_37540:; fornext_value4298= 1 ; fornext_finalvalue4298= 100 ; fornext_step4298= 1 ; if (fornext_step4298<0) fornext_step_negative4298=1; else fornext_step_negative4298=0; if (new_error) goto fornext_error4298; goto fornext_entrylabel4298; while(1){ fornext_value4298=fornext_step4298+(*_FUNC_IDEADVANCEDBOX_LONG_I); fornext_entrylabel4298: *_FUNC_IDEADVANCEDBOX_LONG_I=fornext_value4298; if (fornext_step_negative4298){ if (fornext_value4298fornext_finalvalue4298) break; } fornext_error4298:; if(qbevent){evnt(33861);if(r)goto S_37540;} do{ memcpy((((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEADVANCEDBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(33861);}while(r); } fornext_exit_4297:; S_37543:; do{ if(qbevent){evnt(33864);if(r)goto S_37543;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEADVANCEDBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(33868);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33869);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(33869);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(33869);}while(r); S_37548:; fornext_value4301= 1 ; fornext_finalvalue4301= 100 ; fornext_step4301= 1 ; if (fornext_step4301<0) fornext_step_negative4301=1; else fornext_step_negative4301=0; if (new_error) goto fornext_error4301; goto fornext_entrylabel4301; while(1){ fornext_value4301=fornext_step4301+(*_FUNC_IDEADVANCEDBOX_LONG_I); fornext_entrylabel4301: *_FUNC_IDEADVANCEDBOX_LONG_I=fornext_value4301; if (fornext_step_negative4301){ if (fornext_value4301fornext_finalvalue4301) break; } fornext_error4301:; if(qbevent){evnt(33870);if(r)goto S_37548;} S_37549:; if ((*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(33871);if(r)goto S_37549;} do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEADVANCEDBOX_LONG_FOCUS-*_FUNC_IDEADVANCEDBOX_LONG_F; if(!qbevent)break;evnt(33874);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(33875);}while(r); do{ *(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(33875);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEADVANCEDBOX_LONG_F); if(!qbevent)break;evnt(33876);}while(r); S_37554:; if ((*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(33877);if(r)goto S_37554;} do{ *_FUNC_IDEADVANCEDBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(33877);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(33877);}while(r); } } } fornext_exit_4300:; do{ *_FUNC_IDEADVANCEDBOX_LONG_LASTFOCUS=*_FUNC_IDEADVANCEDBOX_LONG_F- 1 ; if(!qbevent)break;evnt(33880);}while(r); S_37561:; fornext_value4303= 1 ; fornext_finalvalue4303= 100 ; fornext_step4303= 1 ; if (fornext_step4303<0) fornext_step_negative4303=1; else fornext_step_negative4303=0; if (new_error) goto fornext_error4303; goto fornext_entrylabel4303; while(1){ fornext_value4303=fornext_step4303+(*_FUNC_IDEADVANCEDBOX_LONG_Y); fornext_entrylabel4303: *_FUNC_IDEADVANCEDBOX_LONG_Y=fornext_value4303; if (fornext_step_negative4303){ if (fornext_value4303fornext_finalvalue4303) break; } fornext_error4303:; if(qbevent){evnt(33884);if(r)goto S_37561;} S_37562:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5])]))->len))||new_error){ if(qbevent){evnt(33885);if(r)goto S_37562;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(33886);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_UDT_P)+(4))+*_FUNC_IDEADVANCEDBOX_LONG_Y,*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_UDT_P)+(0))+ 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(33886);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,((qbs*)(((uint64*)(_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[0]))[array_check((*_FUNC_IDEADVANCEDBOX_LONG_Y)-_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[4],_FUNC_IDEADVANCEDBOX_ARRAY_STRING_DIRECT_TEXT[5])]))); if (new_error) goto skip4305; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4305: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33886);}while(r); } } fornext_exit_4302:; do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(33892);}while(r); S_37569:; if ((*_FUNC_IDEADVANCEDBOX_LONG_CX)||new_error){ if(qbevent){evnt(33893);if(r)goto S_37569;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33893);}while(r); do{ qbg_sub_locate(*_FUNC_IDEADVANCEDBOX_LONG_CY,*_FUNC_IDEADVANCEDBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(33893);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33893);}while(r); } do{ *_FUNC_IDEADVANCEDBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(33896);}while(r); S_37575:; do{ if(qbevent){evnt(33897);if(r)goto S_37575;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(33898);}while(r); S_37577:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(33899);if(r)goto S_37577;} do{ *_FUNC_IDEADVANCEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33899);}while(r); } S_37580:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(33900);if(r)goto S_37580;} do{ *_FUNC_IDEADVANCEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33900);}while(r); } S_37583:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(33901);if(r)goto S_37583;} do{ *_FUNC_IDEADVANCEDBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(33901);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33901);}while(r); } S_37587:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(33902);if(r)goto S_37587;} do{ *_FUNC_IDEADVANCEDBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(33902);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33902);}while(r); } S_37591:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(33903);if(r)goto S_37591;} do{ *_FUNC_IDEADVANCEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33903);}while(r); } do{ *_FUNC_IDEADVANCEDBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(33904);}while(r); S_37595:; if ((-(*_FUNC_IDEADVANCEDBOX_LONG_ALT!=*_FUNC_IDEADVANCEDBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(33904);if(r)goto S_37595;} do{ *_FUNC_IDEADVANCEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(33904);}while(r); } do{ *_FUNC_IDEADVANCEDBOX_LONG_OLDALT=*_FUNC_IDEADVANCEDBOX_LONG_ALT; if(!qbevent)break;evnt(33905);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(33906);}while(r); S_37600:; }while((!(*_FUNC_IDEADVANCEDBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4306:; if(qbevent){evnt(33907);if(r)goto S_37600;} S_37601:; if ((*_FUNC_IDEADVANCEDBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33908);if(r)goto S_37601;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(33908);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(33908);}while(r); } do{ qbs_set(_FUNC_IDEADVANCEDBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33910);}while(r); S_37607:; if ((*_FUNC_IDEADVANCEDBOX_LONG_ALT)||new_error){ if(qbevent){evnt(33911);if(r)goto S_37607;} S_37608:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(33912);if(r)goto S_37608;} do{ *_FUNC_IDEADVANCEDBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33913);}while(r); S_37610:; if (((-(*_FUNC_IDEADVANCEDBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEADVANCEDBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(33914);if(r)goto S_37610;} do{ qbs_set(_FUNC_IDEADVANCEDBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEADVANCEDBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33914);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(33917);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(33917);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(33917);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(33921);}while(r); S_37619:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(33922);if(r)goto S_37619;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33922);}while(r); } S_37622:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33923);if(r)goto S_37622;} do{ *_FUNC_IDEADVANCEDBOX_LONG_FOCUS=*_FUNC_IDEADVANCEDBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(33923);}while(r); } S_37625:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(33924);if(r)goto S_37625;} do{ *_FUNC_IDEADVANCEDBOX_LONG_FOCUS=*_FUNC_IDEADVANCEDBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(33924);}while(r); } S_37628:; if ((-(*_FUNC_IDEADVANCEDBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(33925);if(r)goto S_37628;} do{ *_FUNC_IDEADVANCEDBOX_LONG_FOCUS=*_FUNC_IDEADVANCEDBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(33925);}while(r); } S_37631:; if ((-(*_FUNC_IDEADVANCEDBOX_LONG_FOCUS>*_FUNC_IDEADVANCEDBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(33926);if(r)goto S_37631;} do{ *_FUNC_IDEADVANCEDBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(33926);}while(r); } do{ *_FUNC_IDEADVANCEDBOX_LONG_F= 1 ; if(!qbevent)break;evnt(33927);}while(r); S_37635:; fornext_value4309= 1 ; fornext_finalvalue4309= 100 ; fornext_step4309= 1 ; if (fornext_step4309<0) fornext_step_negative4309=1; else fornext_step_negative4309=0; if (new_error) goto fornext_error4309; goto fornext_entrylabel4309; while(1){ fornext_value4309=fornext_step4309+(*_FUNC_IDEADVANCEDBOX_LONG_I); fornext_entrylabel4309: *_FUNC_IDEADVANCEDBOX_LONG_I=fornext_value4309; if (fornext_step_negative4309){ if (fornext_value4309fornext_finalvalue4309) break; } fornext_error4309:; if(qbevent){evnt(33928);if(r)goto S_37635;} do{ *_FUNC_IDEADVANCEDBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(33929);}while(r); S_37637:; if ((*_FUNC_IDEADVANCEDBOX_LONG_T)||new_error){ if(qbevent){evnt(33930);if(r)goto S_37637;} do{ *_FUNC_IDEADVANCEDBOX_LONG_FOCUSOFFSET=*_FUNC_IDEADVANCEDBOX_LONG_FOCUS-*_FUNC_IDEADVANCEDBOX_LONG_F; if(!qbevent)break;evnt(33931);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEADVANCEDBOX_LONG_I)-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEADVANCEDBOX_LONG_FOCUS,_FUNC_IDEADVANCEDBOX_LONG_F,_FUNC_IDEADVANCEDBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEADVANCEDBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEADVANCEDBOX_LONG_MOUSEDOWN,_FUNC_IDEADVANCEDBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEADVANCEDBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33932);}while(r); } } fornext_exit_4308:; S_37642:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEADVANCEDBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEADVANCEDBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33939);if(r)goto S_37642;} do{ goto exit_subfunc; if(!qbevent)break;evnt(33939);}while(r); } S_37645:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEADVANCEDBOX_LONG_FOCUS== 1 ))&(-(*_FUNC_IDEADVANCEDBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(33941);if(r)goto S_37645;} do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33943);}while(r); do{ *_FUNC_IDEADVANCEDBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[4],_FUNC_IDEADVANCEDBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(33946);}while(r); S_37648:; if ((-(*_FUNC_IDEADVANCEDBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(33946);if(r)goto S_37648;} do{ *_FUNC_IDEADVANCEDBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(33946);}while(r); } S_37651:; if ((-(*_FUNC_IDEADVANCEDBOX_INTEGER_V!=*__LONG_IDEDEBUGINFO))||new_error){ if(qbevent){evnt(33947);if(r)goto S_37651;} do{ sub_seek( 150 , 1055 ); if(!qbevent)break;evnt(33948);}while(r); do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEADVANCEDBOX_INTEGER_V,2,byte_element_4310),0); if(!qbevent)break;evnt(33948);}while(r); do{ *__LONG_IDEDEBUGINFO=*_FUNC_IDEADVANCEDBOX_INTEGER_V; if(!qbevent)break;evnt(33949);}while(r); do{ *__LONG_INCLUDE_GDB_DEBUGGING_INFO=*__LONG_IDEDEBUGINFO; if(!qbevent)break;evnt(33950);}while(r); S_37656:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(33951);if(r)goto S_37656;} do{ sub_chdir(qbs_new_txt_len("internal\\c",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33952);}while(r); do{ sub_shell2(qbs_new_txt_len("cmd /c purge_all_precompiled_content_win.bat",44),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33953);}while(r); do{ sub_chdir(qbs_new_txt_len("..\\..",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33954);}while(r); } S_37661:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(33956);if(r)goto S_37661;} do{ sub_chdir(qbs_new_txt_len("./internal/c",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33957);}while(r); S_37663:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(33959);if(r)goto S_37663;} do{ sub_shell2(qbs_new_txt_len("./purge_all_precompiled_content_osx.command",43),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33960);}while(r); }else{ do{ sub_shell2(qbs_new_txt_len("./purge_all_precompiled_content_lnx.sh",38),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33962);}while(r); } do{ sub_chdir(qbs_new_txt_len("../..",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(33964);}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(33966);}while(r); } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(33971);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(33973);}while(r); } do{ *_FUNC_IDEADVANCEDBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(33990);}while(r); do{ *_FUNC_IDEADVANCEDBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(33991);}while(r); }while(1); dl_exit_4299:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free133.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEADVANCEDBOX_LONG_IDEADVANCEDBOX; } int32 FUNC_IDEUPDATEBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data134.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(34006);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(34007);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34008);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34009);}while(r); do{ if(!qbevent)break;evnt(34010);}while(r); do{ if (_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEUPDATEBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEUPDATEBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(34011);}while(r); do{ if(!qbevent)break;evnt(34012);}while(r); do{ if(!qbevent)break;evnt(34013);}while(r); do{ qbs_set(_FUNC_IDEUPDATEBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34014);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_I= 0 ; if(!qbevent)break;evnt(34018);}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEUPDATEBOX_UDT_P)) + (0) ),&(pass4311= 40 ),&(pass4312= 8 ),qbs_new_txt_len("Update",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34019);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_I=*_FUNC_IDEUPDATEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34021);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(34022);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(34023);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Check for updates:",19)); if(!qbevent)break;evnt(34024);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDEUPDATECHECK; if(!qbevent)break;evnt(34025);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_I=*_FUNC_IDEUPDATEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34027);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(34028);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(34029);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+20))= 8 ; if(!qbevent)break;evnt(34030);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Only check once per day",24)); if(!qbevent)break;evnt(34031);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDEUPDATEDAILY; if(!qbevent)break;evnt(34032);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_I=*_FUNC_IDEUPDATEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34034);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(34035);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+24))= 6 ; if(!qbevent)break;evnt(34036);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+20))= 8 ; if(!qbevent)break;evnt(34037);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Automatically apply updates",28)); if(!qbevent)break;evnt(34038);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDEUPDATEAUTO; if(!qbevent)break;evnt(34039);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_I=*_FUNC_IDEUPDATEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34041);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(34042);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+24))= 8 ; if(!qbevent)break;evnt(34043);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDEUPDATEBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(34044);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(34045);}while(r); S_37711:; fornext_value4314= 1 ; fornext_finalvalue4314= 100 ; fornext_step4314= 1 ; if (fornext_step4314<0) fornext_step_negative4314=1; else fornext_step_negative4314=0; if (new_error) goto fornext_error4314; goto fornext_entrylabel4314; while(1){ fornext_value4314=fornext_step4314+(*_FUNC_IDEUPDATEBOX_LONG_I); fornext_entrylabel4314: *_FUNC_IDEUPDATEBOX_LONG_I=fornext_value4314; if (fornext_step_negative4314){ if (fornext_value4314fornext_finalvalue4314) break; } fornext_error4314:; if(qbevent){evnt(34049);if(r)goto S_37711;} do{ memcpy((((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEUPDATEBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(34049);}while(r); } fornext_exit_4313:; S_37714:; do{ if(qbevent){evnt(34052);if(r)goto S_37714;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEUPDATEBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(34056);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34057);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(34057);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(34057);}while(r); S_37719:; fornext_value4317= 1 ; fornext_finalvalue4317= 100 ; fornext_step4317= 1 ; if (fornext_step4317<0) fornext_step_negative4317=1; else fornext_step_negative4317=0; if (new_error) goto fornext_error4317; goto fornext_entrylabel4317; while(1){ fornext_value4317=fornext_step4317+(*_FUNC_IDEUPDATEBOX_LONG_I); fornext_entrylabel4317: *_FUNC_IDEUPDATEBOX_LONG_I=fornext_value4317; if (fornext_step_negative4317){ if (fornext_value4317fornext_finalvalue4317) break; } fornext_error4317:; if(qbevent){evnt(34058);if(r)goto S_37719;} S_37720:; if ((*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(34059);if(r)goto S_37720;} do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEUPDATEBOX_LONG_FOCUS-*_FUNC_IDEUPDATEBOX_LONG_F; if(!qbevent)break;evnt(34062);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(34063);}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(34063);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEUPDATEBOX_LONG_F); if(!qbevent)break;evnt(34064);}while(r); S_37725:; if ((*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(34065);if(r)goto S_37725;} do{ *_FUNC_IDEUPDATEBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(34065);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(34065);}while(r); } } } fornext_exit_4316:; do{ *_FUNC_IDEUPDATEBOX_LONG_LASTFOCUS=*_FUNC_IDEUPDATEBOX_LONG_F- 1 ; if(!qbevent)break;evnt(34068);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(34075);}while(r); S_37733:; if ((*_FUNC_IDEUPDATEBOX_LONG_CX)||new_error){ if(qbevent){evnt(34076);if(r)goto S_37733;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34076);}while(r); do{ qbg_sub_locate(*_FUNC_IDEUPDATEBOX_LONG_CY,*_FUNC_IDEUPDATEBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(34076);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34076);}while(r); } do{ *_FUNC_IDEUPDATEBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(34079);}while(r); S_37739:; do{ if(qbevent){evnt(34080);if(r)goto S_37739;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(34081);}while(r); S_37741:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(34082);if(r)goto S_37741;} do{ *_FUNC_IDEUPDATEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34082);}while(r); } S_37744:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(34083);if(r)goto S_37744;} do{ *_FUNC_IDEUPDATEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34083);}while(r); } S_37747:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(34084);if(r)goto S_37747;} do{ *_FUNC_IDEUPDATEBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(34084);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34084);}while(r); } S_37751:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(34085);if(r)goto S_37751;} do{ *_FUNC_IDEUPDATEBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(34085);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34085);}while(r); } S_37755:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(34086);if(r)goto S_37755;} do{ *_FUNC_IDEUPDATEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34086);}while(r); } do{ *_FUNC_IDEUPDATEBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(34087);}while(r); S_37759:; if ((-(*_FUNC_IDEUPDATEBOX_LONG_ALT!=*_FUNC_IDEUPDATEBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(34087);if(r)goto S_37759;} do{ *_FUNC_IDEUPDATEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34087);}while(r); } do{ *_FUNC_IDEUPDATEBOX_LONG_OLDALT=*_FUNC_IDEUPDATEBOX_LONG_ALT; if(!qbevent)break;evnt(34088);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(34089);}while(r); S_37764:; }while((!(*_FUNC_IDEUPDATEBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4318:; if(qbevent){evnt(34090);if(r)goto S_37764;} S_37765:; if ((*_FUNC_IDEUPDATEBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34091);if(r)goto S_37765;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(34091);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(34091);}while(r); } do{ qbs_set(_FUNC_IDEUPDATEBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34093);}while(r); S_37771:; if ((*_FUNC_IDEUPDATEBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34094);if(r)goto S_37771;} S_37772:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(34095);if(r)goto S_37772;} do{ *_FUNC_IDEUPDATEBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34096);}while(r); S_37774:; if (((-(*_FUNC_IDEUPDATEBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEUPDATEBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(34097);if(r)goto S_37774;} do{ qbs_set(_FUNC_IDEUPDATEBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEUPDATEBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34097);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34100);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(34100);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34100);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(34104);}while(r); S_37783:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34105);if(r)goto S_37783;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34105);}while(r); } S_37786:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34106);if(r)goto S_37786;} do{ *_FUNC_IDEUPDATEBOX_LONG_FOCUS=*_FUNC_IDEUPDATEBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(34106);}while(r); } S_37789:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34107);if(r)goto S_37789;} do{ *_FUNC_IDEUPDATEBOX_LONG_FOCUS=*_FUNC_IDEUPDATEBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(34107);}while(r); } S_37792:; if ((-(*_FUNC_IDEUPDATEBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(34108);if(r)goto S_37792;} do{ *_FUNC_IDEUPDATEBOX_LONG_FOCUS=*_FUNC_IDEUPDATEBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(34108);}while(r); } S_37795:; if ((-(*_FUNC_IDEUPDATEBOX_LONG_FOCUS>*_FUNC_IDEUPDATEBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(34109);if(r)goto S_37795;} do{ *_FUNC_IDEUPDATEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34109);}while(r); } do{ *_FUNC_IDEUPDATEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34110);}while(r); S_37799:; fornext_value4321= 1 ; fornext_finalvalue4321= 100 ; fornext_step4321= 1 ; if (fornext_step4321<0) fornext_step_negative4321=1; else fornext_step_negative4321=0; if (new_error) goto fornext_error4321; goto fornext_entrylabel4321; while(1){ fornext_value4321=fornext_step4321+(*_FUNC_IDEUPDATEBOX_LONG_I); fornext_entrylabel4321: *_FUNC_IDEUPDATEBOX_LONG_I=fornext_value4321; if (fornext_step_negative4321){ if (fornext_value4321fornext_finalvalue4321) break; } fornext_error4321:; if(qbevent){evnt(34111);if(r)goto S_37799;} do{ *_FUNC_IDEUPDATEBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(34112);}while(r); S_37801:; if ((*_FUNC_IDEUPDATEBOX_LONG_T)||new_error){ if(qbevent){evnt(34113);if(r)goto S_37801;} do{ *_FUNC_IDEUPDATEBOX_LONG_FOCUSOFFSET=*_FUNC_IDEUPDATEBOX_LONG_FOCUS-*_FUNC_IDEUPDATEBOX_LONG_F; if(!qbevent)break;evnt(34114);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEUPDATEBOX_LONG_I)-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEUPDATEBOX_LONG_FOCUS,_FUNC_IDEUPDATEBOX_LONG_F,_FUNC_IDEUPDATEBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEUPDATEBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEUPDATEBOX_LONG_MOUSEDOWN,_FUNC_IDEUPDATEBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEUPDATEBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34115);}while(r); } } fornext_exit_4320:; S_37806:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEUPDATEBOX_LONG_FOCUS== 5 ))&(-(*_FUNC_IDEUPDATEBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(34121);if(r)goto S_37806;} do{ goto exit_subfunc; if(!qbevent)break;evnt(34121);}while(r); } S_37809:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEUPDATEBOX_LONG_FOCUS== 4 ))&(-(*_FUNC_IDEUPDATEBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(34122);if(r)goto S_37809;} do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34124);}while(r); do{ sub_seek( 150 , 1039 ); if(!qbevent)break;evnt(34125);}while(r); do{ *_FUNC_IDEUPDATEBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(34126);}while(r); S_37813:; if ((-(*_FUNC_IDEUPDATEBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(34126);if(r)goto S_37813;} do{ *_FUNC_IDEUPDATEBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(34126);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEUPDATEBOX_INTEGER_V,2,byte_element_4322),0); if(!qbevent)break;evnt(34127);}while(r); do{ *__LONG_IDEUPDATECHECK=*_FUNC_IDEUPDATEBOX_INTEGER_V; if(!qbevent)break;evnt(34128);}while(r); do{ *_FUNC_IDEUPDATEBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(34129);}while(r); S_37819:; if ((-(*_FUNC_IDEUPDATEBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(34129);if(r)goto S_37819;} do{ *_FUNC_IDEUPDATEBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(34129);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEUPDATEBOX_INTEGER_V,2,byte_element_4323),0); if(!qbevent)break;evnt(34130);}while(r); do{ *__LONG_IDEUPDATEDAILY=*_FUNC_IDEUPDATEBOX_INTEGER_V; if(!qbevent)break;evnt(34131);}while(r); do{ *_FUNC_IDEUPDATEBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(34132);}while(r); S_37825:; if ((-(*_FUNC_IDEUPDATEBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(34132);if(r)goto S_37825;} do{ *_FUNC_IDEUPDATEBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(34132);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEUPDATEBOX_INTEGER_V,2,byte_element_4324),0); if(!qbevent)break;evnt(34133);}while(r); do{ *__LONG_IDEUPDATEAUTO=*_FUNC_IDEUPDATEBOX_INTEGER_V; if(!qbevent)break;evnt(34134);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(34135);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34136);}while(r); } do{ *_FUNC_IDEUPDATEBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(34140);}while(r); do{ *_FUNC_IDEUPDATEBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(34141);}while(r); }while(1); dl_exit_4315:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free134.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEUPDATEBOX_LONG_IDEUPDATEBOX; } void SUB_IDEMESSAGEBOX(qbs*_SUB_IDEMESSAGEBOX_STRING_TITLESTR,qbs*_SUB_IDEMESSAGEBOX_STRING_MESSAGESTR){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data135.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(34152);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(34153);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34154);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34155);}while(r); do{ if(!qbevent)break;evnt(34156);}while(r); do{ if (_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4]= 1 ; _SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]=( 100 )-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4]+1; _SUB_IDEMESSAGEBOX_ARRAY_UDT_O[6]=1; if (_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[2]&4){ _SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0]),0,_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0]) error(257); } _SUB_IDEMESSAGEBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(34157);}while(r); do{ if(!qbevent)break;evnt(34158);}while(r); do{ if(!qbevent)break;evnt(34159);}while(r); do{ qbs_set(_SUB_IDEMESSAGEBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34160);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_I= 0 ; if(!qbevent)break;evnt(34164);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_W=_SUB_IDEMESSAGEBOX_STRING_MESSAGESTR->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34165);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_W2=_SUB_IDEMESSAGEBOX_STRING_TITLESTR->len+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34166);}while(r); S_37848:; if ((-(*_SUB_IDEMESSAGEBOX_LONG_W<*_SUB_IDEMESSAGEBOX_LONG_W2))||new_error){ if(qbevent){evnt(34167);if(r)goto S_37848;} do{ *_SUB_IDEMESSAGEBOX_LONG_W=*_SUB_IDEMESSAGEBOX_LONG_W2; if(!qbevent)break;evnt(34167);}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_SUB_IDEMESSAGEBOX_UDT_P)) + (0) ),_SUB_IDEMESSAGEBOX_LONG_W,&(pass4329= 4 ),_SUB_IDEMESSAGEBOX_STRING_TITLESTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34168);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_I=*_SUB_IDEMESSAGEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34170);}while(r); do{ *(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(34171);}while(r); do{ *(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(34172);}while(r); do{ *(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_new_txt_len("OK",2)); if(!qbevent)break;evnt(34173);}while(r); do{ *(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(34174);}while(r); S_37857:; fornext_value4331= 1 ; fornext_finalvalue4331= 100 ; fornext_step4331= 1 ; if (fornext_step4331<0) fornext_step_negative4331=1; else fornext_step_negative4331=0; if (new_error) goto fornext_error4331; goto fornext_entrylabel4331; while(1){ fornext_value4331=fornext_step4331+(*_SUB_IDEMESSAGEBOX_LONG_I); fornext_entrylabel4331: *_SUB_IDEMESSAGEBOX_LONG_I=fornext_value4331; if (fornext_step_negative4331){ if (fornext_value4331fornext_finalvalue4331) break; } fornext_error4331:; if(qbevent){evnt(34178);if(r)goto S_37857;} do{ memcpy((((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80)),(((char*)_SUB_IDEMESSAGEBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(34178);}while(r); } fornext_exit_4330:; S_37860:; do{ if(qbevent){evnt(34181);if(r)goto S_37860;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_SUB_IDEMESSAGEBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(34185);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34186);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(34186);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(34186);}while(r); S_37865:; fornext_value4334= 1 ; fornext_finalvalue4334= 100 ; fornext_step4334= 1 ; if (fornext_step4334<0) fornext_step_negative4334=1; else fornext_step_negative4334=0; if (new_error) goto fornext_error4334; goto fornext_entrylabel4334; while(1){ fornext_value4334=fornext_step4334+(*_SUB_IDEMESSAGEBOX_LONG_I); fornext_entrylabel4334: *_SUB_IDEMESSAGEBOX_LONG_I=fornext_value4334; if (fornext_step_negative4334){ if (fornext_value4334fornext_finalvalue4334) break; } fornext_error4334:; if(qbevent){evnt(34187);if(r)goto S_37865;} S_37866:; if ((*(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(34188);if(r)goto S_37866;} do{ *(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+60))=*_SUB_IDEMESSAGEBOX_LONG_FOCUS-*_SUB_IDEMESSAGEBOX_LONG_F; if(!qbevent)break;evnt(34191);}while(r); do{ *(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(34192);}while(r); do{ *(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(34192);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80) ),_SUB_IDEMESSAGEBOX_LONG_F); if(!qbevent)break;evnt(34193);}while(r); S_37871:; if ((*(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(34194);if(r)goto S_37871;} do{ *_SUB_IDEMESSAGEBOX_LONG_CX=*(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(34194);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_CY=*(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(34194);}while(r); } } } fornext_exit_4333:; do{ *_SUB_IDEMESSAGEBOX_LONG_LASTFOCUS=*_SUB_IDEMESSAGEBOX_LONG_F- 1 ; if(!qbevent)break;evnt(34197);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(34201);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_SUB_IDEMESSAGEBOX_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_SUB_IDEMESSAGEBOX_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(34201);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDEMESSAGEBOX_STRING_MESSAGESTR); if (new_error) goto skip4335; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4335: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34201);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(34205);}while(r); S_37882:; if ((*_SUB_IDEMESSAGEBOX_LONG_CX)||new_error){ if(qbevent){evnt(34206);if(r)goto S_37882;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34206);}while(r); do{ qbg_sub_locate(*_SUB_IDEMESSAGEBOX_LONG_CY,*_SUB_IDEMESSAGEBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(34206);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34206);}while(r); } do{ *_SUB_IDEMESSAGEBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(34209);}while(r); S_37888:; do{ if(qbevent){evnt(34210);if(r)goto S_37888;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(34211);}while(r); S_37890:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(34212);if(r)goto S_37890;} do{ *_SUB_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34212);}while(r); } S_37893:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(34213);if(r)goto S_37893;} do{ *_SUB_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34213);}while(r); } S_37896:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(34214);if(r)goto S_37896;} do{ *_SUB_IDEMESSAGEBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(34214);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34214);}while(r); } S_37900:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(34215);if(r)goto S_37900;} do{ *_SUB_IDEMESSAGEBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(34215);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34215);}while(r); } S_37904:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(34216);if(r)goto S_37904;} do{ *_SUB_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34216);}while(r); } do{ *_SUB_IDEMESSAGEBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(34217);}while(r); S_37908:; if ((-(*_SUB_IDEMESSAGEBOX_LONG_ALT!=*_SUB_IDEMESSAGEBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(34217);if(r)goto S_37908;} do{ *_SUB_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34217);}while(r); } do{ *_SUB_IDEMESSAGEBOX_LONG_OLDALT=*_SUB_IDEMESSAGEBOX_LONG_ALT; if(!qbevent)break;evnt(34218);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(34219);}while(r); S_37913:; }while((!(*_SUB_IDEMESSAGEBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4336:; if(qbevent){evnt(34220);if(r)goto S_37913;} S_37914:; if ((*_SUB_IDEMESSAGEBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34221);if(r)goto S_37914;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(34221);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(34221);}while(r); } do{ qbs_set(_SUB_IDEMESSAGEBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34223);}while(r); S_37920:; if ((*_SUB_IDEMESSAGEBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34224);if(r)goto S_37920;} S_37921:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(34225);if(r)goto S_37921;} do{ *_SUB_IDEMESSAGEBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34226);}while(r); S_37923:; if (((-(*_SUB_IDEMESSAGEBOX_LONG_K>= 65 ))&(-(*_SUB_IDEMESSAGEBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(34227);if(r)goto S_37923;} do{ qbs_set(_SUB_IDEMESSAGEBOX_STRING_ALTLETTER,func_chr(*_SUB_IDEMESSAGEBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34227);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34230);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(34230);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34230);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(34234);}while(r); S_37932:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34235);if(r)goto S_37932;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34235);}while(r); } S_37935:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34236);if(r)goto S_37935;} do{ *_SUB_IDEMESSAGEBOX_LONG_FOCUS=*_SUB_IDEMESSAGEBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(34236);}while(r); } S_37938:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34237);if(r)goto S_37938;} do{ *_SUB_IDEMESSAGEBOX_LONG_FOCUS=*_SUB_IDEMESSAGEBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(34237);}while(r); } S_37941:; if ((-(*_SUB_IDEMESSAGEBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(34238);if(r)goto S_37941;} do{ *_SUB_IDEMESSAGEBOX_LONG_FOCUS=*_SUB_IDEMESSAGEBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(34238);}while(r); } S_37944:; if ((-(*_SUB_IDEMESSAGEBOX_LONG_FOCUS>*_SUB_IDEMESSAGEBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(34239);if(r)goto S_37944;} do{ *_SUB_IDEMESSAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34239);}while(r); } do{ *_SUB_IDEMESSAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34240);}while(r); S_37948:; fornext_value4339= 1 ; fornext_finalvalue4339= 100 ; fornext_step4339= 1 ; if (fornext_step4339<0) fornext_step_negative4339=1; else fornext_step_negative4339=0; if (new_error) goto fornext_error4339; goto fornext_entrylabel4339; while(1){ fornext_value4339=fornext_step4339+(*_SUB_IDEMESSAGEBOX_LONG_I); fornext_entrylabel4339: *_SUB_IDEMESSAGEBOX_LONG_I=fornext_value4339; if (fornext_step_negative4339){ if (fornext_value4339fornext_finalvalue4339) break; } fornext_error4339:; if(qbevent){evnt(34241);if(r)goto S_37948;} do{ *_SUB_IDEMESSAGEBOX_LONG_T=*(int32*)(((char*)_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(34242);}while(r); S_37950:; if ((*_SUB_IDEMESSAGEBOX_LONG_T)||new_error){ if(qbevent){evnt(34243);if(r)goto S_37950;} do{ *_SUB_IDEMESSAGEBOX_LONG_FOCUSOFFSET=*_SUB_IDEMESSAGEBOX_LONG_FOCUS-*_SUB_IDEMESSAGEBOX_LONG_F; if(!qbevent)break;evnt(34244);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[0])) + ((array_check((*_SUB_IDEMESSAGEBOX_LONG_I)-_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[4],_SUB_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*80) ),_SUB_IDEMESSAGEBOX_LONG_FOCUS,_SUB_IDEMESSAGEBOX_LONG_F,_SUB_IDEMESSAGEBOX_LONG_FOCUSOFFSET,__STRING_K,_SUB_IDEMESSAGEBOX_STRING_ALTLETTER,__LONG_MB,_SUB_IDEMESSAGEBOX_LONG_MOUSEDOWN,_SUB_IDEMESSAGEBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_SUB_IDEMESSAGEBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34245);}while(r); } } fornext_exit_4338:; S_37955:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_SUB_IDEMESSAGEBOX_LONG_FOCUS== 1 ))&(-(*_SUB_IDEMESSAGEBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(34251);if(r)goto S_37955;} do{ goto exit_subfunc; if(!qbevent)break;evnt(34251);}while(r); } do{ *_SUB_IDEMESSAGEBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(34254);}while(r); do{ *_SUB_IDEMESSAGEBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(34255);}while(r); }while(1); dl_exit_4332:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free135.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_IDEYESNOBOX(qbs*_FUNC_IDEYESNOBOX_STRING_TITLESTR,qbs*_FUNC_IDEYESNOBOX_STRING_MESSAGESTR){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data136.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(34263);}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(34264);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(34265);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34266);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34267);}while(r); do{ if(!qbevent)break;evnt(34268);}while(r); do{ if (_FUNC_IDEYESNOBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEYESNOBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEYESNOBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEYESNOBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEYESNOBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEYESNOBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEYESNOBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEYESNOBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(34269);}while(r); do{ if(!qbevent)break;evnt(34270);}while(r); do{ if(!qbevent)break;evnt(34271);}while(r); do{ qbs_set(_FUNC_IDEYESNOBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34272);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_I= 0 ; if(!qbevent)break;evnt(34276);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_W=_FUNC_IDEYESNOBOX_STRING_MESSAGESTR->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34277);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_W2=_FUNC_IDEYESNOBOX_STRING_TITLESTR->len+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34278);}while(r); S_37974:; if ((-(*_FUNC_IDEYESNOBOX_LONG_W<*_FUNC_IDEYESNOBOX_LONG_W2))||new_error){ if(qbevent){evnt(34279);if(r)goto S_37974;} do{ *_FUNC_IDEYESNOBOX_LONG_W=*_FUNC_IDEYESNOBOX_LONG_W2; if(!qbevent)break;evnt(34279);}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEYESNOBOX_UDT_P)) + (0) ),_FUNC_IDEYESNOBOX_LONG_W,&(pass4344= 4 ),_FUNC_IDEYESNOBOX_STRING_TITLESTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34280);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_I=*_FUNC_IDEYESNOBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34282);}while(r); do{ *(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(34283);}while(r); do{ *(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+24))= 4 ; if(!qbevent)break;evnt(34284);}while(r); do{ *(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#Yes",4),_FUNC_IDEYESNOBOX_STRING1_SEP),qbs_new_txt_len("#No",3))); if(!qbevent)break;evnt(34285);}while(r); do{ *(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(34286);}while(r); S_37983:; fornext_value4346= 1 ; fornext_finalvalue4346= 100 ; fornext_step4346= 1 ; if (fornext_step4346<0) fornext_step_negative4346=1; else fornext_step_negative4346=0; if (new_error) goto fornext_error4346; goto fornext_entrylabel4346; while(1){ fornext_value4346=fornext_step4346+(*_FUNC_IDEYESNOBOX_LONG_I); fornext_entrylabel4346: *_FUNC_IDEYESNOBOX_LONG_I=fornext_value4346; if (fornext_step_negative4346){ if (fornext_value4346fornext_finalvalue4346) break; } fornext_error4346:; if(qbevent){evnt(34290);if(r)goto S_37983;} do{ memcpy((((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEYESNOBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(34290);}while(r); } fornext_exit_4345:; S_37986:; do{ if(qbevent){evnt(34293);if(r)goto S_37986;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEYESNOBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(34296);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34297);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(34297);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(34297);}while(r); S_37991:; fornext_value4349= 1 ; fornext_finalvalue4349= 100 ; fornext_step4349= 1 ; if (fornext_step4349<0) fornext_step_negative4349=1; else fornext_step_negative4349=0; if (new_error) goto fornext_error4349; goto fornext_entrylabel4349; while(1){ fornext_value4349=fornext_step4349+(*_FUNC_IDEYESNOBOX_LONG_I); fornext_entrylabel4349: *_FUNC_IDEYESNOBOX_LONG_I=fornext_value4349; if (fornext_step_negative4349){ if (fornext_value4349fornext_finalvalue4349) break; } fornext_error4349:; if(qbevent){evnt(34298);if(r)goto S_37991;} S_37992:; if ((*(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(34299);if(r)goto S_37992;} do{ *(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEYESNOBOX_LONG_FOCUS-*_FUNC_IDEYESNOBOX_LONG_F; if(!qbevent)break;evnt(34301);}while(r); do{ *(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(34302);}while(r); do{ *(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(34302);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEYESNOBOX_LONG_F); if(!qbevent)break;evnt(34303);}while(r); S_37997:; if ((*(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(34304);if(r)goto S_37997;} do{ *_FUNC_IDEYESNOBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(34304);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(34304);}while(r); } } } fornext_exit_4348:; do{ *_FUNC_IDEYESNOBOX_LONG_LASTFOCUS=*_FUNC_IDEYESNOBOX_LONG_F- 1 ; if(!qbevent)break;evnt(34307);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(34311);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDEYESNOBOX_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDEYESNOBOX_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(34311);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_IDEYESNOBOX_STRING_MESSAGESTR); if (new_error) goto skip4350; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4350: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34311);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(34315);}while(r); S_38008:; if ((*_FUNC_IDEYESNOBOX_LONG_CX)||new_error){ if(qbevent){evnt(34317);if(r)goto S_38008;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34317);}while(r); do{ qbg_sub_locate(*_FUNC_IDEYESNOBOX_LONG_CY,*_FUNC_IDEYESNOBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(34317);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34317);}while(r); } do{ *_FUNC_IDEYESNOBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(34320);}while(r); S_38014:; do{ if(qbevent){evnt(34321);if(r)goto S_38014;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(34322);}while(r); S_38016:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(34323);if(r)goto S_38016;} do{ *_FUNC_IDEYESNOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34323);}while(r); } S_38019:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(34324);if(r)goto S_38019;} do{ *_FUNC_IDEYESNOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34324);}while(r); } S_38022:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(34325);if(r)goto S_38022;} do{ *_FUNC_IDEYESNOBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(34325);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34325);}while(r); } S_38026:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(34326);if(r)goto S_38026;} do{ *_FUNC_IDEYESNOBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(34326);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34326);}while(r); } S_38030:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(34327);if(r)goto S_38030;} do{ *_FUNC_IDEYESNOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34327);}while(r); } do{ *_FUNC_IDEYESNOBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(34328);}while(r); S_38034:; if ((-(*_FUNC_IDEYESNOBOX_LONG_ALT!=*_FUNC_IDEYESNOBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(34328);if(r)goto S_38034;} do{ *_FUNC_IDEYESNOBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34328);}while(r); } do{ *_FUNC_IDEYESNOBOX_LONG_OLDALT=*_FUNC_IDEYESNOBOX_LONG_ALT; if(!qbevent)break;evnt(34329);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(34330);}while(r); S_38039:; }while((!(*_FUNC_IDEYESNOBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4351:; if(qbevent){evnt(34331);if(r)goto S_38039;} S_38040:; if ((*_FUNC_IDEYESNOBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34332);if(r)goto S_38040;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(34332);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(34332);}while(r); } do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34334);}while(r); S_38046:; if ((*_FUNC_IDEYESNOBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34335);if(r)goto S_38046;} S_38047:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(34336);if(r)goto S_38047;} do{ *_FUNC_IDEYESNOBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34337);}while(r); S_38049:; if (((-(*_FUNC_IDEYESNOBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEYESNOBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(34338);if(r)goto S_38049;} do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEYESNOBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34338);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34341);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(34341);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34341);}while(r); S_38057:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(34344);if(r)goto S_38057;} do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_ALTLETTER,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34344);}while(r); } S_38060:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(34345);if(r)goto S_38060;} do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_ALTLETTER,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34345);}while(r); } do{ *_FUNC_IDEYESNOBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(34348);}while(r); S_38064:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34349);if(r)goto S_38064;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34349);}while(r); } S_38067:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34350);if(r)goto S_38067;} do{ *_FUNC_IDEYESNOBOX_LONG_FOCUS=*_FUNC_IDEYESNOBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(34350);}while(r); } S_38070:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34351);if(r)goto S_38070;} do{ *_FUNC_IDEYESNOBOX_LONG_FOCUS=*_FUNC_IDEYESNOBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(34351);}while(r); } S_38073:; if ((-(*_FUNC_IDEYESNOBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(34352);if(r)goto S_38073;} do{ *_FUNC_IDEYESNOBOX_LONG_FOCUS=*_FUNC_IDEYESNOBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(34352);}while(r); } S_38076:; if ((-(*_FUNC_IDEYESNOBOX_LONG_FOCUS>*_FUNC_IDEYESNOBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(34353);if(r)goto S_38076;} do{ *_FUNC_IDEYESNOBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34353);}while(r); } do{ *_FUNC_IDEYESNOBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34354);}while(r); S_38080:; fornext_value4354= 1 ; fornext_finalvalue4354= 100 ; fornext_step4354= 1 ; if (fornext_step4354<0) fornext_step_negative4354=1; else fornext_step_negative4354=0; if (new_error) goto fornext_error4354; goto fornext_entrylabel4354; while(1){ fornext_value4354=fornext_step4354+(*_FUNC_IDEYESNOBOX_LONG_I); fornext_entrylabel4354: *_FUNC_IDEYESNOBOX_LONG_I=fornext_value4354; if (fornext_step_negative4354){ if (fornext_value4354fornext_finalvalue4354) break; } fornext_error4354:; if(qbevent){evnt(34355);if(r)goto S_38080;} do{ *_FUNC_IDEYESNOBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(34356);}while(r); S_38082:; if ((*_FUNC_IDEYESNOBOX_LONG_T)||new_error){ if(qbevent){evnt(34357);if(r)goto S_38082;} do{ *_FUNC_IDEYESNOBOX_LONG_FOCUSOFFSET=*_FUNC_IDEYESNOBOX_LONG_FOCUS-*_FUNC_IDEYESNOBOX_LONG_F; if(!qbevent)break;evnt(34358);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEYESNOBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEYESNOBOX_LONG_I)-_FUNC_IDEYESNOBOX_ARRAY_UDT_O[4],_FUNC_IDEYESNOBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEYESNOBOX_LONG_FOCUS,_FUNC_IDEYESNOBOX_LONG_F,_FUNC_IDEYESNOBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEYESNOBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEYESNOBOX_LONG_MOUSEDOWN,_FUNC_IDEYESNOBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEYESNOBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34359);}while(r); } } fornext_exit_4353:; S_38087:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(34364);if(r)goto S_38087;} do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_IDEYESNOBOX,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34365);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34366);}while(r); } S_38091:; if ((*_FUNC_IDEYESNOBOX_LONG_INFO)||new_error){ if(qbevent){evnt(34369);if(r)goto S_38091;} S_38092:; if ((-(*_FUNC_IDEYESNOBOX_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(34370);if(r)goto S_38092;} do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_IDEYESNOBOX,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34370);}while(r); }else{ do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_IDEYESNOBOX,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34370);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(34371);}while(r); } do{ *_FUNC_IDEYESNOBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(34375);}while(r); do{ *_FUNC_IDEYESNOBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(34376);}while(r); }while(1); dl_exit_4347:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free136.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_IDEYESNOBOX_STRING_IDEYESNOBOX);return _FUNC_IDEYESNOBOX_STRING_IDEYESNOBOX; } int32 FUNC_IDEDISPLAYBOX(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data137.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(34385);}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(34386);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34387);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34388);}while(r); do{ if(!qbevent)break;evnt(34389);}while(r); do{ if (_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[2]&1){ error(10); }else{ _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]*640/8+1); memset((void*)(_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]*640/8+1); }else{ _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]*640/8+1,1); if (!_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(34390);}while(r); do{ if(!qbevent)break;evnt(34391);}while(r); do{ if(!qbevent)break;evnt(34392);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34393);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I= 0 ; if(!qbevent)break;evnt(34397);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(0))=(( 80 / 2 ))-( 60 / 2 ); if(!qbevent)break;evnt(34401);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(4))=(( 25 / 2 ))-( 16 / 2 ); if(!qbevent)break;evnt(34402);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(8))= 60 ; if(!qbevent)break;evnt(34403);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(12))= 16 ; if(!qbevent)break;evnt(34404);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(16))=FUNC_IDENEWTXT(qbs_new_txt_len("Display",7)); if(!qbevent)break;evnt(34405);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,FUNC_STR2(__LONG_IDEWX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34407);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34408);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(34409);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+20))= 16 ; if(!qbevent)break;evnt(34410);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+24))= 2 ; if(!qbevent)break;evnt(34411);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Width",6)); if(!qbevent)break;evnt(34412);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(34413);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(34414);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,FUNC_STR2(&(pass4356=*__LONG_IDEWY+*__LONG_IDESUBWINDOW))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34416);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34417);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(34418);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+20))= 15 ; if(!qbevent)break;evnt(34419);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+24))= 5 ; if(!qbevent)break;evnt(34420);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Height",7)); if(!qbevent)break;evnt(34421);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(34422);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(34423);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34425);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36))= 4 ; if(!qbevent)break;evnt(34426);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+24))= 8 ; if(!qbevent)break;evnt(34427);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Custom #Font:",13)); if(!qbevent)break;evnt(34428);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+64))=*__LONG_IDECUSTOMFONT; if(!qbevent)break;evnt(34429);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,__STRING_IDECUSTOMFONTFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34431);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34432);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(34433);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+20))= 10 ; if(!qbevent)break;evnt(34434);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+24))= 10 ; if(!qbevent)break;evnt(34435);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("File #Name",10)); if(!qbevent)break;evnt(34436);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(34437);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(34438);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,FUNC_STR2(__LONG_IDECUSTOMFONTHEIGHT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34440);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34441);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36))= 1 ; if(!qbevent)break;evnt(34442);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+20))= 10 ; if(!qbevent)break;evnt(34443);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+24))= 13 ; if(!qbevent)break;evnt(34444);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Row Height (Pixels)",20)); if(!qbevent)break;evnt(34445);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(34446);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+72))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(34447);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(34449);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36))= 3 ; if(!qbevent)break;evnt(34450);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+24))= 16 ; if(!qbevent)break;evnt(34451);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("OK",2),_FUNC_IDEDISPLAYBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(34452);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+48))= 1 ; if(!qbevent)break;evnt(34453);}while(r); S_38159:; fornext_value4361= 1 ; fornext_finalvalue4361= 100 ; fornext_step4361= 1 ; if (fornext_step4361<0) fornext_step_negative4361=1; else fornext_step_negative4361=0; if (new_error) goto fornext_error4361; goto fornext_entrylabel4361; while(1){ fornext_value4361=fornext_step4361+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel4361: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value4361; if (fornext_step_negative4361){ if (fornext_value4361fornext_finalvalue4361) break; } fornext_error4361:; if(qbevent){evnt(34457);if(r)goto S_38159;} do{ memcpy((((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80)),(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(0)),20); if(!qbevent)break;evnt(34457);}while(r); } fornext_exit_4360:; S_38162:; do{ if(qbevent){evnt(34460);if(r)goto S_38162;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEDISPLAYBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(34464);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34465);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(34465);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(34465);}while(r); S_38167:; fornext_value4364= 1 ; fornext_finalvalue4364= 100 ; fornext_step4364= 1 ; if (fornext_step4364<0) fornext_step_negative4364=1; else fornext_step_negative4364=0; if (new_error) goto fornext_error4364; goto fornext_entrylabel4364; while(1){ fornext_value4364=fornext_step4364+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel4364: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value4364; if (fornext_step_negative4364){ if (fornext_value4364fornext_finalvalue4364) break; } fornext_error4364:; if(qbevent){evnt(34466);if(r)goto S_38167;} S_38168:; if ((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36)))||new_error){ if(qbevent){evnt(34467);if(r)goto S_38168;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+60))=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS-*_FUNC_IDEDISPLAYBOX_LONG_F; if(!qbevent)break;evnt(34470);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+52))= 0 ; if(!qbevent)break;evnt(34471);}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+56))= 0 ; if(!qbevent)break;evnt(34471);}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEDISPLAYBOX_LONG_F); if(!qbevent)break;evnt(34472);}while(r); S_38173:; if ((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+52)))||new_error){ if(qbevent){evnt(34473);if(r)goto S_38173;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+52)); if(!qbevent)break;evnt(34473);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+56)); if(!qbevent)break;evnt(34473);}while(r); } } } fornext_exit_4363:; do{ *_FUNC_IDEDISPLAYBOX_LONG_LASTFOCUS=*_FUNC_IDEDISPLAYBOX_LONG_F- 1 ; if(!qbevent)break;evnt(34476);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(34480);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(34480);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Window Size -",13)); if (new_error) goto skip4365; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4365: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34480);}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(34481);}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(4))+ 9 ,*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(0))+ 29 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(34481);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" Monospace TTF Font ",20)); if (new_error) goto skip4366; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4366: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34481);}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(34485);}while(r); S_38187:; if ((*_FUNC_IDEDISPLAYBOX_LONG_CX)||new_error){ if(qbevent){evnt(34486);if(r)goto S_38187;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34486);}while(r); do{ qbg_sub_locate(*_FUNC_IDEDISPLAYBOX_LONG_CY,*_FUNC_IDEDISPLAYBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(34486);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34486);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(34489);}while(r); S_38193:; do{ if(qbevent){evnt(34490);if(r)goto S_38193;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(34491);}while(r); S_38195:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(34492);if(r)goto S_38195;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34492);}while(r); } S_38198:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(34493);if(r)goto S_38198;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34493);}while(r); } S_38201:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(34494);if(r)goto S_38201;} do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(34494);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34494);}while(r); } S_38205:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(34495);if(r)goto S_38205;} do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(34495);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34495);}while(r); } S_38209:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(34496);if(r)goto S_38209;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34496);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(34497);}while(r); S_38213:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_ALT!=*_FUNC_IDEDISPLAYBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(34497);if(r)goto S_38213;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(34497);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_OLDALT=*_FUNC_IDEDISPLAYBOX_LONG_ALT; if(!qbevent)break;evnt(34498);}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(34499);}while(r); S_38218:; }while((!(*_FUNC_IDEDISPLAYBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4367:; if(qbevent){evnt(34500);if(r)goto S_38218;} S_38219:; if ((*_FUNC_IDEDISPLAYBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34501);if(r)goto S_38219;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(34501);}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(34501);}while(r); } do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34503);}while(r); S_38225:; if ((*_FUNC_IDEDISPLAYBOX_LONG_ALT)||new_error){ if(qbevent){evnt(34504);if(r)goto S_38225;} S_38226:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(34505);if(r)goto S_38226;} do{ *_FUNC_IDEDISPLAYBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34506);}while(r); S_38228:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(34507);if(r)goto S_38228;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEDISPLAYBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34507);}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(34510);}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(34510);}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(34510);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(34514);}while(r); S_38237:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34515);if(r)goto S_38237;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34515);}while(r); } S_38240:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34516);if(r)goto S_38240;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(34516);}while(r); } S_38243:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(34517);if(r)goto S_38243;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(34517);}while(r); } S_38246:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(34518);if(r)goto S_38246;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS=*_FUNC_IDEDISPLAYBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(34518);}while(r); } S_38249:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS>*_FUNC_IDEDISPLAYBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(34519);if(r)goto S_38249;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(34519);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_F= 1 ; if(!qbevent)break;evnt(34520);}while(r); S_38253:; fornext_value4370= 1 ; fornext_finalvalue4370= 100 ; fornext_step4370= 1 ; if (fornext_step4370<0) fornext_step_negative4370=1; else fornext_step_negative4370=0; if (new_error) goto fornext_error4370; goto fornext_entrylabel4370; while(1){ fornext_value4370=fornext_step4370+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel4370: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value4370; if (fornext_step_negative4370){ if (fornext_value4370fornext_finalvalue4370) break; } fornext_error4370:; if(qbevent){evnt(34521);if(r)goto S_38253;} do{ *_FUNC_IDEDISPLAYBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+36)); if(!qbevent)break;evnt(34522);}while(r); S_38255:; if ((*_FUNC_IDEDISPLAYBOX_LONG_T)||new_error){ if(qbevent){evnt(34523);if(r)goto S_38255;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUSOFFSET=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS-*_FUNC_IDEDISPLAYBOX_LONG_F; if(!qbevent)break;evnt(34524);}while(r); do{ SUB_IDEUPDATEOBJ((void*)( ((char*)(_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEDISPLAYBOX_LONG_I)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80) ),_FUNC_IDEDISPLAYBOX_LONG_FOCUS,_FUNC_IDEDISPLAYBOX_LONG_F,_FUNC_IDEDISPLAYBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEDISPLAYBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEDISPLAYBOX_LONG_MOUSEDOWN,_FUNC_IDEDISPLAYBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEDISPLAYBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34525);}while(r); } } fornext_exit_4369:; do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34532);}while(r); S_38261:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 3 )))||new_error){ if(qbevent){evnt(34533);if(r)goto S_38261;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34533);}while(r); } S_38264:; fornext_value4373= 1 ; fornext_finalvalue4373=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step4373= 1 ; if (fornext_step4373<0) fornext_step_negative4373=1; else fornext_step_negative4373=0; if (new_error) goto fornext_error4373; goto fornext_entrylabel4373; while(1){ fornext_value4373=fornext_step4373+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel4373: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value4373; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4373){ if (fornext_value4373fornext_finalvalue4373) break; } fornext_error4373:; if(qbevent){evnt(34534);if(r)goto S_38264;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A,*_FUNC_IDEDISPLAYBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34535);}while(r); S_38266:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(34536);if(r)goto S_38266;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34536);}while(r); do{ goto fornext_exit_4372; if(!qbevent)break;evnt(34536);}while(r); } S_38270:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(34537);if(r)goto S_38270;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34537);}while(r); do{ goto fornext_exit_4372; if(!qbevent)break;evnt(34537);}while(r); } } fornext_exit_4372:; S_38275:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 1 ))||new_error){ if(qbevent){evnt(34539);if(r)goto S_38275;} S_38276:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(34540);if(r)goto S_38276;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34540);}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(34540);}while(r); } S_38281:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 80 ))||new_error){ if(qbevent){evnt(34541);if(r)goto S_38281;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("80",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34541);}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEDISPLAYBOX_STRING_A); if(!qbevent)break;evnt(34543);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34545);}while(r); S_38287:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 3 )))||new_error){ if(qbevent){evnt(34546);if(r)goto S_38287;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34546);}while(r); } S_38290:; fornext_value4378= 1 ; fornext_finalvalue4378=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step4378= 1 ; if (fornext_step4378<0) fornext_step_negative4378=1; else fornext_step_negative4378=0; if (new_error) goto fornext_error4378; goto fornext_entrylabel4378; while(1){ fornext_value4378=fornext_step4378+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel4378: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value4378; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4378){ if (fornext_value4378fornext_finalvalue4378) break; } fornext_error4378:; if(qbevent){evnt(34547);if(r)goto S_38290;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A,*_FUNC_IDEDISPLAYBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34548);}while(r); S_38292:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(34549);if(r)goto S_38292;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34549);}while(r); do{ goto fornext_exit_4377; if(!qbevent)break;evnt(34549);}while(r); } S_38296:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(34550);if(r)goto S_38296;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34550);}while(r); do{ goto fornext_exit_4377; if(!qbevent)break;evnt(34550);}while(r); } } fornext_exit_4377:; S_38301:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 2 ))||new_error){ if(qbevent){evnt(34552);if(r)goto S_38301;} S_38302:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(34553);if(r)goto S_38302;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34553);}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(34553);}while(r); } S_38307:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 25 ))||new_error){ if(qbevent){evnt(34554);if(r)goto S_38307;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("25",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34554);}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEDISPLAYBOX_STRING_A); if(!qbevent)break;evnt(34556);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34558);}while(r); S_38313:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 1024 )))||new_error){ if(qbevent){evnt(34559);if(r)goto S_38313;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 1024 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34559);}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEDISPLAYBOX_STRING_A); if(!qbevent)break;evnt(34560);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34562);}while(r); S_38318:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 2 )))||new_error){ if(qbevent){evnt(34563);if(r)goto S_38318;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34563);}while(r); } S_38321:; fornext_value4384= 1 ; fornext_finalvalue4384=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step4384= 1 ; if (fornext_step4384<0) fornext_step_negative4384=1; else fornext_step_negative4384=0; if (new_error) goto fornext_error4384; goto fornext_entrylabel4384; while(1){ fornext_value4384=fornext_step4384+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel4384: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value4384; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4384){ if (fornext_value4384fornext_finalvalue4384) break; } fornext_error4384:; if(qbevent){evnt(34564);if(r)goto S_38321;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A,*_FUNC_IDEDISPLAYBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34565);}while(r); S_38323:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(34566);if(r)goto S_38323;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34566);}while(r); do{ goto fornext_exit_4383; if(!qbevent)break;evnt(34566);}while(r); } S_38327:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(34567);if(r)goto S_38327;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34567);}while(r); do{ goto fornext_exit_4383; if(!qbevent)break;evnt(34567);}while(r); } } fornext_exit_4383:; S_38332:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 5 ))||new_error){ if(qbevent){evnt(34569);if(r)goto S_38332;} S_38333:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(34570);if(r)goto S_38333;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34570);}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(34570);}while(r); } S_38338:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 8 ))||new_error){ if(qbevent){evnt(34571);if(r)goto S_38338;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("8",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34571);}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEDISPLAYBOX_STRING_A); if(!qbevent)break;evnt(34573);}while(r); S_38343:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS== 7 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(34577);if(r)goto S_38343;} do{ goto exit_subfunc; if(!qbevent)break;evnt(34577);}while(r); } S_38346:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS== 6 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(34578);if(r)goto S_38346;} do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 0 ; if(!qbevent)break;evnt(34580);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34583);}while(r); S_38349:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34583);if(r)goto S_38349;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34583);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V=qbr_float_to_long(func_val(_FUNC_IDEDISPLAYBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34584);}while(r); S_38353:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 8 ))||new_error){ if(qbevent){evnt(34585);if(r)goto S_38353;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 8 ; if(!qbevent)break;evnt(34585);}while(r); } S_38356:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 99 ))||new_error){ if(qbevent){evnt(34586);if(r)goto S_38356;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 99 ; if(!qbevent)break;evnt(34586);}while(r); } S_38359:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!=*__LONG_IDECUSTOMFONTHEIGHT))||new_error){ if(qbevent){evnt(34587);if(r)goto S_38359;} do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 1 ; if(!qbevent)break;evnt(34587);}while(r); } S_38362:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+64))!=*__LONG_IDECUSTOMFONT))||new_error){ if(qbevent){evnt(34589);if(r)goto S_38362;} S_38363:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+64))== 0 ))||new_error){ if(qbevent){evnt(34590);if(r)goto S_38363;} do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(34591);}while(r); do{ sub__freefont(*__LONG_IDECUSTOMFONTHANDLE); if(!qbevent)break;evnt(34592);}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 1 ; if(!qbevent)break;evnt(34594);}while(r); } } do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34599);}while(r); S_38371:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEDISPLAYBOX_STRING_V,__STRING_IDECUSTOMFONTFILE)))||new_error){ if(qbevent){evnt(34599);if(r)goto S_38371;} do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 1 ; if(!qbevent)break;evnt(34599);}while(r); } S_38374:; if (((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+64))== 1 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_X== 1 )))||new_error){ if(qbevent){evnt(34601);if(r)goto S_38374;} do{ *_FUNC_IDEDISPLAYBOX_LONG_OLDHANDLE=*__LONG_IDECUSTOMFONTHANDLE; if(!qbevent)break;evnt(34602);}while(r); do{ *__LONG_IDECUSTOMFONTHANDLE=func__loadfont(_FUNC_IDEDISPLAYBOX_STRING_V,*_FUNC_IDEDISPLAYBOX_INTEGER_V,qbs_new_txt_len("MONOSPACE",9),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34603);}while(r); S_38377:; if ((-(*__LONG_IDECUSTOMFONTHANDLE== -1 ))||new_error){ if(qbevent){evnt(34604);if(r)goto S_38377;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+64))= 0 ; if(!qbevent)break;evnt(34606);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_new_txt_len("c:\\windows\\fonts\\lucon.ttf",26)); if(!qbevent)break;evnt(34606);}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_new_txt_len("21",2)); if(!qbevent)break;evnt(34606);}while(r); do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(34606);}while(r); }else{ do{ sub__font(*__LONG_IDECUSTOMFONTHANDLE,NULL,0); if(!qbevent)break;evnt(34608);}while(r); } S_38385:; if ((-(*__LONG_IDECUSTOMFONT== 1 ))||new_error){ if(qbevent){evnt(34610);if(r)goto S_38385;} do{ sub__freefont(*_FUNC_IDEDISPLAYBOX_LONG_OLDHANDLE); if(!qbevent)break;evnt(34610);}while(r); } } do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\options.bin",27), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34614);}while(r); do{ sub_seek( 150 , 7 ); if(!qbevent)break;evnt(34616);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34618);}while(r); S_38392:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34618);if(r)goto S_38392;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34618);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V=qbr_float_to_long(func_val(_FUNC_IDEDISPLAYBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34619);}while(r); S_38396:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 80 ))||new_error){ if(qbevent){evnt(34620);if(r)goto S_38396;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 80 ; if(!qbevent)break;evnt(34620);}while(r); } S_38399:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 999 ))||new_error){ if(qbevent){evnt(34621);if(r)goto S_38399;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 999 ; if(!qbevent)break;evnt(34621);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEDISPLAYBOX_INTEGER_V,2,byte_element_4387),0); if(!qbevent)break;evnt(34622);}while(r); S_38403:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!=*__LONG_IDEWX))||new_error){ if(qbevent){evnt(34623);if(r)goto S_38403;} do{ *_FUNC_IDEDISPLAYBOX_LONG_IDEDISPLAYBOX= 1 ; if(!qbevent)break;evnt(34623);}while(r); } do{ *__LONG_IDEWX=*_FUNC_IDEDISPLAYBOX_INTEGER_V; if(!qbevent)break;evnt(34624);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34626);}while(r); S_38408:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34626);if(r)goto S_38408;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34626);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V=qbr_float_to_long(func_val(_FUNC_IDEDISPLAYBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34627);}while(r); S_38412:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 25 ))||new_error){ if(qbevent){evnt(34628);if(r)goto S_38412;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 25 ; if(!qbevent)break;evnt(34628);}while(r); } S_38415:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 999 ))||new_error){ if(qbevent){evnt(34629);if(r)goto S_38415;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 999 ; if(!qbevent)break;evnt(34629);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEDISPLAYBOX_INTEGER_V,2,byte_element_4388),0); if(!qbevent)break;evnt(34630);}while(r); S_38419:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!=*__LONG_IDEWY))||new_error){ if(qbevent){evnt(34631);if(r)goto S_38419;} do{ *_FUNC_IDEDISPLAYBOX_LONG_IDEDISPLAYBOX= 1 ; if(!qbevent)break;evnt(34631);}while(r); } do{ *__LONG_IDEWY=*_FUNC_IDEDISPLAYBOX_INTEGER_V-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(34632);}while(r); do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+64)); if(!qbevent)break;evnt(34633);}while(r); S_38424:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(34634);if(r)goto S_38424;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(34634);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEDISPLAYBOX_INTEGER_V,2,byte_element_4389),0); if(!qbevent)break;evnt(34635);}while(r); do{ *__LONG_IDECUSTOMFONT=*_FUNC_IDEDISPLAYBOX_INTEGER_V; if(!qbevent)break;evnt(34636);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34638);}while(r); S_38430:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_V->len> 1024 )))||new_error){ if(qbevent){evnt(34639);if(r)goto S_38430;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_V, 1024 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34639);}while(r); } do{ qbs_set(__STRING_IDECUSTOMFONTFILE,_FUNC_IDEDISPLAYBOX_STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34640);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_add(_FUNC_IDEDISPLAYBOX_STRING_V,func_space( 1024 -_FUNC_IDEDISPLAYBOX_STRING_V->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34641);}while(r); do{ sub_put2( 150 ,NULL,byte_element((uint64)_FUNC_IDEDISPLAYBOX_STRING_V->chr,_FUNC_IDEDISPLAYBOX_STRING_V->len,byte_element_4392),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34642);}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*80+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34644);}while(r); S_38437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(34644);if(r)goto S_38437;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34644);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V=qbr_float_to_long(func_val(_FUNC_IDEDISPLAYBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34645);}while(r); S_38441:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 8 ))||new_error){ if(qbevent){evnt(34646);if(r)goto S_38441;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 8 ; if(!qbevent)break;evnt(34646);}while(r); } S_38444:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 99 ))||new_error){ if(qbevent){evnt(34647);if(r)goto S_38444;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 99 ; if(!qbevent)break;evnt(34647);}while(r); } do{ sub_put( 150 ,NULL,byte_element((uint64)_FUNC_IDEDISPLAYBOX_INTEGER_V,2,byte_element_4393),0); if(!qbevent)break;evnt(34648);}while(r); do{ *__LONG_IDECUSTOMFONTHEIGHT=*_FUNC_IDEDISPLAYBOX_INTEGER_V; if(!qbevent)break;evnt(34649);}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(34651);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34652);}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(34657);}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(34658);}while(r); }while(1); dl_exit_4362:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free137.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_IDEDISPLAYBOX_LONG_IDEDISPLAYBOX; } int32 FUNC_HASHVALUE(qbs*_FUNC_HASHVALUE_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data138.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_HASHVALUE_LONG_L=_FUNC_HASHVALUE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34665);}while(r); S_38456:; if ((-(*_FUNC_HASHVALUE_LONG_L== 0 ))||new_error){ if(qbevent){evnt(34666);if(r)goto S_38456;} do{ goto exit_subfunc; if(!qbevent)break;evnt(34666);}while(r); } do{ *_FUNC_HASHVALUE_LONG_A=qbs_asc(_FUNC_HASHVALUE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34667);}while(r); S_38460:; if ((-(*_FUNC_HASHVALUE_LONG_A!= 95 ))||new_error){ if(qbevent){evnt(34668);if(r)goto S_38460;} S_38461:; if(qbevent){evnt(34669);if(r)goto S_38461;} S_38462:; if (((*_FUNC_HASHVALUE_LONG_L==( 1 )))||new_error){ if(qbevent){evnt(34670);if(r)goto S_38462;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[array_check((*_FUNC_HASHVALUE_LONG_A)-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5])]+ 1048576 ; if(!qbevent)break;evnt(34671);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34672);}while(r); goto sc_4396_end; } S_38465:; if (((*_FUNC_HASHVALUE_LONG_L==( 2 )))||new_error){ if(qbevent){evnt(34673);if(r)goto S_38465;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check((string2i(_FUNC_HASHVALUE_STRING_A))-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]+ 2097152 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34674);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34675);}while(r); goto sc_4396_end; } S_38468:; if (((*_FUNC_HASHVALUE_LONG_L==( 3 )))||new_error){ if(qbevent){evnt(34676);if(r)goto S_38468;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check((string2i(_FUNC_HASHVALUE_STRING_A))-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]+(((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[array_check((qbs_asc(_FUNC_HASHVALUE_STRING_A, 3 ))-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5])]* 1024 )+( 3145728 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34677);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34678);}while(r); goto sc_4396_end; } do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check((string2i(_FUNC_HASHVALUE_STRING_A))-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]+(((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check(((qbs_asc(_FUNC_HASHVALUE_STRING_A,*_FUNC_HASHVALUE_LONG_L))+(qbs_asc(_FUNC_HASHVALUE_STRING_A,*_FUNC_HASHVALUE_LONG_L- 1 )* 256 ))-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]* 1024 )+((*_FUNC_HASHVALUE_LONG_L& 7 )* 1048576 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34680);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34681);}while(r); sc_4396_end:; }else{ S_38476:; if(qbevent){evnt(34684);if(r)goto S_38476;} S_38477:; if (((*_FUNC_HASHVALUE_LONG_L==( 1 )))||new_error){ if(qbevent){evnt(34685);if(r)goto S_38477;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=( 1048576 + 8388608 ); if(!qbevent)break;evnt(34686);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34686);}while(r); goto sc_4397_end; } S_38480:; if (((*_FUNC_HASHVALUE_LONG_L==( 2 )))||new_error){ if(qbevent){evnt(34687);if(r)goto S_38480;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[array_check((qbs_asc(_FUNC_HASHVALUE_STRING_A, 2 ))-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5])]+( 2097152 + 8388608 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34688);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34689);}while(r); goto sc_4397_end; } S_38483:; if (((*_FUNC_HASHVALUE_LONG_L==( 3 )))||new_error){ if(qbevent){evnt(34690);if(r)goto S_38483;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check(((qbs_asc(_FUNC_HASHVALUE_STRING_A, 2 ))+(qbs_asc(_FUNC_HASHVALUE_STRING_A, 3 )* 256 ))-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]+( 3145728 + 8388608 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34691);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34692);}while(r); goto sc_4397_end; } S_38486:; if (((*_FUNC_HASHVALUE_LONG_L==( 4 )))||new_error){ if(qbevent){evnt(34693);if(r)goto S_38486;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check(((string2l(_FUNC_HASHVALUE_STRING_A)& 16776960 )/ 256 )-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]+(((int16*)(__ARRAY_INTEGER_HASH1CHAR[0]))[array_check((qbs_asc(_FUNC_HASHVALUE_STRING_A, 4 ))-__ARRAY_INTEGER_HASH1CHAR[4],__ARRAY_INTEGER_HASH1CHAR[5])]* 1024 )+(( 4194304 + 8388608 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34694);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34695);}while(r); goto sc_4397_end; } do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check(((string2l(_FUNC_HASHVALUE_STRING_A)& 16776960 )/ 256 )-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]+(((int16*)(__ARRAY_INTEGER_HASH2CHAR[0]))[array_check(((qbs_asc(_FUNC_HASHVALUE_STRING_A,*_FUNC_HASHVALUE_LONG_L))+(qbs_asc(_FUNC_HASHVALUE_STRING_A,*_FUNC_HASHVALUE_LONG_L- 1 )* 256 ))-__ARRAY_INTEGER_HASH2CHAR[4],__ARRAY_INTEGER_HASH2CHAR[5])]* 1024 )+((*_FUNC_HASHVALUE_LONG_L& 7 )* 1048576 )+( 8388608 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34697);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34698);}while(r); sc_4397_end:; } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free138.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_HASHVALUE_LONG_HASHVALUE; } void SUB_HASHADD(qbs*_SUB_HASHADD_STRING_A,int32*_SUB_HASHADD_LONG_FLAGS,int32*_SUB_HASHADD_LONG_REFERENCE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data139.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_38494:; if ((-(*__LONG_HASHLISTFREELAST> 0 ))||new_error){ if(qbevent){evnt(34706);if(r)goto S_38494;} do{ *_SUB_HASHADD_LONG_I=((int32*)(__ARRAY_LONG_HASHLISTFREE[0]))[array_check((*__LONG_HASHLISTFREELAST)-__ARRAY_LONG_HASHLISTFREE[4],__ARRAY_LONG_HASHLISTFREE[5])]; if(!qbevent)break;evnt(34708);}while(r); do{ *__LONG_HASHLISTFREELAST=*__LONG_HASHLISTFREELAST- 1 ; if(!qbevent)break;evnt(34709);}while(r); }else{ S_38498:; if ((-(*__LONG_HASHLISTNEXT>*__LONG_HASHLISTSIZE))||new_error){ if(qbevent){evnt(34711);if(r)goto S_38498;} do{ *__LONG_HASHLISTSIZE=*__LONG_HASHLISTSIZE* 2 ; if(!qbevent)break;evnt(34713);}while(r); do{ if (__ARRAY_UDT_HASHLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_HASHLIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_HASHLIST[2]&1){ preserved_elements=__ARRAY_UDT_HASHLIST[5]; } else preserved_elements=0; __ARRAY_UDT_HASHLIST[4]= 1 ; __ARRAY_UDT_HASHLIST[5]=(*__LONG_HASHLISTSIZE)-__ARRAY_UDT_HASHLIST[4]+1; __ARRAY_UDT_HASHLIST[6]=1; if (__ARRAY_UDT_HASHLIST[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_HASHLIST[0]),preserved_elements*160/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_HASHLIST[0])); tmp_long=__ARRAY_UDT_HASHLIST[5]; __ARRAY_UDT_HASHLIST[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*160/8+1); memcpy((void*)(__ARRAY_UDT_HASHLIST[0]),redim_preserve_cmem_buffer,preserved_elements*160/8+1); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING256_HASHLISTNAME[2]&1){ preserved_elements=__ARRAY_STRING256_HASHLISTNAME[5]; } else preserved_elements=0; __ARRAY_STRING256_HASHLISTNAME[4]= 1 ; __ARRAY_STRING256_HASHLISTNAME[5]=(*__LONG_HASHLISTSIZE)-__ARRAY_STRING256_HASHLISTNAME[4]+1; __ARRAY_STRING256_HASHLISTNAME[6]=1; if (__ARRAY_STRING256_HASHLISTNAME[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_STRING256_HASHLISTNAME[0]),preserved_elements*256); cmem_dynamic_free((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0])); tmp_long=__ARRAY_STRING256_HASHLISTNAME[5]; __ARRAY_STRING256_HASHLISTNAME[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*256); memcpy((void*)(__ARRAY_STRING256_HASHLISTNAME[0]),redim_preserve_cmem_buffer,preserved_elements*256); if (preserved_elements=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } int32 FUNC_HASHFIND(qbs*_FUNC_HASHFIND_STRING_A,int32*_FUNC_HASHFIND_LONG_SEARCHFLAGS,int32*_FUNC_HASHFIND_LONG_RESULTFLAGS,int32*_FUNC_HASHFIND_LONG_RESULTREFERENCE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data140.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_HASHFIND_LONG_I=((int32*)(__ARRAY_LONG_HASHTABLE[0]))[array_check((FUNC_HASHVALUE(_FUNC_HASHFIND_STRING_A))-__ARRAY_LONG_HASHTABLE[4],__ARRAY_LONG_HASHTABLE[5])]; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34748);}while(r); S_38523:; if ((*_FUNC_HASHFIND_LONG_I)||new_error){ if(qbevent){evnt(34749);if(r)goto S_38523;} do{ qbs_set(_FUNC_HASHFIND_STRING_UA,qbs_add(qbs_ucase(_FUNC_HASHFIND_STRING_A),func_space( 256 -_FUNC_HASHFIND_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34750);}while(r); LABEL_HASHFIND_NEXT:; if(qbevent){evnt(34751);r=0;} do{ *_FUNC_HASHFIND_LONG_F=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFIND_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20)); if(!qbevent)break;evnt(34752);}while(r); S_38526:; if ((*_FUNC_HASHFIND_LONG_SEARCHFLAGS&*_FUNC_HASHFIND_LONG_F)||new_error){ if(qbevent){evnt(34753);if(r)goto S_38526;} S_38527:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0]))[(array_check((*_FUNC_HASHFIND_LONG_I)-__ARRAY_STRING256_HASHLISTNAME[4],__ARRAY_STRING256_HASHLISTNAME[5]))*256],256,1),_FUNC_HASHFIND_STRING_UA)))||new_error){ if(qbevent){evnt(34754);if(r)goto S_38527;} do{ *_FUNC_HASHFIND_LONG_RESULTFLAGS=*_FUNC_HASHFIND_LONG_F; if(!qbevent)break;evnt(34755);}while(r); do{ *_FUNC_HASHFIND_LONG_RESULTREFERENCE=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFIND_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+4)); if(!qbevent)break;evnt(34756);}while(r); do{ *_FUNC_HASHFIND_LONG_I2=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFIND_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+8)); if(!qbevent)break;evnt(34757);}while(r); S_38531:; if ((*_FUNC_HASHFIND_LONG_I2)||new_error){ if(qbevent){evnt(34758);if(r)goto S_38531;} do{ *_FUNC_HASHFIND_LONG_HASHFIND= 2 ; if(!qbevent)break;evnt(34759);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFIND_LONG_I2; if(!qbevent)break;evnt(34760);}while(r); do{ *__LONG_HASHFIND_REVERSE= 0 ; if(!qbevent)break;evnt(34761);}while(r); do{ *__LONG_HASHFIND_SEARCHFLAGS=*_FUNC_HASHFIND_LONG_SEARCHFLAGS; if(!qbevent)break;evnt(34762);}while(r); do{ qbs_set(__STRING_HASHFIND_NAME,_FUNC_HASHFIND_STRING_UA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34763);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFIND_LONG_I; if(!qbevent)break;evnt(34764);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34765);}while(r); }else{ do{ *_FUNC_HASHFIND_LONG_HASHFIND= 1 ; if(!qbevent)break;evnt(34767);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFIND_LONG_I; if(!qbevent)break;evnt(34768);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34769);}while(r); } } } do{ *_FUNC_HASHFIND_LONG_I=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFIND_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+8)); if(!qbevent)break;evnt(34773);}while(r); S_38547:; if ((*_FUNC_HASHFIND_LONG_I)||new_error){ if(qbevent){evnt(34774);if(r)goto S_38547;} do{ goto LABEL_HASHFIND_NEXT; if(!qbevent)break;evnt(34774);}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free140.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_HASHFIND_LONG_HASHFIND; } int32 FUNC_HASHFINDREV(qbs*_FUNC_HASHFINDREV_STRING_A,int32*_FUNC_HASHFINDREV_LONG_SEARCHFLAGS,int32*_FUNC_HASHFINDREV_LONG_RESULTFLAGS,int32*_FUNC_HASHFINDREV_LONG_RESULTREFERENCE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data141.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_HASHFINDREV_LONG_I=((int32*)(__ARRAY_LONG_HASHTABLE[0]))[array_check((FUNC_HASHVALUE(_FUNC_HASHFINDREV_STRING_A))-__ARRAY_LONG_HASHTABLE[4],__ARRAY_LONG_HASHTABLE[5])]; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34783);}while(r); S_38552:; if ((*_FUNC_HASHFINDREV_LONG_I)||new_error){ if(qbevent){evnt(34784);if(r)goto S_38552;} do{ *_FUNC_HASHFINDREV_LONG_I=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDREV_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+16)); if(!qbevent)break;evnt(34785);}while(r); do{ qbs_set(_FUNC_HASHFINDREV_STRING_UA,qbs_add(qbs_ucase(_FUNC_HASHFINDREV_STRING_A),func_space( 256 -_FUNC_HASHFINDREV_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34786);}while(r); LABEL_HASHFINDREV_NEXT:; if(qbevent){evnt(34787);r=0;} do{ *_FUNC_HASHFINDREV_LONG_F=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDREV_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20)); if(!qbevent)break;evnt(34788);}while(r); S_38556:; if ((*_FUNC_HASHFINDREV_LONG_SEARCHFLAGS&*_FUNC_HASHFINDREV_LONG_F)||new_error){ if(qbevent){evnt(34789);if(r)goto S_38556;} S_38557:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0]))[(array_check((*_FUNC_HASHFINDREV_LONG_I)-__ARRAY_STRING256_HASHLISTNAME[4],__ARRAY_STRING256_HASHLISTNAME[5]))*256],256,1),_FUNC_HASHFINDREV_STRING_UA)))||new_error){ if(qbevent){evnt(34790);if(r)goto S_38557;} do{ *_FUNC_HASHFINDREV_LONG_RESULTFLAGS=*_FUNC_HASHFINDREV_LONG_F; if(!qbevent)break;evnt(34791);}while(r); do{ *_FUNC_HASHFINDREV_LONG_RESULTREFERENCE=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDREV_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+4)); if(!qbevent)break;evnt(34792);}while(r); do{ *_FUNC_HASHFINDREV_LONG_I2=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDREV_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+12)); if(!qbevent)break;evnt(34793);}while(r); S_38561:; if ((*_FUNC_HASHFINDREV_LONG_I2)||new_error){ if(qbevent){evnt(34794);if(r)goto S_38561;} do{ *_FUNC_HASHFINDREV_LONG_HASHFINDREV= 2 ; if(!qbevent)break;evnt(34795);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDREV_LONG_I2; if(!qbevent)break;evnt(34796);}while(r); do{ *__LONG_HASHFIND_REVERSE= 1 ; if(!qbevent)break;evnt(34797);}while(r); do{ *__LONG_HASHFIND_SEARCHFLAGS=*_FUNC_HASHFINDREV_LONG_SEARCHFLAGS; if(!qbevent)break;evnt(34798);}while(r); do{ qbs_set(__STRING_HASHFIND_NAME,_FUNC_HASHFINDREV_STRING_UA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34799);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDREV_LONG_I; if(!qbevent)break;evnt(34800);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34801);}while(r); }else{ do{ *_FUNC_HASHFINDREV_LONG_HASHFINDREV= 1 ; if(!qbevent)break;evnt(34803);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDREV_LONG_I; if(!qbevent)break;evnt(34804);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34805);}while(r); } } } do{ *_FUNC_HASHFINDREV_LONG_I=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDREV_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+12)); if(!qbevent)break;evnt(34809);}while(r); S_38577:; if ((*_FUNC_HASHFINDREV_LONG_I)||new_error){ if(qbevent){evnt(34810);if(r)goto S_38577;} do{ goto LABEL_HASHFINDREV_NEXT; if(!qbevent)break;evnt(34810);}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free141.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_HASHFINDREV_LONG_HASHFINDREV; } int32 FUNC_HASHFINDCONT(int32*_FUNC_HASHFINDCONT_LONG_RESULTFLAGS,int32*_FUNC_HASHFINDCONT_LONG_RESULTREFERENCE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data142.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_38581:; if ((*__LONG_HASHFIND_REVERSE)||new_error){ if(qbevent){evnt(34819);if(r)goto S_38581;} do{ *_FUNC_HASHFINDCONT_LONG_I=*__LONG_HASHFIND_NEXTLISTITEM; if(!qbevent)break;evnt(34821);}while(r); LABEL_HASHFINDREVC_NEXT:; if(qbevent){evnt(34822);r=0;} do{ *_FUNC_HASHFINDCONT_LONG_F=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20)); if(!qbevent)break;evnt(34823);}while(r); S_38584:; if ((*__LONG_HASHFIND_SEARCHFLAGS&*_FUNC_HASHFINDCONT_LONG_F)||new_error){ if(qbevent){evnt(34824);if(r)goto S_38584;} S_38585:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0]))[(array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_STRING256_HASHLISTNAME[4],__ARRAY_STRING256_HASHLISTNAME[5]))*256],256,1),__STRING_HASHFIND_NAME)))||new_error){ if(qbevent){evnt(34825);if(r)goto S_38585;} do{ *_FUNC_HASHFINDCONT_LONG_RESULTFLAGS=*_FUNC_HASHFINDCONT_LONG_F; if(!qbevent)break;evnt(34826);}while(r); do{ *_FUNC_HASHFINDCONT_LONG_RESULTREFERENCE=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+4)); if(!qbevent)break;evnt(34827);}while(r); do{ *_FUNC_HASHFINDCONT_LONG_I2=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+12)); if(!qbevent)break;evnt(34828);}while(r); S_38589:; if ((*_FUNC_HASHFINDCONT_LONG_I2)||new_error){ if(qbevent){evnt(34829);if(r)goto S_38589;} do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 2 ; if(!qbevent)break;evnt(34830);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDCONT_LONG_I2; if(!qbevent)break;evnt(34831);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(34832);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34833);}while(r); }else{ do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 1 ; if(!qbevent)break;evnt(34835);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(34836);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34837);}while(r); } } } do{ *_FUNC_HASHFINDCONT_LONG_I=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+12)); if(!qbevent)break;evnt(34841);}while(r); S_38602:; if ((*_FUNC_HASHFINDCONT_LONG_I)||new_error){ if(qbevent){evnt(34842);if(r)goto S_38602;} do{ goto LABEL_HASHFINDREVC_NEXT; if(!qbevent)break;evnt(34842);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(34843);}while(r); }else{ do{ *_FUNC_HASHFINDCONT_LONG_I=*__LONG_HASHFIND_NEXTLISTITEM; if(!qbevent)break;evnt(34847);}while(r); LABEL_HASHFINDC_NEXT:; if(qbevent){evnt(34848);r=0;} do{ *_FUNC_HASHFINDCONT_LONG_F=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20)); if(!qbevent)break;evnt(34849);}while(r); S_38609:; if ((*__LONG_HASHFIND_SEARCHFLAGS&*_FUNC_HASHFINDCONT_LONG_F)||new_error){ if(qbevent){evnt(34850);if(r)goto S_38609;} S_38610:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0]))[(array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_STRING256_HASHLISTNAME[4],__ARRAY_STRING256_HASHLISTNAME[5]))*256],256,1),__STRING_HASHFIND_NAME)))||new_error){ if(qbevent){evnt(34851);if(r)goto S_38610;} do{ *_FUNC_HASHFINDCONT_LONG_RESULTFLAGS=*_FUNC_HASHFINDCONT_LONG_F; if(!qbevent)break;evnt(34852);}while(r); do{ *_FUNC_HASHFINDCONT_LONG_RESULTREFERENCE=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+4)); if(!qbevent)break;evnt(34853);}while(r); do{ *_FUNC_HASHFINDCONT_LONG_I2=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+8)); if(!qbevent)break;evnt(34854);}while(r); S_38614:; if ((*_FUNC_HASHFINDCONT_LONG_I2)||new_error){ if(qbevent){evnt(34855);if(r)goto S_38614;} do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 2 ; if(!qbevent)break;evnt(34856);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDCONT_LONG_I2; if(!qbevent)break;evnt(34857);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(34858);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34859);}while(r); }else{ do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 1 ; if(!qbevent)break;evnt(34861);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(34862);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34863);}while(r); } } } do{ *_FUNC_HASHFINDCONT_LONG_I=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_FUNC_HASHFINDCONT_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+8)); if(!qbevent)break;evnt(34867);}while(r); S_38627:; if ((*_FUNC_HASHFINDCONT_LONG_I)||new_error){ if(qbevent){evnt(34868);if(r)goto S_38627;} do{ goto LABEL_HASHFINDC_NEXT; if(!qbevent)break;evnt(34868);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(34869);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free142.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT; } void SUB_HASHREMOVE(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data143.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_SUB_HASHREMOVE_LONG_I=*__LONG_HASHREMOVE_LASTFOUND; if(!qbevent)break;evnt(34876);}while(r); do{ *__LONG_HASHLISTFREELAST=*__LONG_HASHLISTFREELAST+ 1 ; if(!qbevent)break;evnt(34879);}while(r); S_38634:; if ((-(*__LONG_HASHLISTFREELAST>*__LONG_HASHLISTFREESIZE))||new_error){ if(qbevent){evnt(34880);if(r)goto S_38634;} do{ *__LONG_HASHLISTFREESIZE=*__LONG_HASHLISTFREESIZE* 2 ; if(!qbevent)break;evnt(34881);}while(r); do{ if (__ARRAY_LONG_HASHLISTFREE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_HASHLISTFREE)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_HASHLISTFREE[2]&1){ preserved_elements=__ARRAY_LONG_HASHLISTFREE[5]; } else preserved_elements=0; __ARRAY_LONG_HASHLISTFREE[4]= 1 ; __ARRAY_LONG_HASHLISTFREE[5]=(*__LONG_HASHLISTFREESIZE)-__ARRAY_LONG_HASHLISTFREE[4]+1; __ARRAY_LONG_HASHLISTFREE[6]=1; if (__ARRAY_LONG_HASHLISTFREE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_HASHLISTFREE[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_HASHLISTFREE[0])); tmp_long=__ARRAY_LONG_HASHLISTFREE[5]; __ARRAY_LONG_HASHLISTFREE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_HASHLISTFREE[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elements=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_HASHDUMP(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data144.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_SUB_HASHDUMP_LONG_FH=func_freefile(); if(!qbevent)break;evnt(34919);}while(r); do{ sub_open(qbs_new_txt_len("hashdump.txt",12), 4 ,NULL,NULL,*_SUB_HASHDUMP_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34920);}while(r); do{ qbs_set(_SUB_HASHDUMP_STRING_B,qbs_new_txt_len("12345678901234567890123456789012}",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34921);}while(r); S_38664:; fornext_value4404= 0 ; fornext_finalvalue4404= 16777215 ; fornext_step4404= 1 ; if (fornext_step4404<0) fornext_step_negative4404=1; else fornext_step_negative4404=0; if (new_error) goto fornext_error4404; goto fornext_entrylabel4404; while(1){ fornext_value4404=fornext_step4404+(*_SUB_HASHDUMP_LONG_X); fornext_entrylabel4404: *_SUB_HASHDUMP_LONG_X=fornext_value4404; if (fornext_step_negative4404){ if (fornext_value4404fornext_finalvalue4404) break; } fornext_error4404:; if(qbevent){evnt(34922);if(r)goto S_38664;} S_38665:; if ((((int32*)(__ARRAY_LONG_HASHTABLE[0]))[array_check((*_SUB_HASHDUMP_LONG_X)-__ARRAY_LONG_HASHTABLE[4],__ARRAY_LONG_HASHTABLE[5])])||new_error){ if(qbevent){evnt(34923);if(r)goto S_38665;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip4405; sub_file_print(tmp_fileno,qbs_new_txt_len("START HashTable(",16), 0 , 0 , 0 ); if (new_error) goto skip4405; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_HASHDUMP_LONG_X)), 1 , 0 , 0 ); if (new_error) goto skip4405; sub_file_print(tmp_fileno,qbs_new_txt_len("):",2), 0 , 0 , 1 ); if (new_error) goto skip4405; skip4405: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(34925);}while(r); do{ *_SUB_HASHDUMP_LONG_I=((int32*)(__ARRAY_LONG_HASHTABLE[0]))[array_check((*_SUB_HASHDUMP_LONG_X)-__ARRAY_LONG_HASHTABLE[4],__ARRAY_LONG_HASHTABLE[5])]; if(!qbevent)break;evnt(34926);}while(r); do{ *_SUB_HASHDUMP_LONG_LASTI=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+16)); if(!qbevent)break;evnt(34929);}while(r); S_38669:; if ((qbs_cleanup(qbs_tmp_base,(-(*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+16))== 0 ))|(-(*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+12))!= 0 ))|(-(FUNC_HASHVALUE(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0]))[(array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_STRING256_HASHLISTNAME[4],__ARRAY_STRING256_HASHLISTNAME[5]))*256],256,1))!=*_SUB_HASHDUMP_LONG_X))))||new_error){ if(qbevent){evnt(34930);if(r)goto S_38669;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(34930);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip4406; sub_file_print(tmp_fileno,qbs_new_txt_len(" HashList(",11), 0 , 0 , 0 ); if (new_error) goto skip4406; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_HASHDUMP_LONG_I)), 1 , 0 , 0 ); if (new_error) goto skip4406; sub_file_print(tmp_fileno,qbs_new_txt_len(").LastItem=",11), 0 , 0 , 0 ); if (new_error) goto skip4406; sub_file_print(tmp_fileno,qbs_str((int32)(*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+16)))), 1 , 0 , 1 ); if (new_error) goto skip4406; skip4406: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(34932);}while(r); LABEL_HASHDUMPNEXTITEM:; if(qbevent){evnt(34933);r=0;} do{ qbs_set(_SUB_HASHDUMP_STRING_X,qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" [",3),qbs_str((int32)(*_SUB_HASHDUMP_LONG_I))),qbs_new_txt_len("]",1)),qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0]))[(array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_STRING256_HASHLISTNAME[4],__ARRAY_STRING256_HASHLISTNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34934);}while(r); do{ *_SUB_HASHDUMP_LONG_F=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20)); if(!qbevent)break;evnt(34936);}while(r); do{ qbs_set(_SUB_HASHDUMP_STRING_X,qbs_add(qbs_add(qbs_add(_SUB_HASHDUMP_STRING_X,qbs_new_txt_len(",.Flags=",8)),qbs_str((int32)(*_SUB_HASHDUMP_LONG_F))),qbs_new_txt_len("{",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34937);}while(r); S_38676:; fornext_value4408= 1 ; fornext_finalvalue4408= 32 ; fornext_step4408= 1 ; if (fornext_step4408<0) fornext_step_negative4408=1; else fornext_step_negative4408=0; if (new_error) goto fornext_error4408; goto fornext_entrylabel4408; while(1){ fornext_value4408=fornext_step4408+(*_SUB_HASHDUMP_LONG_Z); fornext_entrylabel4408: *_SUB_HASHDUMP_LONG_Z=fornext_value4408; if (fornext_step_negative4408){ if (fornext_value4408fornext_finalvalue4408) break; } fornext_error4408:; if(qbevent){evnt(34938);if(r)goto S_38676;} do{ tqbs=_SUB_HASHDUMP_STRING_B; if (!new_error){ tmp_fileno=*_SUB_HASHDUMP_LONG_Z; if (!new_error){ tmp_long=(*_SUB_HASHDUMP_LONG_F& 1 )+ 48 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(34939);}while(r); do{ *_SUB_HASHDUMP_LONG_F=*_SUB_HASHDUMP_LONG_F/ 2 ; if(!qbevent)break;evnt(34940);}while(r); } fornext_exit_4407:; do{ qbs_set(_SUB_HASHDUMP_STRING_X,qbs_add(_SUB_HASHDUMP_STRING_X,_SUB_HASHDUMP_STRING_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34942);}while(r); do{ qbs_set(_SUB_HASHDUMP_STRING_X,qbs_add(qbs_add(_SUB_HASHDUMP_STRING_X,qbs_new_txt_len(",.Reference=",12)),qbs_str((int32)(*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+4)))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34944);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip4409; sub_file_print(tmp_fileno,_SUB_HASHDUMP_STRING_X, 0 , 0 , 1 ); if (new_error) goto skip4409; skip4409: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(34946);}while(r); do{ *_SUB_HASHDUMP_LONG_I1=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+12)); if(!qbevent)break;evnt(34949);}while(r); do{ *_SUB_HASHDUMP_LONG_I2=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+8)); if(!qbevent)break;evnt(34950);}while(r); S_38685:; if ((*_SUB_HASHDUMP_LONG_I1)||new_error){ if(qbevent){evnt(34951);if(r)goto S_38685;} S_38686:; if ((-(*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I1)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+8))!=*_SUB_HASHDUMP_LONG_I))||new_error){ if(qbevent){evnt(34952);if(r)goto S_38686;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(34952);}while(r); } } S_38690:; if ((*_SUB_HASHDUMP_LONG_I2)||new_error){ if(qbevent){evnt(34954);if(r)goto S_38690;} S_38691:; if ((-(*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I2)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+12))!=*_SUB_HASHDUMP_LONG_I))||new_error){ if(qbevent){evnt(34955);if(r)goto S_38691;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(34955);}while(r); } } S_38695:; if ((-(*_SUB_HASHDUMP_LONG_I2== 0 ))||new_error){ if(qbevent){evnt(34957);if(r)goto S_38695;} S_38696:; if ((-(*_SUB_HASHDUMP_LONG_LASTI!=*_SUB_HASHDUMP_LONG_I))||new_error){ if(qbevent){evnt(34958);if(r)goto S_38696;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(34958);}while(r); } } do{ *_SUB_HASHDUMP_LONG_I=*(int32*)(((char*)__ARRAY_UDT_HASHLIST[0])+((array_check((*_SUB_HASHDUMP_LONG_I)-__ARRAY_UDT_HASHLIST[4],__ARRAY_UDT_HASHLIST[5]))*20+8)); if(!qbevent)break;evnt(34961);}while(r); S_38701:; if ((*_SUB_HASHDUMP_LONG_I)||new_error){ if(qbevent){evnt(34962);if(r)goto S_38701;} do{ goto LABEL_HASHDUMPNEXTITEM; if(!qbevent)break;evnt(34962);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip4410; sub_file_print(tmp_fileno,qbs_new_txt_len("END HashTable(",14), 0 , 0 , 0 ); if (new_error) goto skip4410; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_HASHDUMP_LONG_X)), 1 , 0 , 0 ); if (new_error) goto skip4410; sub_file_print(tmp_fileno,qbs_new_txt_len(")",1), 0 , 0 , 1 ); if (new_error) goto skip4410; skip4410: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(34964);}while(r); } } fornext_exit_4403:; do{ sub_close(*_SUB_HASHDUMP_LONG_FH,1); if(!qbevent)break;evnt(34967);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(34969);}while(r); LABEL_CORRUPT:; if(qbevent){evnt(34970);r=0;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip4411; sub_file_print(tmp_fileno,qbs_new_txt_len("HASH TABLE CORRUPT!",19), 0 , 0 , 1 ); if (new_error) goto skip4411; skip4411: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(34971);}while(r); do{ sub_close(*_SUB_HASHDUMP_LONG_FH,1); if(!qbevent)break;evnt(34972);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free144.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_HASHCLEAR(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data145.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_HASHLISTSIZE= 65536 ; if(!qbevent)break;evnt(34978);}while(r); do{ *__LONG_HASHLISTNEXT= 1 ; if(!qbevent)break;evnt(34979);}while(r); do{ *__LONG_HASHLISTFREESIZE= 1024 ; if(!qbevent)break;evnt(34980);}while(r); do{ *__LONG_HASHLISTFREELAST= 0 ; if(!qbevent)break;evnt(34981);}while(r); do{ if (__ARRAY_UDT_HASHLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_HASHLIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_HASHLIST[2]&1){ if (__ARRAY_UDT_HASHLIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_HASHLIST[0])); }else{ free((void*)(__ARRAY_UDT_HASHLIST[0])); } } __ARRAY_UDT_HASHLIST[4]= 1 ; __ARRAY_UDT_HASHLIST[5]=(*__LONG_HASHLISTSIZE)-__ARRAY_UDT_HASHLIST[4]+1; __ARRAY_UDT_HASHLIST[6]=1; if (__ARRAY_UDT_HASHLIST[2]&4){ __ARRAY_UDT_HASHLIST[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_HASHLIST[5]*160/8+1); memset((void*)(__ARRAY_UDT_HASHLIST[0]),0,__ARRAY_UDT_HASHLIST[5]*160/8+1); }else{ __ARRAY_UDT_HASHLIST[0]=(ptrszint)calloc(__ARRAY_UDT_HASHLIST[5]*160/8+1,1); if (!__ARRAY_UDT_HASHLIST[0]) error(257); } __ARRAY_UDT_HASHLIST[2]|=1; } if(!qbevent)break;evnt(34982);}while(r); do{ if (__ARRAY_STRING256_HASHLISTNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_HASHLISTNAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING256_HASHLISTNAME[2]&1){ if (__ARRAY_STRING256_HASHLISTNAME[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING256_HASHLISTNAME[0])); }else{ free((void*)(__ARRAY_STRING256_HASHLISTNAME[0])); } } __ARRAY_STRING256_HASHLISTNAME[4]= 1 ; __ARRAY_STRING256_HASHLISTNAME[5]=(*__LONG_HASHLISTSIZE)-__ARRAY_STRING256_HASHLISTNAME[4]+1; __ARRAY_STRING256_HASHLISTNAME[6]=1; if (__ARRAY_STRING256_HASHLISTNAME[2]&4){ __ARRAY_STRING256_HASHLISTNAME[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_STRING256_HASHLISTNAME[5]*256); memset((void*)(__ARRAY_STRING256_HASHLISTNAME[0]),0,__ARRAY_STRING256_HASHLISTNAME[5]*256); }else{ __ARRAY_STRING256_HASHLISTNAME[0]=(ptrszint)calloc(__ARRAY_STRING256_HASHLISTNAME[5]*256,1); if (!__ARRAY_STRING256_HASHLISTNAME[0]) error(257); } __ARRAY_STRING256_HASHLISTNAME[2]|=1; } if(!qbevent)break;evnt(34983);}while(r); do{ if (__ARRAY_LONG_HASHLISTFREE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_HASHLISTFREE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_HASHLISTFREE[2]&1){ if (__ARRAY_LONG_HASHLISTFREE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_HASHLISTFREE[0])); }else{ free((void*)(__ARRAY_LONG_HASHLISTFREE[0])); } } __ARRAY_LONG_HASHLISTFREE[4]= 1 ; __ARRAY_LONG_HASHLISTFREE[5]=(*__LONG_HASHLISTFREESIZE)-__ARRAY_LONG_HASHLISTFREE[4]+1; __ARRAY_LONG_HASHLISTFREE[6]=1; if (__ARRAY_LONG_HASHLISTFREE[2]&4){ __ARRAY_LONG_HASHLISTFREE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HASHLISTFREE[5]*4); memset((void*)(__ARRAY_LONG_HASHLISTFREE[0]),0,__ARRAY_LONG_HASHLISTFREE[5]*4); }else{ __ARRAY_LONG_HASHLISTFREE[0]=(ptrszint)calloc(__ARRAY_LONG_HASHLISTFREE[5]*4,1); if (!__ARRAY_LONG_HASHLISTFREE[0]) error(257); } __ARRAY_LONG_HASHLISTFREE[2]|=1; } if(!qbevent)break;evnt(34984);}while(r); do{ if (__ARRAY_LONG_HASHTABLE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_HASHTABLE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_HASHTABLE[2]&1){ if (__ARRAY_LONG_HASHTABLE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_HASHTABLE[0])); }else{ free((void*)(__ARRAY_LONG_HASHTABLE[0])); } } __ARRAY_LONG_HASHTABLE[4]= 0 ; __ARRAY_LONG_HASHTABLE[5]=( 16777215 )-__ARRAY_LONG_HASHTABLE[4]+1; __ARRAY_LONG_HASHTABLE[6]=1; if (__ARRAY_LONG_HASHTABLE[2]&4){ __ARRAY_LONG_HASHTABLE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HASHTABLE[5]*4); memset((void*)(__ARRAY_LONG_HASHTABLE[0]),0,__ARRAY_LONG_HASHTABLE[5]*4); }else{ __ARRAY_LONG_HASHTABLE[0]=(ptrszint)calloc(__ARRAY_LONG_HASHTABLE[5]*4,1); if (!__ARRAY_LONG_HASHTABLE[0]) error(257); } __ARRAY_LONG_HASHTABLE[2]|=1; } if(!qbevent)break;evnt(34985);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM= 0 ; if(!qbevent)break;evnt(34987);}while(r); do{ *__LONG_HASHFIND_REVERSE= 0 ; if(!qbevent)break;evnt(34988);}while(r); do{ *__LONG_HASHFIND_SEARCHFLAGS= 0 ; if(!qbevent)break;evnt(34989);}while(r); do{ qbs_set(__STRING_HASHFIND_NAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34990);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND= 0 ; if(!qbevent)break;evnt(34991);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free145.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_IDERESTRICT417(int32*_SUB_IDERESTRICT417_LONG_P417){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data146.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_SUB_IDERESTRICT417_LONG_X= 0 ; if(!qbevent)break;evnt(34996);}while(r); S_38725:; if ((*_SUB_IDERESTRICT417_LONG_P417& 4 )||new_error){ if(qbevent){evnt(34997);if(r)goto S_38725;} do{ *_SUB_IDERESTRICT417_LONG_X=*_SUB_IDERESTRICT417_LONG_X+ 1 ; if(!qbevent)break;evnt(34997);}while(r); } S_38728:; if ((*_SUB_IDERESTRICT417_LONG_P417& 8 )||new_error){ if(qbevent){evnt(34998);if(r)goto S_38728;} do{ *_SUB_IDERESTRICT417_LONG_X=*_SUB_IDERESTRICT417_LONG_X+ 1 ; if(!qbevent)break;evnt(34998);}while(r); } S_38731:; if ((-(*_SUB_IDERESTRICT417_LONG_X> 1 ))||new_error){ if(qbevent){evnt(34999);if(r)goto S_38731;} do{ *_SUB_IDERESTRICT417_LONG_P417=*_SUB_IDERESTRICT417_LONG_P417& 243 ; if(!qbevent)break;evnt(34999);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free146.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_DECOMPRESS_2_HUFF(qbs*_FUNC_DECOMPRESS_2_HUFF_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data147.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_38734:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A)!= 2 )))||new_error){ if(qbevent){evnt(35090);if(r)goto S_38734;} do{ qbg_screen( 0 ,NULL, 0 , 0 ,NULL,13); if(!qbevent)break;evnt(35090);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("decompress_2_huff: invalid type",31)); if (new_error) goto skip4413; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4413: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35090);}while(r); do{ sub_end(); if(!qbevent)break;evnt(35090);}while(r); } do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS=qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A, 5 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35093);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS=(*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS* 256 )+(qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35094);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS=(*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS* 256 )+(qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A, 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35095);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS=(*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS* 256 )+(qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35096);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBYTES=(*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS+ 7 )/ 8 ; if(!qbevent)break;evnt(35097);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_NB=(_FUNC_DECOMPRESS_2_HUFF_STRING_A->len-*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBYTES- 5 )/ 3 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35098);}while(r); S_38745:; fornext_value4416= 0 ; fornext_finalvalue4416=*_FUNC_DECOMPRESS_2_HUFF_LONG_NB- 1 ; fornext_step4416= 1 ; if (fornext_step4416<0) fornext_step_negative4416=1; else fornext_step_negative4416=0; if (new_error) goto fornext_error4416; goto fornext_entrylabel4416; while(1){ fornext_value4416=fornext_step4416+(*_FUNC_DECOMPRESS_2_HUFF_LONG_I); fornext_entrylabel4416: *_FUNC_DECOMPRESS_2_HUFF_LONG_I=fornext_value4416; if (fornext_step_negative4416){ if (fornext_value4416fornext_finalvalue4416) break; } fornext_error4416:; if(qbevent){evnt(35101);if(r)goto S_38745;} do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_V=(qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A,( 6 )+(*_FUNC_DECOMPRESS_2_HUFF_LONG_I* 3 )))+(qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A,( 6 )+(*_FUNC_DECOMPRESS_2_HUFF_LONG_I* 3 )+( 1 ))* 256 )+(qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A,( 6 )+(*_FUNC_DECOMPRESS_2_HUFF_LONG_I* 3 )+( 2 ))* 65536 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35102);}while(r); do{ tmp_long=array_check((*_FUNC_DECOMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_BRANCH0[4],__ARRAY_LONG_HUFF_BRANCH0[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BRANCH0[0]))[tmp_long]=*_FUNC_DECOMPRESS_2_HUFF_LONG_V& 4095 ; if(!qbevent)break;evnt(35103);}while(r); do{ tmp_long=array_check((*_FUNC_DECOMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_BRANCH1[4],__ARRAY_LONG_HUFF_BRANCH1[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BRANCH1[0]))[tmp_long]=*_FUNC_DECOMPRESS_2_HUFF_LONG_V/ 4096 ; if(!qbevent)break;evnt(35104);}while(r); } fornext_exit_4415:; do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ=*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS* 8 ; if(!qbevent)break;evnt(35108);}while(r); S_38751:; if ((-(*_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ> 1000000 ))||new_error){ if(qbevent){evnt(35109);if(r)goto S_38751;} do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ= 1000000 ; if(!qbevent)break;evnt(35109);}while(r); } do{ qbs_set(_FUNC_DECOMPRESS_2_HUFF_STRING_B,func_space(*_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35110);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEOFF=_FUNC_DECOMPRESS_2_HUFF_STRING_A->len-*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBYTES+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35113);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BITMASK= 1 ; if(!qbevent)break;evnt(35114);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_X= 0 ; if(!qbevent)break;evnt(35115);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_B= 0 ; if(!qbevent)break;evnt(35116);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEVAL=qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A,*_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEOFF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35117);}while(r); LABEL_HUFFREADBITS:; if(qbevent){evnt(35118);r=0;} do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BIT=*_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEVAL&*_FUNC_DECOMPRESS_2_HUFF_LONG_BITMASK; if(!qbevent)break;evnt(35119);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS=*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS- 1 ; if(!qbevent)break;evnt(35120);}while(r); S_38762:; if ((*_FUNC_DECOMPRESS_2_HUFF_LONG_BIT)||new_error){ if(qbevent){evnt(35122);if(r)goto S_38762;} do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_B=((int32*)(__ARRAY_LONG_HUFF_BRANCH1[0]))[array_check((*_FUNC_DECOMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BRANCH1[4],__ARRAY_LONG_HUFF_BRANCH1[5])]; if(!qbevent)break;evnt(35123);}while(r); }else{ do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_B=((int32*)(__ARRAY_LONG_HUFF_BRANCH0[0]))[array_check((*_FUNC_DECOMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BRANCH0[4],__ARRAY_LONG_HUFF_BRANCH0[5])]; if(!qbevent)break;evnt(35125);}while(r); } S_38767:; if ((-(((int32*)(__ARRAY_LONG_HUFF_BRANCH0[0]))[array_check((*_FUNC_DECOMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BRANCH0[4],__ARRAY_LONG_HUFF_BRANCH0[5])]== 0 ))||new_error){ if(qbevent){evnt(35128);if(r)goto S_38767;} do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_X=*_FUNC_DECOMPRESS_2_HUFF_LONG_X+ 1 ; if(!qbevent)break;evnt(35129);}while(r); S_38769:; if ((-(*_FUNC_DECOMPRESS_2_HUFF_LONG_X>*_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ))||new_error){ if(qbevent){evnt(35129);if(r)goto S_38769;} do{ qbs_set(_FUNC_DECOMPRESS_2_HUFF_STRING_B,qbs_add(_FUNC_DECOMPRESS_2_HUFF_STRING_B,func_space(*_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35129);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ=*_FUNC_DECOMPRESS_2_HUFF_LONG_BUFSIZ* 2 ; if(!qbevent)break;evnt(35129);}while(r); } do{ tqbs=_FUNC_DECOMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno=*_FUNC_DECOMPRESS_2_HUFF_LONG_X; if (!new_error){ tmp_long=((int32*)(__ARRAY_LONG_HUFF_BRANCH1[0]))[array_check((*_FUNC_DECOMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BRANCH1[4],__ARRAY_LONG_HUFF_BRANCH1[5])]; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35130);}while(r); S_38774:; if ((-(*_FUNC_DECOMPRESS_2_HUFF_LONG_TOTALBITS== 0 ))||new_error){ if(qbevent){evnt(35131);if(r)goto S_38774;} do{ goto LABEL_HUFFFINISHED; if(!qbevent)break;evnt(35131);}while(r); } do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_B= 0 ; if(!qbevent)break;evnt(35132);}while(r); } do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BITMASK=*_FUNC_DECOMPRESS_2_HUFF_LONG_BITMASK* 2 ; if(!qbevent)break;evnt(35135);}while(r); S_38780:; if ((-(*_FUNC_DECOMPRESS_2_HUFF_LONG_BITMASK== 256 ))||new_error){ if(qbevent){evnt(35135);if(r)goto S_38780;} do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BITMASK= 1 ; if(!qbevent)break;evnt(35135);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEOFF=*_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEOFF+ 1 ; if(!qbevent)break;evnt(35135);}while(r); do{ *_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEVAL=qbs_asc(_FUNC_DECOMPRESS_2_HUFF_STRING_A,*_FUNC_DECOMPRESS_2_HUFF_LONG_BYTEOFF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35135);}while(r); } do{ goto LABEL_HUFFREADBITS; if(!qbevent)break;evnt(35136);}while(r); LABEL_HUFFFINISHED:; if(qbevent){evnt(35138);r=0;} do{ qbs_set(_FUNC_DECOMPRESS_2_HUFF_STRING_DECOMPRESS_2_HUFF,qbs_left(_FUNC_DECOMPRESS_2_HUFF_STRING_B,*_FUNC_DECOMPRESS_2_HUFF_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35139);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free147.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_DECOMPRESS_2_HUFF_STRING_DECOMPRESS_2_HUFF);return _FUNC_DECOMPRESS_2_HUFF_STRING_DECOMPRESS_2_HUFF; } qbs* FUNC_COMPRESS_2_HUFF(qbs*_FUNC_COMPRESS_2_HUFF_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data148.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_38787:; fornext_value4420= 0 ; fornext_finalvalue4420= 255 ; fornext_step4420= 1 ; if (fornext_step4420<0) fornext_step_negative4420=1; else fornext_step_negative4420=0; if (new_error) goto fornext_error4420; goto fornext_entrylabel4420; while(1){ fornext_value4420=fornext_step4420+(*_FUNC_COMPRESS_2_HUFF_LONG_I); fornext_entrylabel4420: *_FUNC_COMPRESS_2_HUFF_LONG_I=fornext_value4420; if (fornext_step_negative4420){ if (fornext_value4420fornext_finalvalue4420) break; } fornext_error4420:; if(qbevent){evnt(35146);if(r)goto S_38787;} do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_COUNT[4],__ARRAY_LONG_HUFF_COUNT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_COUNT[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(35147);}while(r); } fornext_exit_4419:; S_38790:; fornext_value4422= 1 ; fornext_finalvalue4422=_FUNC_COMPRESS_2_HUFF_STRING_A->len; fornext_step4422= 1 ; if (fornext_step4422<0) fornext_step_negative4422=1; else fornext_step_negative4422=0; if (new_error) goto fornext_error4422; goto fornext_entrylabel4422; while(1){ fornext_value4422=fornext_step4422+(*_FUNC_COMPRESS_2_HUFF_LONG_I); fornext_entrylabel4422: *_FUNC_COMPRESS_2_HUFF_LONG_I=fornext_value4422; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4422){ if (fornext_value4422fornext_finalvalue4422) break; } fornext_error4422:; if(qbevent){evnt(35149);if(r)goto S_38790;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_V=qbs_asc(_FUNC_COMPRESS_2_HUFF_STRING_A,*_FUNC_COMPRESS_2_HUFF_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35150);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_V)-__ARRAY_LONG_HUFF_COUNT[4],__ARRAY_LONG_HUFF_COUNT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_COUNT[0]))[tmp_long]=((int32*)(__ARRAY_LONG_HUFF_COUNT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_V)-__ARRAY_LONG_HUFF_COUNT[4],__ARRAY_LONG_HUFF_COUNT[5])]+ 1 ; if(!qbevent)break;evnt(35151);}while(r); } fornext_exit_4421:; do{ *_FUNC_COMPRESS_2_HUFF_LONG_B= 0 ; if(!qbevent)break;evnt(35155);}while(r); S_38795:; fornext_value4425= 0 ; fornext_finalvalue4425= 255 ; fornext_step4425= 1 ; if (fornext_step4425<0) fornext_step_negative4425=1; else fornext_step_negative4425=0; if (new_error) goto fornext_error4425; goto fornext_entrylabel4425; while(1){ fornext_value4425=fornext_step4425+(*_FUNC_COMPRESS_2_HUFF_LONG_I); fornext_entrylabel4425: *_FUNC_COMPRESS_2_HUFF_LONG_I=fornext_value4425; if (fornext_step_negative4425){ if (fornext_value4425fornext_finalvalue4425) break; } fornext_error4425:; if(qbevent){evnt(35156);if(r)goto S_38795;} S_38796:; if ((((int32*)(__ARRAY_LONG_HUFF_COUNT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_COUNT[4],__ARRAY_LONG_HUFF_COUNT[5])])||new_error){ if(qbevent){evnt(35157);if(r)goto S_38796;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_B=*_FUNC_COMPRESS_2_HUFF_LONG_B+ 1 ; if(!qbevent)break;evnt(35158);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_BRANCH[4],__ARRAY_LONG_HUFF_BRANCH[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BRANCH[0]))[tmp_long]=*_FUNC_COMPRESS_2_HUFF_LONG_B; if(!qbevent)break;evnt(35159);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[tmp_long]=((int32*)(__ARRAY_LONG_HUFF_COUNT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_COUNT[4],__ARRAY_LONG_HUFF_COUNT[5])]; if(!qbevent)break;evnt(35160);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BIT0LINK[4],__ARRAY_LONG_HUFF_BIT0LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT0LINK[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(35161);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BIT1LINK[4],__ARRAY_LONG_HUFF_BIT1LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT1LINK[0]))[tmp_long]=*_FUNC_COMPRESS_2_HUFF_LONG_I; if(!qbevent)break;evnt(35162);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(35163);}while(r); } } fornext_exit_4424:; S_38805:; if ((-(*_FUNC_COMPRESS_2_HUFF_LONG_B== 1 ))||new_error){ if(qbevent){evnt(35167);if(r)goto S_38805;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_B=*_FUNC_COMPRESS_2_HUFF_LONG_B+ 1 ; if(!qbevent)break;evnt(35168);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(35169);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BIT0LINK[4],__ARRAY_LONG_HUFF_BIT0LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT0LINK[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(35170);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BIT1LINK[4],__ARRAY_LONG_HUFF_BIT1LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT1LINK[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(35171);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(35172);}while(r); } LABEL_HUFF_BUILDBRANCHES:; if(qbevent){evnt(35176);r=0;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_W1= 2147483647 ; if(!qbevent)break;evnt(35177);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_W2= 2147483647 ; if(!qbevent)break;evnt(35178);}while(r); S_38814:; fornext_value4427= 1 ; fornext_finalvalue4427=*_FUNC_COMPRESS_2_HUFF_LONG_B; fornext_step4427= 1 ; if (fornext_step4427<0) fornext_step_negative4427=1; else fornext_step_negative4427=0; if (new_error) goto fornext_error4427; goto fornext_entrylabel4427; while(1){ fornext_value4427=fornext_step4427+(*_FUNC_COMPRESS_2_HUFF_LONG_I); fornext_entrylabel4427: *_FUNC_COMPRESS_2_HUFF_LONG_I=fornext_value4427; if (fornext_step_negative4427){ if (fornext_value4427fornext_finalvalue4427) break; } fornext_error4427:; if(qbevent){evnt(35179);if(r)goto S_38814;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_W=((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5])]; if(!qbevent)break;evnt(35180);}while(r); S_38816:; if ((-(*_FUNC_COMPRESS_2_HUFF_LONG_W!= 2147483647 ))||new_error){ if(qbevent){evnt(35181);if(r)goto S_38816;} S_38817:; if ((-(*_FUNC_COMPRESS_2_HUFF_LONG_W<*_FUNC_COMPRESS_2_HUFF_LONG_W1))||new_error){ if(qbevent){evnt(35183);if(r)goto S_38817;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_W2=*_FUNC_COMPRESS_2_HUFF_LONG_W1; if(!qbevent)break;evnt(35184);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_I2=*_FUNC_COMPRESS_2_HUFF_LONG_I1; if(!qbevent)break;evnt(35184);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_W1=*_FUNC_COMPRESS_2_HUFF_LONG_W; if(!qbevent)break;evnt(35185);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_I1=*_FUNC_COMPRESS_2_HUFF_LONG_I; if(!qbevent)break;evnt(35185);}while(r); }else{ S_38823:; if ((-(*_FUNC_COMPRESS_2_HUFF_LONG_W<*_FUNC_COMPRESS_2_HUFF_LONG_W2))||new_error){ if(qbevent){evnt(35187);if(r)goto S_38823;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_W2=*_FUNC_COMPRESS_2_HUFF_LONG_W; if(!qbevent)break;evnt(35187);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_I2=*_FUNC_COMPRESS_2_HUFF_LONG_I; if(!qbevent)break;evnt(35187);}while(r); } } } } fornext_exit_4426:; S_38830:; if (((-(*_FUNC_COMPRESS_2_HUFF_LONG_W1!= 2147483647 ))&(-(*_FUNC_COMPRESS_2_HUFF_LONG_W2!= 2147483647 )))||new_error){ if(qbevent){evnt(35193);if(r)goto S_38830;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_B=*_FUNC_COMPRESS_2_HUFF_LONG_B+ 1 ; if(!qbevent)break;evnt(35194);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[tmp_long]=((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I1)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5])]+((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I2)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5])]; if(!qbevent)break;evnt(35195);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(35196);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BIT0LINK[4],__ARRAY_LONG_HUFF_BIT0LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT0LINK[0]))[tmp_long]=*_FUNC_COMPRESS_2_HUFF_LONG_I1; if(!qbevent)break;evnt(35197);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BIT1LINK[4],__ARRAY_LONG_HUFF_BIT1LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT1LINK[0]))[tmp_long]=*_FUNC_COMPRESS_2_HUFF_LONG_I2; if(!qbevent)break;evnt(35197);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I1)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[tmp_long]= 2147483647 ; if(!qbevent)break;evnt(35198);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I2)-__ARRAY_LONG_HUFF_WEIGHT[4],__ARRAY_LONG_HUFF_WEIGHT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_WEIGHT[0]))[tmp_long]= 2147483647 ; if(!qbevent)break;evnt(35198);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I1)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[tmp_long]=*_FUNC_COMPRESS_2_HUFF_LONG_B; if(!qbevent)break;evnt(35199);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I2)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[tmp_long]=*_FUNC_COMPRESS_2_HUFF_LONG_B; if(!qbevent)break;evnt(35199);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I1)-__ARRAY_LONG_HUFF_BIT[4],__ARRAY_LONG_HUFF_BIT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(35200);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I2)-__ARRAY_LONG_HUFF_BIT[4],__ARRAY_LONG_HUFF_BIT[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(35200);}while(r); do{ goto LABEL_HUFF_BUILDBRANCHES; if(!qbevent)break;evnt(35201);}while(r); } do{ tmp_long=array_check(( 0 )-__ARRAY_LONG_HUFF_BIT0LINK[4],__ARRAY_LONG_HUFF_BIT0LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT0LINK[0]))[tmp_long]=((int32*)(__ARRAY_LONG_HUFF_BIT0LINK[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I1)-__ARRAY_LONG_HUFF_BIT0LINK[4],__ARRAY_LONG_HUFF_BIT0LINK[5])]; if(!qbevent)break;evnt(35206);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_LONG_HUFF_BIT1LINK[4],__ARRAY_LONG_HUFF_BIT1LINK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_BIT1LINK[0]))[tmp_long]=((int32*)(__ARRAY_LONG_HUFF_BIT1LINK[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I1)-__ARRAY_LONG_HUFF_BIT1LINK[4],__ARRAY_LONG_HUFF_BIT1LINK[5])]; if(!qbevent)break;evnt(35206);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_LASTBRANCH=*_FUNC_COMPRESS_2_HUFF_LONG_B- 1 ; if(!qbevent)break;evnt(35207);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS= 0 ; if(!qbevent)break;evnt(35210);}while(r); S_38848:; fornext_value4429= 0 ; fornext_finalvalue4429= 255 ; fornext_step4429= 1 ; if (fornext_step4429<0) fornext_step_negative4429=1; else fornext_step_negative4429=0; if (new_error) goto fornext_error4429; goto fornext_entrylabel4429; while(1){ fornext_value4429=fornext_step4429+(*_FUNC_COMPRESS_2_HUFF_LONG_I); fornext_entrylabel4429: *_FUNC_COMPRESS_2_HUFF_LONG_I=fornext_value4429; if (fornext_step_negative4429){ if (fornext_value4429fornext_finalvalue4429) break; } fornext_error4429:; if(qbevent){evnt(35211);if(r)goto S_38848;} S_38849:; if ((((int32*)(__ARRAY_LONG_HUFF_COUNT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_COUNT[4],__ARRAY_LONG_HUFF_COUNT[5])])||new_error){ if(qbevent){evnt(35212);if(r)goto S_38849;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_NBITS= 0 ; if(!qbevent)break;evnt(35215);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_B=((int32*)(__ARRAY_LONG_HUFF_BRANCH[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_BRANCH[4],__ARRAY_LONG_HUFF_BRANCH[5])]; if(!qbevent)break;evnt(35216);}while(r); LABEL_HUFF_CALCNBITS:; if(qbevent){evnt(35217);r=0;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_P=((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5])]; if(!qbevent)break;evnt(35218);}while(r); S_38853:; if ((-(*_FUNC_COMPRESS_2_HUFF_LONG_P!= -1 ))||new_error){ if(qbevent){evnt(35219);if(r)goto S_38853;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_NBITS=*_FUNC_COMPRESS_2_HUFF_LONG_NBITS+ 1 ; if(!qbevent)break;evnt(35219);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_B=*_FUNC_COMPRESS_2_HUFF_LONG_P; if(!qbevent)break;evnt(35219);}while(r); do{ goto LABEL_HUFF_CALCNBITS; if(!qbevent)break;evnt(35219);}while(r); } do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_MASK_BITS[4],__ARRAY_LONG_HUFF_MASK_BITS[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HUFF_MASK_BITS[0]))[tmp_long]=*_FUNC_COMPRESS_2_HUFF_LONG_NBITS; if(!qbevent)break;evnt(35220);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS+(*_FUNC_COMPRESS_2_HUFF_LONG_NBITS*((int32*)(__ARRAY_LONG_HUFF_COUNT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_COUNT[4],__ARRAY_LONG_HUFF_COUNT[5])]); if(!qbevent)break;evnt(35221);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_BASEOFFSET=*_FUNC_COMPRESS_2_HUFF_LONG_I* 256 ; if(!qbevent)break;evnt(35223);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_BYTES=((*_FUNC_COMPRESS_2_HUFF_LONG_NBITS+ 7 )+ 7 )/ 8 ; if(!qbevent)break;evnt(35226);}while(r); S_38862:; fornext_value4431= 0 ; fornext_finalvalue4431= 7 ; fornext_step4431= 1 ; if (fornext_step4431<0) fornext_step_negative4431=1; else fornext_step_negative4431=0; if (new_error) goto fornext_error4431; goto fornext_entrylabel4431; while(1){ fornext_value4431=fornext_step4431+(*_FUNC_COMPRESS_2_HUFF_LONG_X); fornext_entrylabel4431: *_FUNC_COMPRESS_2_HUFF_LONG_X=fornext_value4431; if (fornext_step_negative4431){ if (fornext_value4431fornext_finalvalue4431) break; } fornext_error4431:; if(qbevent){evnt(35227);if(r)goto S_38862;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_BYTEO=*_FUNC_COMPRESS_2_HUFF_LONG_BASEOFFSET+(*_FUNC_COMPRESS_2_HUFF_LONG_X* 32 ); if(!qbevent)break;evnt(35228);}while(r); S_38864:; fornext_value4433= 0 ; fornext_finalvalue4433=*_FUNC_COMPRESS_2_HUFF_LONG_BYTES- 1 ; fornext_step4433= 1 ; if (fornext_step4433<0) fornext_step_negative4433=1; else fornext_step_negative4433=0; if (new_error) goto fornext_error4433; goto fornext_entrylabel4433; while(1){ fornext_value4433=fornext_step4433+(*_FUNC_COMPRESS_2_HUFF_LONG_X2); fornext_entrylabel4433: *_FUNC_COMPRESS_2_HUFF_LONG_X2=fornext_value4433; if (fornext_step_negative4433){ if (fornext_value4433fornext_finalvalue4433) break; } fornext_error4433:; if(qbevent){evnt(35229);if(r)goto S_38864;} do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_BYTEO+*_FUNC_COMPRESS_2_HUFF_LONG_X2)-__ARRAY_UBYTE_HUFF_MASK[4],__ARRAY_UBYTE_HUFF_MASK[5]); if (!new_error) ((uint8*)(__ARRAY_UBYTE_HUFF_MASK[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(35230);}while(r); } fornext_exit_4432:; } fornext_exit_4430:; do{ *_FUNC_COMPRESS_2_HUFF_LONG_O1=*_FUNC_COMPRESS_2_HUFF_LONG_NBITS; if(!qbevent)break;evnt(35235);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_B=((int32*)(__ARRAY_LONG_HUFF_BRANCH[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_BRANCH[4],__ARRAY_LONG_HUFF_BRANCH[5])]; if(!qbevent)break;evnt(35236);}while(r); LABEL_HUFF_NEXTBRANCH:; if(qbevent){evnt(35238);r=0;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_O1=*_FUNC_COMPRESS_2_HUFF_LONG_O1- 1 ; if(!qbevent)break;evnt(35239);}while(r); S_38871:; if ((-(((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5])]!= -1 ))||new_error){ if(qbevent){evnt(35240);if(r)goto S_38871;} S_38872:; if ((((int32*)(__ARRAY_LONG_HUFF_BIT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_BIT[4],__ARRAY_LONG_HUFF_BIT[5])])||new_error){ if(qbevent){evnt(35242);if(r)goto S_38872;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_BITVAL=((int32*)(__ARRAY_LONG_HUFF_BITVAL[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_O1& 7 )-__ARRAY_LONG_HUFF_BITVAL[4],__ARRAY_LONG_HUFF_BITVAL[5])]; if(!qbevent)break;evnt(35243);}while(r); S_38874:; fornext_value4435= 0 ; fornext_finalvalue4435= 7 ; fornext_step4435= 1 ; if (fornext_step4435<0) fornext_step_negative4435=1; else fornext_step_negative4435=0; if (new_error) goto fornext_error4435; goto fornext_entrylabel4435; while(1){ fornext_value4435=fornext_step4435+(*_FUNC_COMPRESS_2_HUFF_LONG_O2); fornext_entrylabel4435: *_FUNC_COMPRESS_2_HUFF_LONG_O2=fornext_value4435; if (fornext_step_negative4435){ if (fornext_value4435fornext_finalvalue4435) break; } fornext_error4435:; if(qbevent){evnt(35244);if(r)goto S_38874;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_O=*_FUNC_COMPRESS_2_HUFF_LONG_O1+*_FUNC_COMPRESS_2_HUFF_LONG_O2; if(!qbevent)break;evnt(35245);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_BYTEO=*_FUNC_COMPRESS_2_HUFF_LONG_BASEOFFSET+(*_FUNC_COMPRESS_2_HUFF_LONG_O2* 32 )+(*_FUNC_COMPRESS_2_HUFF_LONG_O/ 8 ); if(!qbevent)break;evnt(35246);}while(r); do{ tmp_long=array_check((*_FUNC_COMPRESS_2_HUFF_LONG_BYTEO)-__ARRAY_UBYTE_HUFF_MASK[4],__ARRAY_UBYTE_HUFF_MASK[5]); if (!new_error) ((uint8*)(__ARRAY_UBYTE_HUFF_MASK[0]))[tmp_long]=((uint8*)(__ARRAY_UBYTE_HUFF_MASK[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_BYTEO)-__ARRAY_UBYTE_HUFF_MASK[4],__ARRAY_UBYTE_HUFF_MASK[5])]|*_FUNC_COMPRESS_2_HUFF_LONG_BITVAL; if(!qbevent)break;evnt(35247);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_BITVAL=*_FUNC_COMPRESS_2_HUFF_LONG_BITVAL+*_FUNC_COMPRESS_2_HUFF_LONG_BITVAL; if(!qbevent)break;evnt(35248);}while(r); S_38879:; if ((-(*_FUNC_COMPRESS_2_HUFF_LONG_BITVAL== 256 ))||new_error){ if(qbevent){evnt(35248);if(r)goto S_38879;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_BITVAL= 1 ; if(!qbevent)break;evnt(35248);}while(r); } } fornext_exit_4434:; } do{ *_FUNC_COMPRESS_2_HUFF_LONG_B=((int32*)(__ARRAY_LONG_HUFF_PARENT[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_B)-__ARRAY_LONG_HUFF_PARENT[4],__ARRAY_LONG_HUFF_PARENT[5])]; if(!qbevent)break;evnt(35251);}while(r); do{ goto LABEL_HUFF_NEXTBRANCH; if(!qbevent)break;evnt(35252);}while(r); } } } fornext_exit_4428:; do{ *_FUNC_COMPRESS_2_HUFF_LONG_TOTALBYTES=(*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS+ 7 )/ 8 ; if(!qbevent)break;evnt(35258);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_TOTALBYTES=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBYTES+((*_FUNC_COMPRESS_2_HUFF_LONG_LASTBRANCH+ 1 )* 3 )+( 4 )+( 1 ); if(!qbevent)break;evnt(35259);}while(r); do{ qbs_set(_FUNC_COMPRESS_2_HUFF_STRING_B,func_string(*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBYTES, 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35260);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_long= 2 ; if (!new_error){ if (tqbs->len){tqbs->chr[0]=tmp_long;}else{error(5);} }} if(!qbevent)break;evnt(35261);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno= 2 ; if (!new_error){ tmp_long=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35265);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS/ 256 ; if(!qbevent)break;evnt(35265);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno= 3 ; if (!new_error){ tmp_long=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35266);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS/ 256 ; if(!qbevent)break;evnt(35266);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno= 4 ; if (!new_error){ tmp_long=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35267);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS/ 256 ; if(!qbevent)break;evnt(35267);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno= 5 ; if (!new_error){ tmp_long=*_FUNC_COMPRESS_2_HUFF_LONG_TOTALBITS; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35268);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_X= 5 ; if(!qbevent)break;evnt(35271);}while(r); S_38901:; fornext_value4437= 0 ; fornext_finalvalue4437=*_FUNC_COMPRESS_2_HUFF_LONG_LASTBRANCH; fornext_step4437= 1 ; if (fornext_step4437<0) fornext_step_negative4437=1; else fornext_step_negative4437=0; if (new_error) goto fornext_error4437; goto fornext_entrylabel4437; while(1){ fornext_value4437=fornext_step4437+(*_FUNC_COMPRESS_2_HUFF_LONG_I); fornext_entrylabel4437: *_FUNC_COMPRESS_2_HUFF_LONG_I=fornext_value4437; if (fornext_step_negative4437){ if (fornext_value4437fornext_finalvalue4437) break; } fornext_error4437:; if(qbevent){evnt(35272);if(r)goto S_38901;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_V=((int32*)(__ARRAY_LONG_HUFF_BIT0LINK[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_BIT0LINK[4],__ARRAY_LONG_HUFF_BIT0LINK[5])]+(((int32*)(__ARRAY_LONG_HUFF_BIT1LINK[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_LONG_HUFF_BIT1LINK[4],__ARRAY_LONG_HUFF_BIT1LINK[5])]* 4096 ); if(!qbevent)break;evnt(35273);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_X=*_FUNC_COMPRESS_2_HUFF_LONG_X+ 1 ; if(!qbevent)break;evnt(35274);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_2_HUFF_LONG_X; if (!new_error){ tmp_long=*_FUNC_COMPRESS_2_HUFF_LONG_V& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35274);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_X=*_FUNC_COMPRESS_2_HUFF_LONG_X+ 1 ; if(!qbevent)break;evnt(35275);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_2_HUFF_LONG_X; if (!new_error){ tmp_long=(*_FUNC_COMPRESS_2_HUFF_LONG_V/ 256 )& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35275);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_X=*_FUNC_COMPRESS_2_HUFF_LONG_X+ 1 ; if(!qbevent)break;evnt(35276);}while(r); do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_2_HUFF_LONG_X; if (!new_error){ tmp_long=*_FUNC_COMPRESS_2_HUFF_LONG_V/ 65536 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35276);}while(r); } fornext_exit_4436:; do{ *_FUNC_COMPRESS_2_HUFF_LONG_X=*_FUNC_COMPRESS_2_HUFF_LONG_X+ 1 ; if(!qbevent)break;evnt(35280);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_BITPOS= 0 ; if(!qbevent)break;evnt(35281);}while(r); S_38912:; fornext_value4439= 1 ; fornext_finalvalue4439=_FUNC_COMPRESS_2_HUFF_STRING_A->len; fornext_step4439= 1 ; if (fornext_step4439<0) fornext_step_negative4439=1; else fornext_step_negative4439=0; if (new_error) goto fornext_error4439; goto fornext_entrylabel4439; while(1){ fornext_value4439=fornext_step4439+(*_FUNC_COMPRESS_2_HUFF_LONG_Z); fornext_entrylabel4439: *_FUNC_COMPRESS_2_HUFF_LONG_Z=fornext_value4439; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4439){ if (fornext_value4439fornext_finalvalue4439) break; } fornext_error4439:; if(qbevent){evnt(35282);if(r)goto S_38912;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_V=qbs_asc(_FUNC_COMPRESS_2_HUFF_STRING_A,*_FUNC_COMPRESS_2_HUFF_LONG_Z); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35283);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_NBITS=((int32*)(__ARRAY_LONG_HUFF_MASK_BITS[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_V)-__ARRAY_LONG_HUFF_MASK_BITS[4],__ARRAY_LONG_HUFF_MASK_BITS[5])]; if(!qbevent)break;evnt(35284);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_NBYTES=(*_FUNC_COMPRESS_2_HUFF_LONG_BITPOS+*_FUNC_COMPRESS_2_HUFF_LONG_NBITS+ 7 )/ 8 ; if(!qbevent)break;evnt(35285);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_O=(*_FUNC_COMPRESS_2_HUFF_LONG_V* 256 )+(*_FUNC_COMPRESS_2_HUFF_LONG_BITPOS* 32 ); if(!qbevent)break;evnt(35286);}while(r); S_38917:; fornext_value4442= 0 ; fornext_finalvalue4442=*_FUNC_COMPRESS_2_HUFF_LONG_NBYTES- 1 ; fornext_step4442= 1 ; if (fornext_step4442<0) fornext_step_negative4442=1; else fornext_step_negative4442=0; if (new_error) goto fornext_error4442; goto fornext_entrylabel4442; while(1){ fornext_value4442=fornext_step4442+(*_FUNC_COMPRESS_2_HUFF_LONG_I); fornext_entrylabel4442: *_FUNC_COMPRESS_2_HUFF_LONG_I=fornext_value4442; if (fornext_step_negative4442){ if (fornext_value4442fornext_finalvalue4442) break; } fornext_error4442:; if(qbevent){evnt(35287);if(r)goto S_38917;} do{ tqbs=_FUNC_COMPRESS_2_HUFF_STRING_B; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_2_HUFF_LONG_X; if (!new_error){ tmp_long=qbs_asc(_FUNC_COMPRESS_2_HUFF_STRING_B,*_FUNC_COMPRESS_2_HUFF_LONG_X)|((uint8*)(__ARRAY_UBYTE_HUFF_MASK[0]))[array_check((*_FUNC_COMPRESS_2_HUFF_LONG_O+*_FUNC_COMPRESS_2_HUFF_LONG_I)-__ARRAY_UBYTE_HUFF_MASK[4],__ARRAY_UBYTE_HUFF_MASK[5])]; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35288);}while(r); do{ *_FUNC_COMPRESS_2_HUFF_LONG_X=*_FUNC_COMPRESS_2_HUFF_LONG_X+ 1 ; if(!qbevent)break;evnt(35289);}while(r); } fornext_exit_4441:; do{ *_FUNC_COMPRESS_2_HUFF_LONG_BITPOS=(*_FUNC_COMPRESS_2_HUFF_LONG_BITPOS+*_FUNC_COMPRESS_2_HUFF_LONG_NBITS)& 7 ; if(!qbevent)break;evnt(35291);}while(r); S_38922:; if ((-(*_FUNC_COMPRESS_2_HUFF_LONG_BITPOS!= 0 ))||new_error){ if(qbevent){evnt(35292);if(r)goto S_38922;} do{ *_FUNC_COMPRESS_2_HUFF_LONG_X=*_FUNC_COMPRESS_2_HUFF_LONG_X- 1 ; if(!qbevent)break;evnt(35292);}while(r); } } fornext_exit_4438:; do{ qbs_set(_FUNC_COMPRESS_2_HUFF_STRING_COMPRESS_2_HUFF,_FUNC_COMPRESS_2_HUFF_STRING_B); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35295);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free148.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_COMPRESS_2_HUFF_STRING_COMPRESS_2_HUFF);return _FUNC_COMPRESS_2_HUFF_STRING_COMPRESS_2_HUFF; } qbs* FUNC_DECOMPRESS_1_RLE(qbs*_FUNC_DECOMPRESS_1_RLE_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data149.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_38927:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A)!= 1 )))||new_error){ if(qbevent){evnt(35299);if(r)goto S_38927;} do{ qbg_screen( 0 ,NULL, 0 , 0 ,NULL,13); if(!qbevent)break;evnt(35299);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("decompress_1_rle: invalid type",30)); if (new_error) goto skip4444; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4444: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35299);}while(r); do{ sub_end(); if(!qbevent)break;evnt(35299);}while(r); } do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I= 2 ; if(!qbevent)break;evnt(35302);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_SIZ= 0 ; if(!qbevent)break;evnt(35303);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35304);}while(r); S_38935:; while((*_FUNC_DECOMPRESS_1_RLE_LONG_X)||new_error){ if(qbevent){evnt(35305);if(r)goto S_38935;} S_38936:; if ((*_FUNC_DECOMPRESS_1_RLE_LONG_X& 128 )||new_error){ if(qbevent){evnt(35306);if(r)goto S_38936;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35307);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35307);}while(r); S_38939:; if ((*_FUNC_DECOMPRESS_1_RLE_LONG_X& 128 )||new_error){ if(qbevent){evnt(35308);if(r)goto S_38939;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35309);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35309);}while(r); S_38942:; if ((*_FUNC_DECOMPRESS_1_RLE_LONG_X2& 128 )||new_error){ if(qbevent){evnt(35310);if(r)goto S_38942;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35311);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35311);}while(r); } } } do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 2 ; if(!qbevent)break;evnt(35315);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35316);}while(r); S_38950:; if ((-(*_FUNC_DECOMPRESS_1_RLE_LONG_S== 255 ))||new_error){ if(qbevent){evnt(35317);if(r)goto S_38950;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35318);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35318);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35319);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S2=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35319);}while(r); S_38955:; if (((-(*_FUNC_DECOMPRESS_1_RLE_LONG_S== 255 ))&(-(*_FUNC_DECOMPRESS_1_RLE_LONG_S2== 255 )))||new_error){ if(qbevent){evnt(35320);if(r)goto S_38955;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35321);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 3 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35322);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=(*_FUNC_DECOMPRESS_1_RLE_LONG_S* 256 )+(qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35323);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=(*_FUNC_DECOMPRESS_1_RLE_LONG_S* 256 )+(qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35324);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=(*_FUNC_DECOMPRESS_1_RLE_LONG_S* 256 )+(qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35325);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 3 ; if(!qbevent)break;evnt(35326);}while(r); }else{ do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=*_FUNC_DECOMPRESS_1_RLE_LONG_S+(*_FUNC_DECOMPRESS_1_RLE_LONG_S2* 256 ); if(!qbevent)break;evnt(35328);}while(r); } } do{ *_FUNC_DECOMPRESS_1_RLE_LONG_SIZ=*_FUNC_DECOMPRESS_1_RLE_LONG_SIZ+*_FUNC_DECOMPRESS_1_RLE_LONG_S+ 4 ; if(!qbevent)break;evnt(35331);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35332);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35332);}while(r); } dl_exit_4445:; do{ *_FUNC_DECOMPRESS_1_RLE_LONG_I=*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ; if(!qbevent)break;evnt(35334);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_SIZ=*_FUNC_DECOMPRESS_1_RLE_LONG_SIZ+(_FUNC_DECOMPRESS_1_RLE_STRING_A->len-*_FUNC_DECOMPRESS_1_RLE_LONG_I+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35335);}while(r); do{ qbs_set(_FUNC_DECOMPRESS_1_RLE_STRING_B,func_space(*_FUNC_DECOMPRESS_1_RLE_LONG_SIZ)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35336);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H= 1 ; if(!qbevent)break;evnt(35339);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_P= 1 ; if(!qbevent)break;evnt(35340);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_INS=*_FUNC_DECOMPRESS_1_RLE_LONG_I; if(!qbevent)break;evnt(35341);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_N=_FUNC_DECOMPRESS_1_RLE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35342);}while(r); LABEL_UNRLE_GETNEXT:; if(qbevent){evnt(35344);r=0;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35345);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35345);}while(r); S_38979:; if ((*_FUNC_DECOMPRESS_1_RLE_LONG_X& 128 )||new_error){ if(qbevent){evnt(35346);if(r)goto S_38979;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35347);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X2=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35347);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=((*_FUNC_DECOMPRESS_1_RLE_LONG_X& 127 ))+((*_FUNC_DECOMPRESS_1_RLE_LONG_X2& 127 )* 128 ); if(!qbevent)break;evnt(35347);}while(r); S_38983:; if ((*_FUNC_DECOMPRESS_1_RLE_LONG_X2& 128 )||new_error){ if(qbevent){evnt(35348);if(r)goto S_38983;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35349);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X2=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35349);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=*_FUNC_DECOMPRESS_1_RLE_LONG_X+((*_FUNC_DECOMPRESS_1_RLE_LONG_X2& 127 )* 16384 ); if(!qbevent)break;evnt(35349);}while(r); S_38987:; if ((*_FUNC_DECOMPRESS_1_RLE_LONG_X2& 128 )||new_error){ if(qbevent){evnt(35350);if(r)goto S_38987;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35351);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X2=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35351);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_X=*_FUNC_DECOMPRESS_1_RLE_LONG_X+((*_FUNC_DECOMPRESS_1_RLE_LONG_X2& 127 )* 2097152 ); if(!qbevent)break;evnt(35351);}while(r); } } } S_38994:; if ((-(*_FUNC_DECOMPRESS_1_RLE_LONG_X== 0 ))||new_error){ if(qbevent){evnt(35355);if(r)goto S_38994;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_INS= 2147483647 ; if(!qbevent)break;evnt(35356);}while(r); }else{ do{ *_FUNC_DECOMPRESS_1_RLE_LONG_INS=*_FUNC_DECOMPRESS_1_RLE_LONG_INS+*_FUNC_DECOMPRESS_1_RLE_LONG_X- 1 ; if(!qbevent)break;evnt(35358);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35359);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_V=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35359);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35360);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35361);}while(r); S_39002:; if ((-(*_FUNC_DECOMPRESS_1_RLE_LONG_S== 255 ))||new_error){ if(qbevent){evnt(35362);if(r)goto S_39002;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35363);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35363);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35364);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S2=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35364);}while(r); S_39007:; if (((-(*_FUNC_DECOMPRESS_1_RLE_LONG_S== 255 ))&(-(*_FUNC_DECOMPRESS_1_RLE_LONG_S2== 255 )))||new_error){ if(qbevent){evnt(35365);if(r)goto S_39007;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 ; if(!qbevent)break;evnt(35366);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 3 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35367);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=(*_FUNC_DECOMPRESS_1_RLE_LONG_S* 256 )+(qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35368);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=(*_FUNC_DECOMPRESS_1_RLE_LONG_S* 256 )+(qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35369);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=(*_FUNC_DECOMPRESS_1_RLE_LONG_S* 256 )+(qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_H)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35370);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_H=*_FUNC_DECOMPRESS_1_RLE_LONG_H+ 3 ; if(!qbevent)break;evnt(35371);}while(r); }else{ do{ *_FUNC_DECOMPRESS_1_RLE_LONG_S=*_FUNC_DECOMPRESS_1_RLE_LONG_S+(*_FUNC_DECOMPRESS_1_RLE_LONG_S2* 256 ); if(!qbevent)break;evnt(35373);}while(r); } } do{ *_FUNC_DECOMPRESS_1_RLE_LONG_C=*_FUNC_DECOMPRESS_1_RLE_LONG_S+ 4 ; if(!qbevent)break;evnt(35376);}while(r); } do{ *_FUNC_DECOMPRESS_1_RLE_LONG_N2=*_FUNC_DECOMPRESS_1_RLE_LONG_INS- 1 ; if(!qbevent)break;evnt(35379);}while(r); S_39021:; if ((-(*_FUNC_DECOMPRESS_1_RLE_LONG_N2>*_FUNC_DECOMPRESS_1_RLE_LONG_N))||new_error){ if(qbevent){evnt(35380);if(r)goto S_39021;} do{ *_FUNC_DECOMPRESS_1_RLE_LONG_N2=*_FUNC_DECOMPRESS_1_RLE_LONG_N; if(!qbevent)break;evnt(35380);}while(r); } S_39024:; fornext_value4449=*_FUNC_DECOMPRESS_1_RLE_LONG_I; fornext_finalvalue4449=*_FUNC_DECOMPRESS_1_RLE_LONG_N2; fornext_step4449= 1 ; if (fornext_step4449<0) fornext_step_negative4449=1; else fornext_step_negative4449=0; if (new_error) goto fornext_error4449; goto fornext_entrylabel4449; while(1){ fornext_value4449=fornext_step4449+(*_FUNC_DECOMPRESS_1_RLE_LONG_I); fornext_entrylabel4449: *_FUNC_DECOMPRESS_1_RLE_LONG_I=fornext_value4449; if (fornext_step_negative4449){ if (fornext_value4449fornext_finalvalue4449) break; } fornext_error4449:; if(qbevent){evnt(35381);if(r)goto S_39024;} do{ tqbs=_FUNC_DECOMPRESS_1_RLE_STRING_B; if (!new_error){ tmp_fileno=*_FUNC_DECOMPRESS_1_RLE_LONG_P; if (!new_error){ tmp_long=qbs_asc(_FUNC_DECOMPRESS_1_RLE_STRING_A,*_FUNC_DECOMPRESS_1_RLE_LONG_I); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35382);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_P=*_FUNC_DECOMPRESS_1_RLE_LONG_P+ 1 ; if(!qbevent)break;evnt(35382);}while(r); } fornext_exit_4448:; S_39028:; if ((-(*_FUNC_DECOMPRESS_1_RLE_LONG_INS!= 2147483647 ))||new_error){ if(qbevent){evnt(35384);if(r)goto S_39028;} S_39029:; fornext_value4451= 1 ; fornext_finalvalue4451=*_FUNC_DECOMPRESS_1_RLE_LONG_C; fornext_step4451= 1 ; if (fornext_step4451<0) fornext_step_negative4451=1; else fornext_step_negative4451=0; if (new_error) goto fornext_error4451; goto fornext_entrylabel4451; while(1){ fornext_value4451=fornext_step4451+(*_FUNC_DECOMPRESS_1_RLE_LONG_X); fornext_entrylabel4451: *_FUNC_DECOMPRESS_1_RLE_LONG_X=fornext_value4451; if (fornext_step_negative4451){ if (fornext_value4451fornext_finalvalue4451) break; } fornext_error4451:; if(qbevent){evnt(35385);if(r)goto S_39029;} do{ tqbs=_FUNC_DECOMPRESS_1_RLE_STRING_B; if (!new_error){ tmp_fileno=*_FUNC_DECOMPRESS_1_RLE_LONG_P; if (!new_error){ tmp_long=*_FUNC_DECOMPRESS_1_RLE_LONG_V; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35386);}while(r); do{ *_FUNC_DECOMPRESS_1_RLE_LONG_P=*_FUNC_DECOMPRESS_1_RLE_LONG_P+ 1 ; if(!qbevent)break;evnt(35386);}while(r); } fornext_exit_4450:; do{ goto LABEL_UNRLE_GETNEXT; if(!qbevent)break;evnt(35388);}while(r); } do{ qbs_set(_FUNC_DECOMPRESS_1_RLE_STRING_DECOMPRESS_1_RLE,_FUNC_DECOMPRESS_1_RLE_STRING_B); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35391);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free149.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_DECOMPRESS_1_RLE_STRING_DECOMPRESS_1_RLE);return _FUNC_DECOMPRESS_1_RLE_STRING_DECOMPRESS_1_RLE; } qbs* FUNC_COMPRESS_1_RLE(qbs*_FUNC_COMPRESS_1_RLE_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data150.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_COMPRESS_1_RLE_LONG_N=_FUNC_COMPRESS_1_RLE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35399);}while(r); do{ qbs_set(_FUNC_COMPRESS_1_RLE_STRING_H,func_space(_FUNC_COMPRESS_1_RLE_STRING_A->len+ 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35400);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_long= 1 ; if (!new_error){ if (tqbs->len){tqbs->chr[0]=tmp_long;}else{error(5);} }} if(!qbevent)break;evnt(35401);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP= 2 ; if(!qbevent)break;evnt(35402);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_I= 1 ; if(!qbevent)break;evnt(35403);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_P= 1 ; if(!qbevent)break;evnt(35404);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_O= 1 ; if(!qbevent)break;evnt(35405);}while(r); S_39043:; do{ if(qbevent){evnt(35406);if(r)goto S_39043;} do{ *_FUNC_COMPRESS_1_RLE_LONG_V=qbs_asc(_FUNC_COMPRESS_1_RLE_STRING_A,*_FUNC_COMPRESS_1_RLE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35407);}while(r); S_39045:; fornext_value4457=*_FUNC_COMPRESS_1_RLE_LONG_I+ 1 ; fornext_finalvalue4457=*_FUNC_COMPRESS_1_RLE_LONG_N; fornext_step4457= 1 ; if (fornext_step4457<0) fornext_step_negative4457=1; else fornext_step_negative4457=0; if (new_error) goto fornext_error4457; goto fornext_entrylabel4457; while(1){ fornext_value4457=fornext_step4457+(*_FUNC_COMPRESS_1_RLE_LONG_I2); fornext_entrylabel4457: *_FUNC_COMPRESS_1_RLE_LONG_I2=fornext_value4457; if (fornext_step_negative4457){ if (fornext_value4457fornext_finalvalue4457) break; } fornext_error4457:; if(qbevent){evnt(35408);if(r)goto S_39045;} S_39046:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_COMPRESS_1_RLE_LONG_V!=qbs_asc(_FUNC_COMPRESS_1_RLE_STRING_A,*_FUNC_COMPRESS_1_RLE_LONG_I2))))||new_error){ if(qbevent){evnt(35409);if(r)goto S_39046;} do{ goto fornext_exit_4456; if(!qbevent)break;evnt(35409);}while(r); } } fornext_exit_4456:; do{ *_FUNC_COMPRESS_1_RLE_LONG_REPS=*_FUNC_COMPRESS_1_RLE_LONG_I2-*_FUNC_COMPRESS_1_RLE_LONG_I; if(!qbevent)break;evnt(35411);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_X=*_FUNC_COMPRESS_1_RLE_LONG_P-*_FUNC_COMPRESS_1_RLE_LONG_O+ 1 ; if(!qbevent)break;evnt(35413);}while(r); S_39052:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_X<= 127 ))||new_error){ if(qbevent){evnt(35415);if(r)goto S_39052;} S_39053:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_REPS< 4 ))||new_error){ if(qbevent){evnt(35416);if(r)goto S_39053;} do{ goto LABEL_NO_RLE; if(!qbevent)break;evnt(35416);}while(r); } do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_X; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35417);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35417);}while(r); S_39058:; }else{ if (-(*_FUNC_COMPRESS_1_RLE_LONG_X<= 16383 )){ if(qbevent){evnt(35418);if(r)goto S_39058;} S_39059:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_REPS< 5 ))||new_error){ if(qbevent){evnt(35419);if(r)goto S_39059;} do{ goto LABEL_NO_RLE; if(!qbevent)break;evnt(35419);}while(r); } do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=(*_FUNC_COMPRESS_1_RLE_LONG_X& 127 )+ 128 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35420);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_X=*_FUNC_COMPRESS_1_RLE_LONG_X/ 128 ; if(!qbevent)break;evnt(35420);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35420);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_X; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35421);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35421);}while(r); S_39067:; }else{ if (-(*_FUNC_COMPRESS_1_RLE_LONG_X<= 2097151 )){ if(qbevent){evnt(35422);if(r)goto S_39067;} S_39068:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_REPS< 6 ))||new_error){ if(qbevent){evnt(35423);if(r)goto S_39068;} do{ goto LABEL_NO_RLE; if(!qbevent)break;evnt(35423);}while(r); } do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=(*_FUNC_COMPRESS_1_RLE_LONG_X& 127 )+ 128 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35424);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_X=*_FUNC_COMPRESS_1_RLE_LONG_X/ 128 ; if(!qbevent)break;evnt(35424);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35424);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=(*_FUNC_COMPRESS_1_RLE_LONG_X& 127 )+ 128 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35425);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_X=*_FUNC_COMPRESS_1_RLE_LONG_X/ 128 ; if(!qbevent)break;evnt(35425);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35425);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_X; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35426);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35426);}while(r); }else{ S_39080:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_REPS< 7 ))||new_error){ if(qbevent){evnt(35428);if(r)goto S_39080;} do{ goto LABEL_NO_RLE; if(!qbevent)break;evnt(35428);}while(r); } do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=(*_FUNC_COMPRESS_1_RLE_LONG_X& 127 )+ 128 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35429);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_X=*_FUNC_COMPRESS_1_RLE_LONG_X/ 128 ; if(!qbevent)break;evnt(35429);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35429);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=(*_FUNC_COMPRESS_1_RLE_LONG_X& 127 )+ 128 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35430);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_X=*_FUNC_COMPRESS_1_RLE_LONG_X/ 128 ; if(!qbevent)break;evnt(35430);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35430);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=(*_FUNC_COMPRESS_1_RLE_LONG_X& 127 )+ 128 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35431);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_X=*_FUNC_COMPRESS_1_RLE_LONG_X/ 128 ; if(!qbevent)break;evnt(35431);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35431);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_X; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35432);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35432);}while(r); } } } do{ *_FUNC_COMPRESS_1_RLE_LONG_O=*_FUNC_COMPRESS_1_RLE_LONG_P; if(!qbevent)break;evnt(35434);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_V; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35437);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35437);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_REPS=*_FUNC_COMPRESS_1_RLE_LONG_REPS- 4 ; if(!qbevent)break;evnt(35439);}while(r); S_39099:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_REPS>= 255 ))||new_error){ if(qbevent){evnt(35440);if(r)goto S_39099;} do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long= 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35441);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35441);}while(r); S_39102:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_REPS>= 65535 ))||new_error){ if(qbevent){evnt(35442);if(r)goto S_39102;} do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long= 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35443);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35443);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long= 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35444);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35444);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_REPS& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35445);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_REPS=*_FUNC_COMPRESS_1_RLE_LONG_REPS/ 256 ; if(!qbevent)break;evnt(35445);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35445);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_REPS& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35446);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_REPS=*_FUNC_COMPRESS_1_RLE_LONG_REPS/ 256 ; if(!qbevent)break;evnt(35446);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35446);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_REPS& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35447);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_REPS=*_FUNC_COMPRESS_1_RLE_LONG_REPS/ 256 ; if(!qbevent)break;evnt(35447);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35447);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_REPS; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35448);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35448);}while(r); }else{ do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_REPS& 255 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35450);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_REPS=*_FUNC_COMPRESS_1_RLE_LONG_REPS/ 256 ; if(!qbevent)break;evnt(35450);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35450);}while(r); do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_REPS; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35451);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35451);}while(r); } }else{ do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long=*_FUNC_COMPRESS_1_RLE_LONG_REPS; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35454);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35454);}while(r); } do{ goto LABEL_RLE_APPLIED; if(!qbevent)break;evnt(35458);}while(r); LABEL_NO_RLE:; if(qbevent){evnt(35460);r=0;} S_39130:; if ((-(*_FUNC_COMPRESS_1_RLE_LONG_I!=*_FUNC_COMPRESS_1_RLE_LONG_P))||new_error){ if(qbevent){evnt(35461);if(r)goto S_39130;} S_39131:; fornext_value4459=*_FUNC_COMPRESS_1_RLE_LONG_I; fornext_finalvalue4459=*_FUNC_COMPRESS_1_RLE_LONG_I2- 1 ; fornext_step4459= 1 ; if (fornext_step4459<0) fornext_step_negative4459=1; else fornext_step_negative4459=0; if (new_error) goto fornext_error4459; goto fornext_entrylabel4459; while(1){ fornext_value4459=fornext_step4459+(*_FUNC_COMPRESS_1_RLE_LONG_I3); fornext_entrylabel4459: *_FUNC_COMPRESS_1_RLE_LONG_I3=fornext_value4459; if (fornext_step_negative4459){ if (fornext_value4459fornext_finalvalue4459) break; } fornext_error4459:; if(qbevent){evnt(35462);if(r)goto S_39131;} do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_A; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_P; if (!new_error){ tmp_long=qbs_asc(_FUNC_COMPRESS_1_RLE_STRING_A,*_FUNC_COMPRESS_1_RLE_LONG_I3); if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35463);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_P=*_FUNC_COMPRESS_1_RLE_LONG_P+ 1 ; if(!qbevent)break;evnt(35464);}while(r); } fornext_exit_4458:; }else{ do{ *_FUNC_COMPRESS_1_RLE_LONG_P=*_FUNC_COMPRESS_1_RLE_LONG_P+(*_FUNC_COMPRESS_1_RLE_LONG_I2-*_FUNC_COMPRESS_1_RLE_LONG_I); if(!qbevent)break;evnt(35467);}while(r); } LABEL_RLE_APPLIED:; if(qbevent){evnt(35470);r=0;} do{ *_FUNC_COMPRESS_1_RLE_LONG_I=*_FUNC_COMPRESS_1_RLE_LONG_I2; if(!qbevent)break;evnt(35471);}while(r); S_39139:; }while((!(-(*_FUNC_COMPRESS_1_RLE_LONG_I>*_FUNC_COMPRESS_1_RLE_LONG_N)))&&(!new_error)); dl_exit_4455:; if(qbevent){evnt(35473);if(r)goto S_39139;} do{ tqbs=_FUNC_COMPRESS_1_RLE_STRING_H; if (!new_error){ tmp_fileno=*_FUNC_COMPRESS_1_RLE_LONG_HP; if (!new_error){ tmp_long= 0 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(35476);}while(r); do{ *_FUNC_COMPRESS_1_RLE_LONG_HP=*_FUNC_COMPRESS_1_RLE_LONG_HP+ 1 ; if(!qbevent)break;evnt(35476);}while(r); do{ qbs_set(_FUNC_COMPRESS_1_RLE_STRING_COMPRESS_1_RLE,qbs_add(qbs_left(_FUNC_COMPRESS_1_RLE_STRING_H,*_FUNC_COMPRESS_1_RLE_LONG_HP- 1 ),qbs_left(_FUNC_COMPRESS_1_RLE_STRING_A,*_FUNC_COMPRESS_1_RLE_LONG_P- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35478);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free150.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_COMPRESS_1_RLE_STRING_COMPRESS_1_RLE);return _FUNC_COMPRESS_1_RLE_STRING_COMPRESS_1_RLE; } qbs* FUNC_COMPRESS(qbs*_FUNC_COMPRESS_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data151.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_COMPRESS_STRING_A,qbs_add(func_chr( 0 ),_FUNC_COMPRESS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35483);}while(r); do{ qbs_set(_FUNC_COMPRESS_STRING_A,FUNC_COMPRESS_1_RLE(_FUNC_COMPRESS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35484);}while(r); do{ qbs_set(_FUNC_COMPRESS_STRING_A,FUNC_COMPRESS_2_HUFF(_FUNC_COMPRESS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35485);}while(r); do{ qbs_set(_FUNC_COMPRESS_STRING_COMPRESS,_FUNC_COMPRESS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35486);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free151.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_COMPRESS_STRING_COMPRESS);return _FUNC_COMPRESS_STRING_COMPRESS; } qbs* FUNC_DECOMPRESS(qbs*_FUNC_DECOMPRESS_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data152.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_DECOMPRESS_LONG_X=qbs_asc(_FUNC_DECOMPRESS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35490);}while(r); S_39148:; while((*_FUNC_DECOMPRESS_LONG_X)||new_error){ if(qbevent){evnt(35491);if(r)goto S_39148;} S_39149:; if ((-(*_FUNC_DECOMPRESS_LONG_X== 1 ))||new_error){ if(qbevent){evnt(35492);if(r)goto S_39149;} do{ qbs_set(_FUNC_DECOMPRESS_STRING_A,FUNC_DECOMPRESS_1_RLE(_FUNC_DECOMPRESS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35492);}while(r); } S_39152:; if ((-(*_FUNC_DECOMPRESS_LONG_X== 2 ))||new_error){ if(qbevent){evnt(35493);if(r)goto S_39152;} do{ qbs_set(_FUNC_DECOMPRESS_STRING_A,FUNC_DECOMPRESS_2_HUFF(_FUNC_DECOMPRESS_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35493);}while(r); } do{ *_FUNC_DECOMPRESS_LONG_X=qbs_asc(_FUNC_DECOMPRESS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35494);}while(r); } dl_exit_4462:; do{ qbs_set(_FUNC_DECOMPRESS_STRING_A,qbs_right(_FUNC_DECOMPRESS_STRING_A,_FUNC_DECOMPRESS_STRING_A->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35496);}while(r); do{ qbs_set(_FUNC_DECOMPRESS_STRING_DECOMPRESS,_FUNC_DECOMPRESS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35497);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free152.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_DECOMPRESS_STRING_DECOMPRESS);return _FUNC_DECOMPRESS_STRING_DECOMPRESS; } int32 FUNC_DOWNLOAD(qbs*_FUNC_DOWNLOAD_STRING_URL,qbs*_FUNC_DOWNLOAD_STRING_FILE){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data153.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Downloading ",12),func_chr( 34 )),_FUNC_DOWNLOAD_STRING_URL),func_chr( 34 ))); if (new_error) goto skip4466; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4466: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35502);}while(r); do{ *_FUNC_DOWNLOAD_LONG_RETRY= 0 ; if(!qbevent)break;evnt(35504);}while(r); LABEL_RETRY:; if(qbevent){evnt(35506);r=0;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("[ ]",52)); if (new_error) goto skip4467; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4467: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35507);}while(r); do{ qbg_sub_locate(func_csrlin(), 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(35508);}while(r); do{ sub__delay( 0.25E+0 ); if(!qbevent)break;evnt(35510);}while(r); do{ qbs_set(_FUNC_DOWNLOAD_STRING_URL2,_FUNC_DOWNLOAD_STRING_URL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35512);}while(r); do{ *_FUNC_DOWNLOAD_LONG_X=func_instr(NULL,_FUNC_DOWNLOAD_STRING_URL2,qbs_new_txt_len("/",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35513);}while(r); S_39166:; if ((*_FUNC_DOWNLOAD_LONG_X)||new_error){ if(qbevent){evnt(35514);if(r)goto S_39166;} do{ qbs_set(_FUNC_DOWNLOAD_STRING_URL2,qbs_left(_FUNC_DOWNLOAD_STRING_URL,*_FUNC_DOWNLOAD_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35514);}while(r); } do{ *_FUNC_DOWNLOAD_LONG_C=func__openclient(qbs_add(qbs_new_txt_len("TCP/IP:80:",10),_FUNC_DOWNLOAD_STRING_URL2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35515);}while(r); S_39170:; if ((-(*_FUNC_DOWNLOAD_LONG_C== 0 ))||new_error){ if(qbevent){evnt(35516);if(r)goto S_39170;} do{ goto exit_subfunc; if(!qbevent)break;evnt(35517);}while(r); } do{ qbs_set(_FUNC_DOWNLOAD_STRING_E,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35520);}while(r); do{ qbs_set(_FUNC_DOWNLOAD_STRING_URL3,qbs_right(_FUNC_DOWNLOAD_STRING_URL,_FUNC_DOWNLOAD_STRING_URL->len-*_FUNC_DOWNLOAD_LONG_X+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35522);}while(r); do{ qbs_set(_FUNC_DOWNLOAD_STRING_X,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("GET ",4),_FUNC_DOWNLOAD_STRING_URL3),qbs_new_txt_len(" HTTP/1.1",9)),_FUNC_DOWNLOAD_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35523);}while(r); do{ qbs_set(_FUNC_DOWNLOAD_STRING_X,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_DOWNLOAD_STRING_X,qbs_new_txt_len("Host: ",6)),_FUNC_DOWNLOAD_STRING_URL2),_FUNC_DOWNLOAD_STRING_E),_FUNC_DOWNLOAD_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35524);}while(r); do{ sub_put2(*_FUNC_DOWNLOAD_LONG_C,NULL,byte_element((uint64)_FUNC_DOWNLOAD_STRING_X->chr,_FUNC_DOWNLOAD_STRING_X->len,byte_element_4469),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35525);}while(r); do{ *_FUNC_DOWNLOAD_DOUBLE_LASTTIME=func_timer( 0.001E+0 ,1); if(!qbevent)break;evnt(35527);}while(r); do{ *_FUNC_DOWNLOAD_LONG_CANCELMESS= 0 ; if(!qbevent)break;evnt(35528);}while(r); do{ *_FUNC_DOWNLOAD_LONG_DP= 0 ; if(!qbevent)break;evnt(35529);}while(r); do{ *_FUNC_DOWNLOAD_LONG_DP2= 0 ; if(!qbevent)break;evnt(35530);}while(r); do{ qbs_set(_FUNC_DOWNLOAD_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35531);}while(r); do{ *_FUNC_DOWNLOAD_LONG_L= 0 ; if(!qbevent)break;evnt(35532);}while(r); S_39184:; do{ if(qbevent){evnt(35534);if(r)goto S_39184;} do{ sub__delay( 0.1E+0 ); if(!qbevent)break;evnt(35536);}while(r); do{ sub_get2(*_FUNC_DOWNLOAD_LONG_C,NULL,_FUNC_DOWNLOAD_STRING_A2,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35538);}while(r); do{ qbs_set(_FUNC_DOWNLOAD_STRING_A,qbs_add(_FUNC_DOWNLOAD_STRING_A,_FUNC_DOWNLOAD_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35539);}while(r); S_39188:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_DOWNLOAD_STRING_A2->len))||new_error){ if(qbevent){evnt(35541);if(r)goto S_39188;} do{ *_FUNC_DOWNLOAD_DOUBLE_LASTTIME=func_timer( 0.001E+0 ,1); if(!qbevent)break;evnt(35541);}while(r); } S_39191:; if ((-(((float)((func_timer( 0.001E+0 ,1))))>((float)((*_FUNC_DOWNLOAD_DOUBLE_LASTTIME+ 5 )))))||new_error){ if(qbevent){evnt(35543);if(r)goto S_39191;} S_39192:; if ((-(*_FUNC_DOWNLOAD_LONG_RETRY< 10 ))||new_error){ if(qbevent){evnt(35544);if(r)goto S_39192;} do{ *_FUNC_DOWNLOAD_LONG_RETRY=*_FUNC_DOWNLOAD_LONG_RETRY+ 1 ; if(!qbevent)break;evnt(35545);}while(r); do{ sub_close(*_FUNC_DOWNLOAD_LONG_C,1); if(!qbevent)break;evnt(35546);}while(r); do{ qbs_print(nothingstring,1); skip4472: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35547);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("Retry attempt",13),qbs_str((int32)(*_FUNC_DOWNLOAD_LONG_RETRY))),qbs_new_txt_len("/10",3))); if (new_error) goto skip4473; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4473: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35548);}while(r); do{ goto LABEL_RETRY; if(!qbevent)break;evnt(35549);}while(r); } } S_39200:; if ((-(((float)((func_timer( 0.001E+0 ,1))))>((float)((*_FUNC_DOWNLOAD_DOUBLE_LASTTIME+ 20 )))))||new_error){ if(qbevent){evnt(35553);if(r)goto S_39200;} S_39201:; if ((-(*_FUNC_DOWNLOAD_LONG_CANCELMESS== 0 ))||new_error){ if(qbevent){evnt(35554);if(r)goto S_39201;} do{ *_FUNC_DOWNLOAD_LONG_CANCELMESS= 1 ; if(!qbevent)break;evnt(35555);}while(r); do{ *_FUNC_DOWNLOAD_LONG_CL=func_csrlin(); if(!qbevent)break;evnt(35556);}while(r); do{ *_FUNC_DOWNLOAD_LONG_CP=func_pos( 0 ); if(!qbevent)break;evnt(35557);}while(r); do{ qbg_sub_locate( 25 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(35558);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Download may still be active! To abort this download press the ESC key.",71)); if (new_error) goto skip4474; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4474: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35559);}while(r); do{ qbg_sub_locate(*_FUNC_DOWNLOAD_LONG_CL,*_FUNC_DOWNLOAD_LONG_CP,NULL,NULL,NULL,3); if(!qbevent)break;evnt(35560);}while(r); S_39208:; while((!(qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_inkey(),qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(35561);if(r)goto S_39208;} } dl_exit_4475:; } } S_39212:; if ((-(*_FUNC_DOWNLOAD_LONG_CANCELMESS== 1 ))||new_error){ if(qbevent){evnt(35565);if(r)goto S_39212;} S_39213:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_inkey(),func_chr( 27 ))))||new_error){ if(qbevent){evnt(35566);if(r)goto S_39213;} do{ qbs_print(nothingstring,1); skip4476: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35567);}while(r); do{ sub_close(*_FUNC_DOWNLOAD_LONG_C,1); if(!qbevent)break;evnt(35568);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(35569);}while(r); } } S_39219:; if ((*_FUNC_DOWNLOAD_LONG_L)||new_error){ if(qbevent){evnt(35573);if(r)goto S_39219;} S_39220:; if ((-(*_FUNC_DOWNLOAD_LONG_I3!= 0 ))||new_error){ if(qbevent){evnt(35574);if(r)goto S_39220;} do{ *_FUNC_DOWNLOAD_LONG_DP=qbr((_FUNC_DOWNLOAD_STRING_A->len-*_FUNC_DOWNLOAD_LONG_I3)/ ((long double)(*_FUNC_DOWNLOAD_LONG_L))* 50 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35575);}while(r); S_39222:; if ((-(*_FUNC_DOWNLOAD_LONG_DP> 50 ))||new_error){ if(qbevent){evnt(35576);if(r)goto S_39222;} do{ *_FUNC_DOWNLOAD_LONG_DP= 50 ; if(!qbevent)break;evnt(35576);}while(r); } S_39225:; if ((-(*_FUNC_DOWNLOAD_LONG_DP< 0 ))||new_error){ if(qbevent){evnt(35577);if(r)goto S_39225;} do{ *_FUNC_DOWNLOAD_LONG_DP= 0 ; if(!qbevent)break;evnt(35577);}while(r); } S_39228:; while((-(*_FUNC_DOWNLOAD_LONG_DP2<*_FUNC_DOWNLOAD_LONG_DP))||new_error){ if(qbevent){evnt(35578);if(r)goto S_39228;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\376",1)); if (new_error) goto skip4479; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4479: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35579);}while(r); do{ *_FUNC_DOWNLOAD_LONG_DP2=*_FUNC_DOWNLOAD_LONG_DP2+ 1 ; if(!qbevent)break;evnt(35580);}while(r); } dl_exit_4478:; } } do{ *_FUNC_DOWNLOAD_LONG_I=func_instr(NULL,_FUNC_DOWNLOAD_STRING_A,qbs_new_txt_len("Content-Length:",15),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35585);}while(r); S_39235:; if ((*_FUNC_DOWNLOAD_LONG_I)||new_error){ if(qbevent){evnt(35586);if(r)goto S_39235;} do{ *_FUNC_DOWNLOAD_LONG_I2=func_instr(*_FUNC_DOWNLOAD_LONG_I,_FUNC_DOWNLOAD_STRING_A,_FUNC_DOWNLOAD_STRING_E,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35587);}while(r); S_39237:; if ((*_FUNC_DOWNLOAD_LONG_I2)||new_error){ if(qbevent){evnt(35588);if(r)goto S_39237;} do{ *_FUNC_DOWNLOAD_LONG_L=qbr(func_val(func_mid(_FUNC_DOWNLOAD_STRING_A,*_FUNC_DOWNLOAD_LONG_I+ 15 ,*_FUNC_DOWNLOAD_LONG_I2-*_FUNC_DOWNLOAD_LONG_I- 14 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35589);}while(r); do{ *_FUNC_DOWNLOAD_LONG_I3=func_instr(*_FUNC_DOWNLOAD_LONG_I2,_FUNC_DOWNLOAD_STRING_A,qbs_add(_FUNC_DOWNLOAD_STRING_E,_FUNC_DOWNLOAD_STRING_E),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35590);}while(r); S_39240:; if ((*_FUNC_DOWNLOAD_LONG_I3)||new_error){ if(qbevent){evnt(35591);if(r)goto S_39240;} do{ *_FUNC_DOWNLOAD_LONG_I3=*_FUNC_DOWNLOAD_LONG_I3+ 4 ; if(!qbevent)break;evnt(35592);}while(r); S_39242:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_DOWNLOAD_STRING_A->len-*_FUNC_DOWNLOAD_LONG_I3+ 1 )==*_FUNC_DOWNLOAD_LONG_L)))||new_error){ if(qbevent){evnt(35593);if(r)goto S_39242;} do{ sub_close(*_FUNC_DOWNLOAD_LONG_C,1); if(!qbevent)break;evnt(35594);}while(r); do{ qbs_set(__STRING_DOWNLOAD_STRING,func_mid(_FUNC_DOWNLOAD_STRING_A,*_FUNC_DOWNLOAD_LONG_I3,*_FUNC_DOWNLOAD_LONG_L,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35595);}while(r); S_39245:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DOWNLOAD_STRING_FILE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(35596);if(r)goto S_39245;} do{ *_FUNC_DOWNLOAD_LONG_FH=func_freefile(); if(!qbevent)break;evnt(35597);}while(r); do{ sub_open(_FUNC_DOWNLOAD_STRING_FILE, 4 ,NULL,NULL,*_FUNC_DOWNLOAD_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35598);}while(r); do{ sub_close(*_FUNC_DOWNLOAD_LONG_FH,1); if(!qbevent)break;evnt(35598);}while(r); do{ sub_open(_FUNC_DOWNLOAD_STRING_FILE, 2 ,NULL,NULL,*_FUNC_DOWNLOAD_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35599);}while(r); do{ sub_put2(*_FUNC_DOWNLOAD_LONG_FH,NULL,byte_element((uint64)__STRING_DOWNLOAD_STRING->chr,__STRING_DOWNLOAD_STRING->len,byte_element_4481),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35600);}while(r); do{ sub_close(*_FUNC_DOWNLOAD_LONG_FH,1); if(!qbevent)break;evnt(35601);}while(r); } do{ *_FUNC_DOWNLOAD_LONG_DOWNLOAD= -1 ; if(!qbevent)break;evnt(35603);}while(r); S_39254:; while((-(*_FUNC_DOWNLOAD_LONG_DP2< 50 ))||new_error){ if(qbevent){evnt(35604);if(r)goto S_39254;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("\376",1)); if (new_error) goto skip4483; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4483: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35605);}while(r); do{ *_FUNC_DOWNLOAD_LONG_DP2=*_FUNC_DOWNLOAD_LONG_DP2+ 1 ; if(!qbevent)break;evnt(35606);}while(r); } dl_exit_4482:; do{ qbs_print(nothingstring,1); skip4484: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35608);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(35609);}while(r); } } } } }while(1); dl_exit_4470:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free153.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_DOWNLOAD_LONG_DOWNLOAD; } int64 FUNC_CHKSUM(qbs*_FUNC_CHKSUM_STRING_F){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data154.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(35618);}while(r); do{ sub_open(_FUNC_CHKSUM_STRING_F, 2 , 2 , 1 , 123 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35619);}while(r); do{ qbs_set(_FUNC_CHKSUM_STRING_A,func_space(func_lof( 123 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35620);}while(r); do{ sub_get2( 123 ,NULL,_FUNC_CHKSUM_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35621);}while(r); do{ sub_close( 123 ,1); if(!qbevent)break;evnt(35622);}while(r); do{ *_FUNC_CHKSUM_INTEGER64_C=_FUNC_CHKSUM_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35623);}while(r); do{ *_FUNC_CHKSUM_INTEGER64_B= 1 ; if(!qbevent)break;evnt(35624);}while(r); fornext_value4488= 1 ; fornext_finalvalue4488=_FUNC_CHKSUM_STRING_A->len; fornext_step4488= 1 ; if (fornext_step4488<0) fornext_step_negative4488=1; else fornext_step_negative4488=0; if (new_error) goto fornext_error4488; goto fornext_entrylabel4488; while(1){ fornext_value4488=fornext_step4488+(*_FUNC_CHKSUM_LONG_I); fornext_entrylabel4488: *_FUNC_CHKSUM_LONG_I=fornext_value4488; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4488){ if (fornext_value4488fornext_finalvalue4488) break; } fornext_error4488:; *_FUNC_CHKSUM_INTEGER64_C=*_FUNC_CHKSUM_INTEGER64_C+(*_FUNC_CHKSUM_INTEGER64_B*(qbs_asc(_FUNC_CHKSUM_STRING_A,*_FUNC_CHKSUM_LONG_I)+ 1 )); qbs_cleanup(qbs_tmp_base,0); *_FUNC_CHKSUM_INTEGER64_B=*_FUNC_CHKSUM_INTEGER64_B+*_FUNC_CHKSUM_INTEGER64_B; if ((-(*_FUNC_CHKSUM_INTEGER64_B== 281474976710656ll ))||new_error){ *_FUNC_CHKSUM_INTEGER64_B= 1 ; } } fornext_exit_4487:; do{ *_FUNC_CHKSUM_INTEGER64_CHKSUM=*_FUNC_CHKSUM_INTEGER64_C; if(!qbevent)break;evnt(35632);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free154.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_CHKSUM_INTEGER64_CHKSUM; } int32 FUNC_BEGINDOWNLOAD(qbs*_FUNC_BEGINDOWNLOAD_STRING_URL){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data155.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_39280:; fornext_value4492= 1 ; fornext_finalvalue4492=*__LONG_DLS; fornext_step4492= 1 ; if (fornext_step4492<0) fornext_step_negative4492=1; else fornext_step_negative4492=0; if (new_error) goto fornext_error4492; goto fornext_entrylabel4492; while(1){ fornext_value4492=fornext_step4492+(*_FUNC_BEGINDOWNLOAD_LONG_I); fornext_entrylabel4492: *_FUNC_BEGINDOWNLOAD_LONG_I=fornext_value4492; if (fornext_step_negative4492){ if (fornext_value4492fornext_finalvalue4492) break; } fornext_error4492:; if(qbevent){evnt(35636);if(r)goto S_39280;} S_39281:; if ((-(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*_FUNC_BEGINDOWNLOAD_LONG_I)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))== 0 ))||new_error){ if(qbevent){evnt(35637);if(r)goto S_39281;} do{ goto fornext_exit_4491; if(!qbevent)break;evnt(35637);}while(r); } } fornext_exit_4491:; S_39285:; if ((-(*_FUNC_BEGINDOWNLOAD_LONG_I>*__LONG_DLS))||new_error){ if(qbevent){evnt(35639);if(r)goto S_39285;} do{ *__LONG_DLS=*__LONG_DLS+ 1 ; if(!qbevent)break;evnt(35639);}while(r); } S_39288:; if ((-(*_FUNC_BEGINDOWNLOAD_LONG_I> 1 ))||new_error){ if(qbevent){evnt(35640);if(r)goto S_39288;} do{ qbg_screen( 0 ,NULL, 0 , 0 ,NULL,13); if(!qbevent)break;evnt(35640);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Too many active downloads!",26)); if (new_error) goto skip4493; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4493: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35640);}while(r); do{ sub_end(); if(!qbevent)break;evnt(35640);}while(r); } do{ qbs_set(_FUNC_BEGINDOWNLOAD_STRING_URL2,_FUNC_BEGINDOWNLOAD_STRING_URL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35641);}while(r); do{ *_FUNC_BEGINDOWNLOAD_LONG_X=func_instr(NULL,_FUNC_BEGINDOWNLOAD_STRING_URL2,qbs_new_txt_len("/",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35642);}while(r); S_39295:; if ((*_FUNC_BEGINDOWNLOAD_LONG_X)||new_error){ if(qbevent){evnt(35643);if(r)goto S_39295;} do{ qbs_set(_FUNC_BEGINDOWNLOAD_STRING_URL2,qbs_left(_FUNC_BEGINDOWNLOAD_STRING_URL,*_FUNC_BEGINDOWNLOAD_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35643);}while(r); } do{ *_FUNC_BEGINDOWNLOAD_LONG_H=func__openclient(qbs_add(qbs_new_txt_len("TCP/IP:80:",10),_FUNC_BEGINDOWNLOAD_STRING_URL2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35644);}while(r); S_39299:; if ((-(*_FUNC_BEGINDOWNLOAD_LONG_H== 0 ))||new_error){ if(qbevent){evnt(35645);if(r)goto S_39299;} do{ goto exit_subfunc; if(!qbevent)break;evnt(35645);}while(r); } do{ qbs_set(_FUNC_BEGINDOWNLOAD_STRING_E,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35646);}while(r); do{ qbs_set(_FUNC_BEGINDOWNLOAD_STRING_URL3,qbs_right(_FUNC_BEGINDOWNLOAD_STRING_URL,_FUNC_BEGINDOWNLOAD_STRING_URL->len-*_FUNC_BEGINDOWNLOAD_LONG_X+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35647);}while(r); do{ qbs_set(_FUNC_BEGINDOWNLOAD_STRING_X,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("GET ",4),_FUNC_BEGINDOWNLOAD_STRING_URL3),qbs_new_txt_len(" HTTP/1.1",9)),_FUNC_BEGINDOWNLOAD_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35648);}while(r); do{ qbs_set(_FUNC_BEGINDOWNLOAD_STRING_X,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_BEGINDOWNLOAD_STRING_X,qbs_new_txt_len("Host: ",6)),_FUNC_BEGINDOWNLOAD_STRING_URL2),_FUNC_BEGINDOWNLOAD_STRING_E),_FUNC_BEGINDOWNLOAD_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35649);}while(r); do{ sub_put2(*_FUNC_BEGINDOWNLOAD_LONG_H,NULL,byte_element((uint64)_FUNC_BEGINDOWNLOAD_STRING_X->chr,_FUNC_BEGINDOWNLOAD_STRING_X->len,byte_element_4495),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35650);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*_FUNC_BEGINDOWNLOAD_LONG_I)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))= 1 ; if(!qbevent)break;evnt(35651);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*_FUNC_BEGINDOWNLOAD_LONG_I)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8+4))=*_FUNC_BEGINDOWNLOAD_LONG_H; if(!qbevent)break;evnt(35652);}while(r); do{ tmp_long=array_check((*_FUNC_BEGINDOWNLOAD_LONG_I)-__ARRAY_STRING_DL_DATA[4],__ARRAY_STRING_DL_DATA[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DL_DATA[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(35653);}while(r); do{ *_FUNC_BEGINDOWNLOAD_LONG_BEGINDOWNLOAD=*_FUNC_BEGINDOWNLOAD_LONG_I; if(!qbevent)break;evnt(35654);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free155.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_BEGINDOWNLOAD_LONG_BEGINDOWNLOAD; } void SUB_CONTINUEDOWNLOADS(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data156.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_SUB_CONTINUEDOWNLOADS_STRING_E,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35658);}while(r); S_39312:; fornext_value4497= 1 ; fornext_finalvalue4497=*__LONG_DLS; fornext_step4497= 1 ; if (fornext_step4497<0) fornext_step_negative4497=1; else fornext_step_negative4497=0; if (new_error) goto fornext_error4497; goto fornext_entrylabel4497; while(1){ fornext_value4497=fornext_step4497+(*_SUB_CONTINUEDOWNLOADS_LONG_D); fornext_entrylabel4497: *_SUB_CONTINUEDOWNLOADS_LONG_D=fornext_value4497; if (fornext_step_negative4497){ if (fornext_value4497fornext_finalvalue4497) break; } fornext_error4497:; if(qbevent){evnt(35659);if(r)goto S_39312;} do{ *_SUB_CONTINUEDOWNLOADS_LONG_S=*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8)); if(!qbevent)break;evnt(35660);}while(r); S_39314:; if ((-(*_SUB_CONTINUEDOWNLOADS_LONG_S> 0 ))||new_error){ if(qbevent){evnt(35661);if(r)goto S_39314;} S_39315:; if(qbevent){evnt(35662);if(r)goto S_39315;} S_39316:; if (((*_SUB_CONTINUEDOWNLOADS_LONG_S==( 1 )))||new_error){ if(qbevent){evnt(35663);if(r)goto S_39316;} do{ sub_get2(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8+4)),NULL,_SUB_CONTINUEDOWNLOADS_STRING_A2,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35664);}while(r); do{ tmp_long=array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_STRING_DL_DATA[4],__ARRAY_STRING_DL_DATA[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DL_DATA[0]))[tmp_long])),qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_DL_DATA[0]))[array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_STRING_DL_DATA[4],__ARRAY_STRING_DL_DATA[5])])),_SUB_CONTINUEDOWNLOADS_STRING_A2)); if(!qbevent)break;evnt(35665);}while(r); do{ qbs_set(_SUB_CONTINUEDOWNLOADS_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_DL_DATA[0]))[array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_STRING_DL_DATA[4],__ARRAY_STRING_DL_DATA[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35666);}while(r); do{ *_SUB_CONTINUEDOWNLOADS_LONG_I=func_instr(NULL,_SUB_CONTINUEDOWNLOADS_STRING_A,qbs_new_txt_len("Content-Length:",15),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35667);}while(r); S_39321:; if ((*_SUB_CONTINUEDOWNLOADS_LONG_I)||new_error){ if(qbevent){evnt(35668);if(r)goto S_39321;} do{ *_SUB_CONTINUEDOWNLOADS_LONG_I2=func_instr(*_SUB_CONTINUEDOWNLOADS_LONG_I,_SUB_CONTINUEDOWNLOADS_STRING_A,_SUB_CONTINUEDOWNLOADS_STRING_E,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35669);}while(r); S_39323:; if ((*_SUB_CONTINUEDOWNLOADS_LONG_I2)||new_error){ if(qbevent){evnt(35670);if(r)goto S_39323;} do{ *_SUB_CONTINUEDOWNLOADS_LONG_L=qbr(func_val(func_mid(_SUB_CONTINUEDOWNLOADS_STRING_A,*_SUB_CONTINUEDOWNLOADS_LONG_I+ 15 ,*_SUB_CONTINUEDOWNLOADS_LONG_I2-*_SUB_CONTINUEDOWNLOADS_LONG_I- 14 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35671);}while(r); do{ *_SUB_CONTINUEDOWNLOADS_LONG_I3=func_instr(*_SUB_CONTINUEDOWNLOADS_LONG_I2,_SUB_CONTINUEDOWNLOADS_STRING_A,qbs_add(_SUB_CONTINUEDOWNLOADS_STRING_E,_SUB_CONTINUEDOWNLOADS_STRING_E),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35672);}while(r); S_39326:; if ((*_SUB_CONTINUEDOWNLOADS_LONG_I3)||new_error){ if(qbevent){evnt(35673);if(r)goto S_39326;} do{ *_SUB_CONTINUEDOWNLOADS_LONG_I3=*_SUB_CONTINUEDOWNLOADS_LONG_I3+ 4 ; if(!qbevent)break;evnt(35674);}while(r); S_39328:; if ((qbs_cleanup(qbs_tmp_base,-((_SUB_CONTINUEDOWNLOADS_STRING_A->len-*_SUB_CONTINUEDOWNLOADS_LONG_I3+ 1 )>=*_SUB_CONTINUEDOWNLOADS_LONG_L)))||new_error){ if(qbevent){evnt(35675);if(r)goto S_39328;} do{ tmp_long=array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_STRING_DL_DATA[4],__ARRAY_STRING_DL_DATA[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DL_DATA[0]))[tmp_long])),func_mid(_SUB_CONTINUEDOWNLOADS_STRING_A,*_SUB_CONTINUEDOWNLOADS_LONG_I3,*_SUB_CONTINUEDOWNLOADS_LONG_L,1)); if(!qbevent)break;evnt(35676);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))= 2 ; if(!qbevent)break;evnt(35677);}while(r); do{ sub_close(*(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*_SUB_CONTINUEDOWNLOADS_LONG_D)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8+4)),1); if(!qbevent)break;evnt(35678);}while(r); } } } } goto sc_4498_end; } sc_4498_end:; } } fornext_exit_4496:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free156.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_RIPPATH(qbs*_FUNC_RIPPATH_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data157.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_39340:; fornext_value4502=_FUNC_RIPPATH_STRING_A->len; fornext_finalvalue4502= 1 ; fornext_step4502= -1 ; if (fornext_step4502<0) fornext_step_negative4502=1; else fornext_step_negative4502=0; if (new_error) goto fornext_error4502; goto fornext_entrylabel4502; while(1){ fornext_value4502=fornext_step4502+(*_FUNC_RIPPATH_LONG_I); fornext_entrylabel4502: *_FUNC_RIPPATH_LONG_I=fornext_value4502; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4502){ if (fornext_value4502fornext_finalvalue4502) break; } fornext_error4502:; if(qbevent){evnt(35691);if(r)goto S_39340;} S_39341:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_RIPPATH_STRING_A,*_FUNC_RIPPATH_LONG_I)== 92 )))||new_error){ if(qbevent){evnt(35692);if(r)goto S_39341;} do{ qbs_set(_FUNC_RIPPATH_STRING_RIPPATH,qbs_left(_FUNC_RIPPATH_STRING_A,*_FUNC_RIPPATH_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35692);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(35692);}while(r); } } fornext_exit_4501:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free157.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_RIPPATH_STRING_RIPPATH);return _FUNC_RIPPATH_STRING_RIPPATH; } void SUB_UPDATE(int32*_SUB_UPDATE_LONG_HOW){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data158.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ error_goto_line=12; if(!qbevent)break;evnt(35702);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_DL_DATA[0]))[array_check((*__LONG_UPDATEHANDLE)-__ARRAY_STRING_DL_DATA[4],__ARRAY_STRING_DL_DATA[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35704);}while(r); do{ tmp_long=array_check((*__LONG_UPDATEHANDLE)-__ARRAY_STRING_DL_DATA[4],__ARRAY_STRING_DL_DATA[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_DL_DATA[0]))[tmp_long])),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(35704);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_DL[0])+((array_check((*__LONG_UPDATEHANDLE)-__ARRAY_UDT_DL[4],__ARRAY_UDT_DL[5]))*8))= 0 ; if(!qbevent)break;evnt(35704);}while(r); S_39350:; if ((-(*__LONG_TEMPFOLDERINDEX!= 1 ))||new_error){ if(qbevent){evnt(35707);if(r)goto S_39350;} do{ goto LABEL_PRETENDNOUPDATES; if(!qbevent)break;evnt(35707);}while(r); } S_39353:; fornext_value4505= 2 ; fornext_finalvalue4505= 4 ; fornext_step4505= 1 ; if (fornext_step4505<0) fornext_step_negative4505=1; else fornext_step_negative4505=0; if (new_error) goto fornext_error4505; goto fornext_entrylabel4505; while(1){ fornext_value4505=fornext_step4505+(*_SUB_UPDATE_LONG_I); fornext_entrylabel4505: *_SUB_UPDATE_LONG_I=fornext_value4505; if (fornext_step_negative4505){ if (fornext_value4505fornext_finalvalue4505) break; } fornext_error4505:; if(qbevent){evnt(35708);if(r)goto S_39353;} do{ sub_mkdir(qbs_add(qbs_new_txt_len(".\\internal\\temp",15),FUNC_STR2(_SUB_UPDATE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35709);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_T,qbs_add(qbs_add(qbs_new_txt_len(".\\internal\\temp",15),FUNC_STR2(_SUB_UPDATE_LONG_I)),qbs_new_txt_len("\\",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35710);}while(r); do{ *__LONG_UPDATE_ERROR= 0 ; if(!qbevent)break;evnt(35711);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_T,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 2 , 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35712);}while(r); S_39358:; if ((*__LONG_UPDATE_ERROR)||new_error){ if(qbevent){evnt(35713);if(r)goto S_39358;} do{ goto LABEL_PRETENDNOUPDATES; if(!qbevent)break;evnt(35713);}while(r); } do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35714);}while(r); } fornext_exit_4504:; do{ sub_mkdir(qbs_new_txt_len(".\\internal\\update",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35717);}while(r); do{ sub_mkdir(qbs_new_txt_len(".\\internal\\update\\downloads",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35718);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_UF,qbs_new_txt_len(".\\internal\\update\\",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35721);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("update.txt",10)), 2 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35722);}while(r); S_39367:; if ((func_lof( 1 ))||new_error){ if(qbevent){evnt(35723);if(r)goto S_39367;} do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35724);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("update.txt",10)), 3 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35725);}while(r); do{ tmp_fileno= 1 ; if (new_error) goto skip4506; sub_file_line_input_string(tmp_fileno,_SUB_UPDATE_STRING_A); if (new_error) goto skip4506; skip4506: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35725);}while(r); do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35725);}while(r); }else{ do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35727);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_A,qbs_new_txt_len("UNKNOWN",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35728);}while(r); } S_39376:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_UPDATE_STRING_A,_SUB_UPDATE_STRING_V)))||new_error){ if(qbevent){evnt(35730);if(r)goto S_39376;} LABEL_PRETENDNOUPDATES:; if(qbevent){evnt(35731);r=0;} S_39377:; if ((-(*_SUB_UPDATE_LONG_HOW== 1 ))||new_error){ if(qbevent){evnt(35732);if(r)goto S_39377;} do{ SUB_IDEMESSAGEBOX(qbs_new_txt_len("Update",6),qbs_new_txt_len("No new updates available.",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35733);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(35734);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(35734);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(35734);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(35734);}while(r); } do{ error_goto_line=13; if(!qbevent)break;evnt(35736);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(35737);}while(r); } S_39387:; if (((((-(*_SUB_UPDATE_LONG_HOW== 0 ))&(-(*__LONG_IDEUPDATEAUTO== 0 ))))|(-(*_SUB_UPDATE_LONG_HOW== 1 )))||new_error){ if(qbevent){evnt(35741);if(r)goto S_39387;} do{ qbs_set(_SUB_UPDATE_STRING_WHAT,FUNC_IDEYESNOBOX(qbs_new_txt_len("Update Available",16),qbs_new_txt_len("Download and apply new update?",30))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35742);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(35743);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(35743);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(35743);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(35743);}while(r); S_39393:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_UPDATE_STRING_WHAT,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(35744);if(r)goto S_39393;} do{ error_goto_line=14; if(!qbevent)break;evnt(35745);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(35746);}while(r); } } S_39398:; if (((-(*_SUB_UPDATE_LONG_HOW>= 2 ))&(-(*__LONG_IDEUPDATEAUTO== 0 )))||new_error){ if(qbevent){evnt(35750);if(r)goto S_39398;} S_39399:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(35751);if(r)goto S_39399;} do{ *__LONG_COMPFAILED= 0 ; if(!qbevent)break;evnt(35751);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Update available!",17)); if (new_error) goto skip4507; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4507: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35752);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Download and apply new update? (Y/N)",36)); if (new_error) goto skip4508; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4508: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35753);}while(r); S_39404:; do{ if(qbevent){evnt(35754);if(r)goto S_39404;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(35754);}while(r); do{ qbs_set(__STRING_K,qbs_ucase(qbs_inkey())); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35754);}while(r); S_39407:; }while((!(qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,qbs_new_txt_len("N",1)))|(qbs_equal(__STRING_K,qbs_new_txt_len("Y",1))))))&&(!new_error)); dl_exit_4509:; if(qbevent){evnt(35754);if(r)goto S_39407;} S_39408:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(35755);if(r)goto S_39408;} S_39409:; if ((-(*_SUB_UPDATE_LONG_HOW== 3 ))||new_error){ if(qbevent){evnt(35756);if(r)goto S_39409;} do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(35756);}while(r); } do{ error_goto_line=15; if(!qbevent)break;evnt(35757);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(35758);}while(r); } } S_39416:; if (((-(*_SUB_UPDATE_LONG_HOW== 3 ))&(-(*__LONG_IDEUPDATEAUTO== 1 )))||new_error){ if(qbevent){evnt(35762);if(r)goto S_39416;} do{ *_SUB_UPDATE_LONG_CL=func_csrlin(); if(!qbevent)break;evnt(35763);}while(r); do{ qbg_sub_locate( 25 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(35764);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Press any key to continue",25)); if (new_error) goto skip4510; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4510: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35764);}while(r); S_39420:; do{ if(qbevent){evnt(35765);if(r)goto S_39420;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(35765);}while(r); S_39422:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_inkey(),qbs_new_txt_len("",0)))))&&(!new_error)); dl_exit_4511:; if(qbevent){evnt(35765);if(r)goto S_39422;} do{ qbg_sub_locate( 25 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(35766);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" ",25)); if (new_error) goto skip4512; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4512: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35766);}while(r); do{ qbg_sub_locate(*_SUB_UPDATE_LONG_CL, 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(35767);}while(r); } S_39427:; if ((-(*_SUB_UPDATE_LONG_HOW< 2 ))||new_error){ if(qbevent){evnt(35770);if(r)goto S_39427;} do{ qbg_screen( 0 ,NULL, 0 , 0 ,NULL,13); if(!qbevent)break;evnt(35771);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(35772);}while(r); do{ sub_cls(NULL,NULL,0); if(!qbevent)break;evnt(35773);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Updating QB64",13)); if (new_error) goto skip4513; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4513: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35776);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("chksums.txt",11)), 2 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35779);}while(r); S_39434:; if ((func_lof( 1 ))||new_error){ if(qbevent){evnt(35780);if(r)goto S_39434;} do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35781);}while(r); do{ *_SUB_UPDATE_LONG_N= 0 ; if(!qbevent)break;evnt(35783);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("chksums.txt",11)), 3 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35784);}while(r); S_39438:; while((!(func_eof( 1 )))||new_error){ if(qbevent){evnt(35785);if(r)goto S_39438;} do{ tmp_fileno= 1 ; if (new_error) goto skip4515; sub_file_line_input_string(tmp_fileno,_SUB_UPDATE_STRING_A); if (new_error) goto skip4515; skip4515: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35786);}while(r); S_39440:; if ((qbs_cleanup(qbs_tmp_base,_SUB_UPDATE_STRING_A->len))||new_error){ if(qbevent){evnt(35786);if(r)goto S_39440;} do{ *_SUB_UPDATE_LONG_N=*_SUB_UPDATE_LONG_N+ 1 ; if(!qbevent)break;evnt(35786);}while(r); } } dl_exit_4514:; do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35788);}while(r); S_39445:; if ((-(*_SUB_UPDATE_LONG_N== 0 ))||new_error){ if(qbevent){evnt(35789);if(r)goto S_39445;} do{ *_SUB_UPDATE_LONG_N= 1 ; if(!qbevent)break;evnt(35789);}while(r); } do{ if (__ARRAY_STRING_CHKSUMS_NAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CHKSUMS_NAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_NAME[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_NAME[4]= 1 ; __ARRAY_STRING_CHKSUMS_NAME[5]=(*_SUB_UPDATE_LONG_N)-__ARRAY_STRING_CHKSUMS_NAME[4]+1; __ARRAY_STRING_CHKSUMS_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_NAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_VALSTR[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_VALSTR[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_VALSTR[4]= 1 ; __ARRAY_STRING_CHKSUMS_VALSTR[5]=(*_SUB_UPDATE_LONG_N)-__ARRAY_STRING_CHKSUMS_VALSTR[4]+1; __ARRAY_STRING_CHKSUMS_VALSTR[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_VALSTR[5]; if (tmp_longlen))||new_error){ if(qbevent){evnt(35797);if(r)goto S_39454;} do{ *_SUB_UPDATE_LONG_N=*_SUB_UPDATE_LONG_N+ 1 ; if(!qbevent)break;evnt(35798);}while(r); do{ *_SUB_UPDATE_LONG_I=func_instr(NULL,_SUB_UPDATE_STRING_A,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35799);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_A1,qbs_left(_SUB_UPDATE_STRING_A,*_SUB_UPDATE_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35800);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_A2,qbs_right(_SUB_UPDATE_STRING_A,_SUB_UPDATE_STRING_A->len-*_SUB_UPDATE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35800);}while(r); do{ tmp_long=array_check((*_SUB_UPDATE_LONG_N)-__ARRAY_STRING_CHKSUMS_NAME[4],__ARRAY_STRING_CHKSUMS_NAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_NAME[0]))[tmp_long])),_SUB_UPDATE_STRING_A1); if(!qbevent)break;evnt(35801);}while(r); do{ tmp_long=array_check((*_SUB_UPDATE_LONG_N)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[tmp_long])),_SUB_UPDATE_STRING_A2); if(!qbevent)break;evnt(35801);}while(r); } } dl_exit_4517:; do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35804);}while(r); }else{ do{ *_SUB_UPDATE_LONG_N= 0 ; if(!qbevent)break;evnt(35806);}while(r); do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35807);}while(r); } do{ *_SUB_UPDATE_LONG_NCHKSUMS=*_SUB_UPDATE_LONG_N; if(!qbevent)break;evnt(35809);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_URL,qbs_add(qbs_add(qbs_new_txt_len("www.qb64.net/",13),_SUB_UPDATE_STRING_V),qbs_new_txt_len("/",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35811);}while(r); LABEL_DLRETRY2:; if(qbevent){evnt(35813);r=0;} do{ *_SUB_UPDATE_LONG_OK=FUNC_DOWNLOAD(qbs_add(_SUB_UPDATE_STRING_URL,qbs_new_txt_len("chksums.q",9)),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35815);}while(r); S_39471:; if ((~(*_SUB_UPDATE_LONG_OK))||new_error){ if(qbevent){evnt(35817);if(r)goto S_39471;} S_39472:; if ((-(*_SUB_UPDATE_LONG_HOW<= 1 ))||new_error){ if(qbevent){evnt(35819);if(r)goto S_39472;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(35820);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_WHAT,FUNC_IDEYESNOBOX(qbs_new_txt_len("Download Failed",15),qbs_new_txt_len("Retry?",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35820);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(35820);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(35820);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(35820);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(35820);}while(r); S_39479:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_UPDATE_STRING_WHAT,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(35821);if(r)goto S_39479;} do{ qbg_screen( 0 ,NULL, 0 , 0 ,NULL,13); if(!qbevent)break;evnt(35822);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(35822);}while(r); do{ sub_cls(NULL,NULL,0); if(!qbevent)break;evnt(35822);}while(r); do{ goto LABEL_DLRETRY2; if(!qbevent)break;evnt(35822);}while(r); } do{ error_goto_line=16; if(!qbevent)break;evnt(35824);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(35825);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Download Failed!",16)); if (new_error) goto skip4521; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4521: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35828);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Retry? (Y/N)",12)); if (new_error) goto skip4522; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4522: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35828);}while(r); S_39490:; do{ if(qbevent){evnt(35829);if(r)goto S_39490;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(35829);}while(r); do{ qbs_set(__STRING_K,qbs_ucase(qbs_inkey())); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35829);}while(r); S_39493:; }while((!(qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,qbs_new_txt_len("N",1)))|(qbs_equal(__STRING_K,qbs_new_txt_len("Y",1))))))&&(!new_error)); dl_exit_4523:; if(qbevent){evnt(35829);if(r)goto S_39493;} S_39494:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(35830);if(r)goto S_39494;} S_39495:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(35831);if(r)goto S_39495;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("C++ COMPILATION FAILED!",23)); if (new_error) goto skip4524; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4524: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35831);}while(r); } do{ error_goto_line=17; if(!qbevent)break;evnt(35832);}while(r); S_39499:; if ((-(*_SUB_UPDATE_LONG_HOW== 3 ))||new_error){ if(qbevent){evnt(35833);if(r)goto S_39499;} do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(35833);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(35834);}while(r); } do{ goto LABEL_DLRETRY2; if(!qbevent)break;evnt(35836);}while(r); } do{ qbs_set(_SUB_UPDATE_STRING_A,FUNC_DECOMPRESS(__STRING_DOWNLOAD_STRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35846);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("chksums.tmp",11)), 4 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35847);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 1 ; if (new_error) goto skip4525; sub_file_print(tmp_fileno,_SUB_UPDATE_STRING_A, 0 , 0 , 0 ); if (new_error) goto skip4525; skip4525: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(35847);}while(r); do{ sub_close( 1 ,1); if(!qbevent)break;evnt(35847);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("chksums.tmp",11)), 3 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35848);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_QF,qbs_new_txt_len(".\\",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35851);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_QF2,qbs_new_txt_len(".\\",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35852);}while(r); do{ *_SUB_UPDATE_LONG_CHKSUMS_UPDATED= 0 ; if(!qbevent)break;evnt(35854);}while(r); do{ *_SUB_UPDATE_LONG_FILES_UPDATED= 0 ; if(!qbevent)break;evnt(35855);}while(r); do{ sub_open(qbs_new_txt_len("setup.bat",9), 4 ,NULL,NULL, 10 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35858);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4526; sub_file_print(tmp_fileno,qbs_new_txt_len("@ping 127.0.0.1 -n 4 -w 1000 >NUL",33), 0 , 0 , 1 ); if (new_error) goto skip4526; skip4526: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(35859);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_DF,qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("downloads\\",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35861);}while(r); do{ *_SUB_UPDATE_LONG_N= 0 ; if(!qbevent)break;evnt(35863);}while(r); S_39519:; while((!(func_eof( 1 )))||new_error){ if(qbevent){evnt(35864);if(r)goto S_39519;} do{ tmp_fileno= 1 ; if (new_error) goto skip4528; sub_file_line_input_string(tmp_fileno,_SUB_UPDATE_STRING_A); if (new_error) goto skip4528; skip4528: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35865);}while(r); S_39521:; if ((qbs_cleanup(qbs_tmp_base,_SUB_UPDATE_STRING_A->len))||new_error){ if(qbevent){evnt(35866);if(r)goto S_39521;} do{ *_SUB_UPDATE_LONG_N=*_SUB_UPDATE_LONG_N+ 1 ; if(!qbevent)break;evnt(35867);}while(r); do{ *_SUB_UPDATE_LONG_I=func_instr(NULL,_SUB_UPDATE_STRING_A,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35868);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_A1,qbs_left(_SUB_UPDATE_STRING_A,*_SUB_UPDATE_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35869);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_A2,qbs_right(_SUB_UPDATE_STRING_A,_SUB_UPDATE_STRING_A->len-*_SUB_UPDATE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35869);}while(r); S_39526:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_UPDATE_STRING_A2,qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(35870);if(r)goto S_39526;} S_39527:; fornext_value4532= 1 ; fornext_finalvalue4532=*_SUB_UPDATE_LONG_NCHKSUMS; fornext_step4532= 1 ; if (fornext_step4532<0) fornext_step_negative4532=1; else fornext_step_negative4532=0; if (new_error) goto fornext_error4532; goto fornext_entrylabel4532; while(1){ fornext_value4532=fornext_step4532+(*_SUB_UPDATE_LONG_I); fornext_entrylabel4532: *_SUB_UPDATE_LONG_I=fornext_value4532; if (fornext_step_negative4532){ if (fornext_value4532fornext_finalvalue4532) break; } fornext_error4532:; if(qbevent){evnt(35871);if(r)goto S_39527;} S_39528:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_UPDATE_STRING_A1,((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_NAME[0]))[array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_NAME[4],__ARRAY_STRING_CHKSUMS_NAME[5])])))))||new_error){ if(qbevent){evnt(35872);if(r)goto S_39528;} S_39529:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_UPDATE_STRING_A2,((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5])])))))||new_error){ if(qbevent){evnt(35873);if(r)goto S_39529;} do{ goto LABEL_NOCHANGE; if(!qbevent)break;evnt(35873);}while(r); } do{ *__LONG_UPDATE_ERROR= 0 ; if(!qbevent)break;evnt(35877);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_QF,_SUB_UPDATE_STRING_A1), 2 ,NULL,NULL, 2 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35878);}while(r); S_39534:; if ((-(*__LONG_UPDATE_ERROR== 0 ))||new_error){ if(qbevent){evnt(35879);if(r)goto S_39534;} S_39535:; if ((func_lof( 2 ))||new_error){ if(qbevent){evnt(35880);if(r)goto S_39535;} do{ sub_close( 2 ,1); if(!qbevent)break;evnt(35881);}while(r); do{ *_SUB_UPDATE_INTEGER64_C=FUNC_CHKSUM(qbs_add(_SUB_UPDATE_STRING_QF,_SUB_UPDATE_STRING_A1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35883);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_C,qbs_ltrim(qbs_rtrim(qbs_str((int64)(*_SUB_UPDATE_INTEGER64_C))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35883);}while(r); S_39539:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_UPDATE_STRING_C,((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5])])))))||new_error){ if(qbevent){evnt(35884);if(r)goto S_39539;} do{ *_SUB_UPDATE_LONG_CHKSUMS_UPDATED= 1 ; if(!qbevent)break;evnt(35885);}while(r); S_39541:; if ((-(*_SUB_UPDATE_LONG_HOW<= 1 ))||new_error){ if(qbevent){evnt(35888);if(r)goto S_39541;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(35889);}while(r); do{ SUB_IDEMESSAGEBOX(qbs_new_txt_len("This file has been modified by you but will be overwritten!",59),_SUB_UPDATE_STRING_A1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35890);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(35891);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(35891);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(35891);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(35891);}while(r); do{ qbg_screen( 0 ,NULL, 0 , 0 ,NULL,13); if(!qbevent)break;evnt(35892);}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(35893);}while(r); do{ sub_cls(NULL,NULL,0); if(!qbevent)break;evnt(35894);}while(r); } S_39552:; if ((-(*_SUB_UPDATE_LONG_HOW>= 2 ))||new_error){ if(qbevent){evnt(35896);if(r)goto S_39552;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("This file has been modified by you but will be overwritten: ",60),func_chr( 34 )),_SUB_UPDATE_STRING_A1),func_chr( 34 ))); if (new_error) goto skip4533; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4533: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35897);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Press any key to continue",25)); if (new_error) goto skip4534; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4534: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35898);}while(r); S_39555:; do{ if(qbevent){evnt(35899);if(r)goto S_39555;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(35899);}while(r); S_39557:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_inkey(),qbs_new_txt_len("",0)))))&&(!new_error)); dl_exit_4535:; if(qbevent){evnt(35899);if(r)goto S_39557;} } do{ tmp_long=array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[tmp_long])),_SUB_UPDATE_STRING_C); if(!qbevent)break;evnt(35902);}while(r); } }else{ do{ sub_close( 2 ,1); if(!qbevent)break;evnt(35905);}while(r); do{ sub_kill(qbs_add(_SUB_UPDATE_STRING_QF,_SUB_UPDATE_STRING_A1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35906);}while(r); do{ tmp_long=array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[tmp_long])),qbs_new_txt_len("0",1)); if(!qbevent)break;evnt(35907);}while(r); do{ *_SUB_UPDATE_LONG_CHKSUMS_UPDATED= 1 ; if(!qbevent)break;evnt(35908);}while(r); } }else{ do{ tmp_long=array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[tmp_long])),qbs_new_txt_len("0",1)); if(!qbevent)break;evnt(35911);}while(r); do{ *_SUB_UPDATE_LONG_CHKSUMS_UPDATED= 1 ; if(!qbevent)break;evnt(35912);}while(r); } do{ goto LABEL_FOUNDCHKSUM; if(!qbevent)break;evnt(35914);}while(r); } } fornext_exit_4531:; do{ *_SUB_UPDATE_LONG_CHKSUMS_UPDATED= 1 ; if(!qbevent)break;evnt(35919);}while(r); do{ *__LONG_UPDATE_ERROR= 0 ; if(!qbevent)break;evnt(35921);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_QF,_SUB_UPDATE_STRING_A1), 2 ,NULL,NULL, 2 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35922);}while(r); S_39577:; if ((-(*__LONG_UPDATE_ERROR== 0 ))||new_error){ if(qbevent){evnt(35923);if(r)goto S_39577;} S_39578:; if ((func_lof( 2 ))||new_error){ if(qbevent){evnt(35924);if(r)goto S_39578;} do{ sub_close( 2 ,1); if(!qbevent)break;evnt(35925);}while(r); do{ *_SUB_UPDATE_INTEGER64_C=FUNC_CHKSUM(qbs_add(_SUB_UPDATE_STRING_QF,_SUB_UPDATE_STRING_A1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35927);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_C,qbs_ltrim(qbs_rtrim(qbs_str((int64)(*_SUB_UPDATE_INTEGER64_C))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35927);}while(r); do{ *_SUB_UPDATE_LONG_NCHKSUMS=*_SUB_UPDATE_LONG_NCHKSUMS+ 1 ; if(!qbevent)break;evnt(35928);}while(r); do{ if (__ARRAY_STRING_CHKSUMS_NAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CHKSUMS_NAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_NAME[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_NAME[4]= 1 ; __ARRAY_STRING_CHKSUMS_NAME[5]=(*_SUB_UPDATE_LONG_NCHKSUMS)-__ARRAY_STRING_CHKSUMS_NAME[4]+1; __ARRAY_STRING_CHKSUMS_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_NAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_VALSTR[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_VALSTR[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_VALSTR[4]= 1 ; __ARRAY_STRING_CHKSUMS_VALSTR[5]=(*_SUB_UPDATE_LONG_NCHKSUMS)-__ARRAY_STRING_CHKSUMS_VALSTR[4]+1; __ARRAY_STRING_CHKSUMS_VALSTR[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_VALSTR[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_NAME[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_NAME[4]= 1 ; __ARRAY_STRING_CHKSUMS_NAME[5]=(*_SUB_UPDATE_LONG_NCHKSUMS)-__ARRAY_STRING_CHKSUMS_NAME[4]+1; __ARRAY_STRING_CHKSUMS_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_NAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_VALSTR[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_VALSTR[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_VALSTR[4]= 1 ; __ARRAY_STRING_CHKSUMS_VALSTR[5]=(*_SUB_UPDATE_LONG_NCHKSUMS)-__ARRAY_STRING_CHKSUMS_VALSTR[4]+1; __ARRAY_STRING_CHKSUMS_VALSTR[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_VALSTR[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_NAME[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_NAME[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_NAME[4]= 1 ; __ARRAY_STRING_CHKSUMS_NAME[5]=(*_SUB_UPDATE_LONG_NCHKSUMS)-__ARRAY_STRING_CHKSUMS_NAME[4]+1; __ARRAY_STRING_CHKSUMS_NAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_NAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CHKSUMS_VALSTR[2]&1){ preserved_elements=__ARRAY_STRING_CHKSUMS_VALSTR[5]; } else preserved_elements=0; __ARRAY_STRING_CHKSUMS_VALSTR[4]= 1 ; __ARRAY_STRING_CHKSUMS_VALSTR[5]=(*_SUB_UPDATE_LONG_NCHKSUMS)-__ARRAY_STRING_CHKSUMS_VALSTR[4]+1; __ARRAY_STRING_CHKSUMS_VALSTR[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CHKSUMS_VALSTR[5]; if (tmp_longchr,_SUB_UPDATE_STRING_X->len,byte_element_4541),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(35997);}while(r); do{ sub_close( 2 ,1); if(!qbevent)break;evnt(35998);}while(r); do{ qbs_set(_SUB_UPDATE_STRING_P,FUNC_RIPPATH(_SUB_UPDATE_STRING_A1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36001);}while(r); S_39651:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_UPDATE_STRING_P,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(36002);if(r)goto S_39651;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4542; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("md ",3),func_chr( 34 )),_SUB_UPDATE_STRING_QF2),_SUB_UPDATE_STRING_P),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip4542; skip4542: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36002);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4543; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("del ",4),func_chr( 34 )),_SUB_UPDATE_STRING_QF2),_SUB_UPDATE_STRING_A1),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip4543; skip4543: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36004);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4544; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("copy ",5),func_chr( 34 )),_SUB_UPDATE_STRING_DF),qbs_ltrim(qbs_str((int32)(*_SUB_UPDATE_LONG_N)))),qbs_new_txt_len(".bin",4)),func_chr( 34 )),qbs_new_txt_len(" ",1)),func_chr( 34 )),_SUB_UPDATE_STRING_QF2),_SUB_UPDATE_STRING_A1),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip4544; skip4544: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36005);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4545; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("del ",4),func_chr( 34 )),_SUB_UPDATE_STRING_DF),qbs_ltrim(qbs_str((int32)(*_SUB_UPDATE_LONG_N)))),qbs_new_txt_len(".bin",4)),func_chr( 34 )), 0 , 0 , 1 ); if (new_error) goto skip4545; skip4545: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36006);}while(r); LABEL_NOCHANGE:; if(qbevent){evnt(36010);r=0;} } } } dl_exit_4527:; do{ sub_close( 1 ,1); if(!qbevent)break;evnt(36014);}while(r); S_39661:; if ((-(*_SUB_UPDATE_LONG_FILES_UPDATED== 1 ))||new_error){ if(qbevent){evnt(36017);if(r)goto S_39661;} do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("chksums.tmp",11)), 4 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36020);}while(r); S_39663:; fornext_value4547= 1 ; fornext_finalvalue4547=*_SUB_UPDATE_LONG_NCHKSUMS; fornext_step4547= 1 ; if (fornext_step4547<0) fornext_step_negative4547=1; else fornext_step_negative4547=0; if (new_error) goto fornext_error4547; goto fornext_entrylabel4547; while(1){ fornext_value4547=fornext_step4547+(*_SUB_UPDATE_LONG_I); fornext_entrylabel4547: *_SUB_UPDATE_LONG_I=fornext_value4547; if (fornext_step_negative4547){ if (fornext_value4547fornext_finalvalue4547) break; } fornext_error4547:; if(qbevent){evnt(36021);if(r)goto S_39663;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 1 ; if (new_error) goto skip4548; sub_file_print(tmp_fileno,qbs_add(qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_NAME[0]))[array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_NAME[4],__ARRAY_STRING_CHKSUMS_NAME[5])])),qbs_new_txt_len(",",1)),((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5])]))), 0 , 0 , 1 ); if (new_error) goto skip4548; skip4548: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36022);}while(r); } fornext_exit_4546:; do{ sub_close( 1 ,1); if(!qbevent)break;evnt(36024);}while(r); do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("update.tmp",10)), 4 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36027);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 1 ; if (new_error) goto skip4549; sub_file_print(tmp_fileno,_SUB_UPDATE_STRING_V, 0 , 0 , 0 ); if (new_error) goto skip4549; skip4549: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36028);}while(r); do{ sub_close( 1 ,1); if(!qbevent)break;evnt(36029);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4550; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("copy ",5),_SUB_UPDATE_STRING_UF),qbs_new_txt_len("chksums.tmp ",12)),_SUB_UPDATE_STRING_UF),qbs_new_txt_len("chksums.txt",11)), 0 , 0 , 1 ); if (new_error) goto skip4550; skip4550: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36031);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4551; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("del ",4),_SUB_UPDATE_STRING_UF),qbs_new_txt_len("chksums.tmp",11)), 0 , 0 , 1 ); if (new_error) goto skip4551; skip4551: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36032);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4552; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("copy ",5),_SUB_UPDATE_STRING_UF),qbs_new_txt_len("update.tmp ",11)),_SUB_UPDATE_STRING_UF),qbs_new_txt_len("update.txt",10)), 0 , 0 , 1 ); if (new_error) goto skip4552; skip4552: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36034);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4553; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("del ",4),_SUB_UPDATE_STRING_UF),qbs_new_txt_len("update.tmp",10)), 0 , 0 , 1 ); if (new_error) goto skip4553; skip4553: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36035);}while(r); S_39674:; if ((-(*_SUB_UPDATE_LONG_HOW< 2 ))||new_error){ if(qbevent){evnt(36037);if(r)goto S_39674;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4554; sub_file_print(tmp_fileno,qbs_new_txt_len("start qb64.exe",14), 0 , 0 , 1 ); if (new_error) goto skip4554; skip4554: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36037);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 10 ; if (new_error) goto skip4555; sub_file_print(tmp_fileno,qbs_new_txt_len("del setup.bat",13), 0 , 0 , 1 ); if (new_error) goto skip4555; skip4555: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36038);}while(r); do{ sub_close( 10 ,1); if(!qbevent)break;evnt(36039);}while(r); do{ sub_close(NULL,0); if(!qbevent)break;evnt(36040);}while(r); S_39680:; if ((-(*_SUB_UPDATE_LONG_HOW== 2 ))||new_error){ if(qbevent){evnt(36042);if(r)goto S_39680;} S_39681:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(36043);if(r)goto S_39681;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("C++ COMPILATION FAILED!",23)); if (new_error) goto skip4556; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4556: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36044);}while(r); do{ qbg_sub_locate( 25 , 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(36045);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Press any key to continue",25)); if (new_error) goto skip4557; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4557: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36045);}while(r); S_39685:; do{ if(qbevent){evnt(36046);if(r)goto S_39685;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(36046);}while(r); S_39687:; }while((!(qbs_cleanup(qbs_tmp_base,((int32)(qbs_inkey())->len))))&&(!new_error)); dl_exit_4558:; if(qbevent){evnt(36046);if(r)goto S_39687;} } } do{ *_SUB_UPDATE_LONG_FH=func_freefile(); if(!qbevent)break;evnt(36050);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("autosave.bin",12)), 4 ,NULL,NULL,*_SUB_UPDATE_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36050);}while(r); do{ sub_close(*_SUB_UPDATE_LONG_FH,1); if(!qbevent)break;evnt(36050);}while(r); do{ sub_run(qbs_new_txt_len("setup.bat",9)); if(!qbevent)break;evnt(36052);}while(r); } do{ sub_close( 10 ,1); if(!qbevent)break;evnt(36055);}while(r); do{ sub_kill(qbs_new_txt_len("setup.bat",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36057);}while(r); S_39697:; if ((-(*_SUB_UPDATE_LONG_CHKSUMS_UPDATED== 1 ))||new_error){ if(qbevent){evnt(36059);if(r)goto S_39697;} do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("chksums.txt",11)), 4 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36062);}while(r); S_39699:; fornext_value4560= 1 ; fornext_finalvalue4560=*_SUB_UPDATE_LONG_NCHKSUMS; fornext_step4560= 1 ; if (fornext_step4560<0) fornext_step_negative4560=1; else fornext_step_negative4560=0; if (new_error) goto fornext_error4560; goto fornext_entrylabel4560; while(1){ fornext_value4560=fornext_step4560+(*_SUB_UPDATE_LONG_I); fornext_entrylabel4560: *_SUB_UPDATE_LONG_I=fornext_value4560; if (fornext_step_negative4560){ if (fornext_value4560fornext_finalvalue4560) break; } fornext_error4560:; if(qbevent){evnt(36063);if(r)goto S_39699;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 1 ; if (new_error) goto skip4561; sub_file_print(tmp_fileno,qbs_add(qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_NAME[0]))[array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_NAME[4],__ARRAY_STRING_CHKSUMS_NAME[5])])),qbs_new_txt_len(",",1)),((qbs*)(((uint64*)(__ARRAY_STRING_CHKSUMS_VALSTR[0]))[array_check((*_SUB_UPDATE_LONG_I)-__ARRAY_STRING_CHKSUMS_VALSTR[4],__ARRAY_STRING_CHKSUMS_VALSTR[5])]))), 0 , 0 , 1 ); if (new_error) goto skip4561; skip4561: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36064);}while(r); } fornext_exit_4559:; do{ sub_close( 1 ,1); if(!qbevent)break;evnt(36066);}while(r); }else{ } do{ sub_open(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("update.txt",10)), 4 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36076);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 1 ; if (new_error) goto skip4562; sub_file_print(tmp_fileno,_SUB_UPDATE_STRING_V, 0 , 0 , 0 ); if (new_error) goto skip4562; skip4562: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36077);}while(r); do{ sub_close( 1 ,1); if(!qbevent)break;evnt(36078);}while(r); do{ sub_kill(qbs_add(_SUB_UPDATE_STRING_UF,qbs_new_txt_len("chksums.tmp",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36080);}while(r); S_39709:; if ((-(*_SUB_UPDATE_LONG_HOW<= 1 ))||new_error){ if(qbevent){evnt(36082);if(r)goto S_39709;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(36083);}while(r); do{ SUB_IDEMESSAGEBOX(qbs_new_txt_len("Update",6),qbs_new_txt_len("No changes required.",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36084);}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(36085);}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(36085);}while(r); do{ SUB_IDEWAIT4MOUS(); if(!qbevent)break;evnt(36085);}while(r); do{ SUB_IDEWAIT4ALT(); if(!qbevent)break;evnt(36085);}while(r); } S_39717:; if ((-(*_SUB_UPDATE_LONG_HOW== 2 ))||new_error){ if(qbevent){evnt(36088);if(r)goto S_39717;} S_39718:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(36089);if(r)goto S_39718;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("C++ COMPILATION FAILED!",23)); if (new_error) goto skip4563; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4563: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36089);}while(r); } } do{ error_goto_line=20; if(!qbevent)break;evnt(36092);}while(r); S_39723:; if ((-(*_SUB_UPDATE_LONG_HOW== 3 ))||new_error){ if(qbevent){evnt(36094);if(r)goto S_39723;} do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(36094);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free158.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_REMOVECAST(qbs*_FUNC_REMOVECAST_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data159.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_REMOVECAST_STRING_REMOVECAST,_FUNC_REMOVECAST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36098);}while(r); S_39727:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_REMOVECAST_STRING_A,qbs_new_txt_len(" )",3),0)))||new_error){ if(qbevent){evnt(36099);if(r)goto S_39727;} do{ qbs_set(_FUNC_REMOVECAST_STRING_REMOVECAST,qbs_right(_FUNC_REMOVECAST_STRING_A,_FUNC_REMOVECAST_STRING_A->len-func_instr(NULL,_FUNC_REMOVECAST_STRING_A,qbs_new_txt_len(" )",3),0)- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36100);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free159.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_REMOVECAST_STRING_REMOVECAST);return _FUNC_REMOVECAST_STRING_REMOVECAST; } qbs* FUNC_CONVERTTABS(qbs*_FUNC_CONVERTTABS_STRING_A2){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data160.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_39730:; if ((*__LONG_IDEAUTOINDENT)||new_error){ if(qbevent){evnt(36105);if(r)goto S_39730;} do{ *_FUNC_CONVERTTABS_LONG_S=*__LONG_IDEAUTOINDENTSIZE; if(!qbevent)break;evnt(36105);}while(r); }else{ do{ *_FUNC_CONVERTTABS_LONG_S= 4 ; if(!qbevent)break;evnt(36105);}while(r); } do{ qbs_set(_FUNC_CONVERTTABS_STRING_A,_FUNC_CONVERTTABS_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36106);}while(r); S_39736:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_CONVERTTABS_STRING_A,__STRING_CHR_TAB,0)))||new_error){ if(qbevent){evnt(36107);if(r)goto S_39736;} do{ *_FUNC_CONVERTTABS_LONG_X=func_instr(NULL,_FUNC_CONVERTTABS_STRING_A,__STRING_CHR_TAB,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36108);}while(r); do{ qbs_set(_FUNC_CONVERTTABS_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_CONVERTTABS_STRING_A,*_FUNC_CONVERTTABS_LONG_X- 1 ),func_space(*_FUNC_CONVERTTABS_LONG_S-((*_FUNC_CONVERTTABS_LONG_X- 1 )%*_FUNC_CONVERTTABS_LONG_S))),qbs_right(_FUNC_CONVERTTABS_STRING_A,_FUNC_CONVERTTABS_STRING_A->len-*_FUNC_CONVERTTABS_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36109);}while(r); } dl_exit_4567:; do{ qbs_set(_FUNC_CONVERTTABS_STRING_CONVERTTABS,_FUNC_CONVERTTABS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36111);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free160.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_CONVERTTABS_STRING_CONVERTTABS);return _FUNC_CONVERTTABS_STRING_CONVERTTABS; } int32 FUNC_CTRL2(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data161.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_39741:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(36115);if(r)goto S_39741;} S_39742:; if ((func__keydown( 100309 ))||new_error){ if(qbevent){evnt(36116);if(r)goto S_39742;} do{ *_FUNC_CTRL2_LONG_CTRL2= 1 ; if(!qbevent)break;evnt(36116);}while(r); } S_39745:; if ((func__keydown( 100310 ))||new_error){ if(qbevent){evnt(36117);if(r)goto S_39745;} do{ *_FUNC_CTRL2_LONG_CTRL2= 1 ; if(!qbevent)break;evnt(36117);}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free161.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_CTRL2_LONG_CTRL2; } qbs* FUNC_NEWBYTEELEMENT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data162.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_NEWBYTEELEMENT_STRING_A,qbs_add(qbs_new_txt_len("byte_element_",13),FUNC_STR2(&(pass4569=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36122);}while(r); do{ qbs_set(_FUNC_NEWBYTEELEMENT_STRING_NEWBYTEELEMENT,_FUNC_NEWBYTEELEMENT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36123);}while(r); S_39751:; if ((*__LONG_USE_GLOBAL_BYTE_ELEMENTS)||new_error){ if(qbevent){evnt(36124);if(r)goto S_39751;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 18 ; if (new_error) goto skip4570; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("byte_element_struct *",21),_FUNC_NEWBYTEELEMENT_STRING_A),qbs_new_txt_len("=(byte_element_struct*)malloc(12);",34)), 0 , 0 , 1 ); if (new_error) goto skip4570; skip4570: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36125);}while(r); }else{ do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip4571; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("byte_element_struct *",21),_FUNC_NEWBYTEELEMENT_STRING_A),qbs_new_txt_len("=NULL;",6)), 0 , 0 , 1 ); if (new_error) goto skip4571; skip4571: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36127);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip4572; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("if (!",5),_FUNC_NEWBYTEELEMENT_STRING_A),qbs_new_txt_len("){",2)), 0 , 0 , 1 ); if (new_error) goto skip4572; skip4572: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36128);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 13 ; if (new_error) goto skip4573; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if ((mem_static_pointer+=12)=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_NEWBYTEELEMENT_STRING_NEWBYTEELEMENT);return _FUNC_NEWBYTEELEMENT_STRING_NEWBYTEELEMENT; } int32 FUNC_VALIDNAME(qbs*_FUNC_VALIDNAME_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data163.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_FUNC_VALIDNAME_LONG_L=_FUNC_VALIDNAME_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36140);}while(r); S_39760:; if (((-(*_FUNC_VALIDNAME_LONG_L== 0 ))|(-(*_FUNC_VALIDNAME_LONG_L> 40 )))||new_error){ if(qbevent){evnt(36142);if(r)goto S_39760;} S_39761:; if ((-(*_FUNC_VALIDNAME_LONG_L== 0 ))||new_error){ if(qbevent){evnt(36143);if(r)goto S_39761;} do{ goto exit_subfunc; if(!qbevent)break;evnt(36143);}while(r); } do{ *_FUNC_VALIDNAME_LONG_I=func_instr(NULL,_FUNC_VALIDNAME_STRING_A,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36145);}while(r); S_39765:; while((*_FUNC_VALIDNAME_LONG_I)||new_error){ if(qbevent){evnt(36146);if(r)goto S_39765;} do{ *_FUNC_VALIDNAME_LONG_L=*_FUNC_VALIDNAME_LONG_L-__STRING_FIX046->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36147);}while(r); do{ *_FUNC_VALIDNAME_LONG_I=func_instr(*_FUNC_VALIDNAME_LONG_I+ 1 ,_FUNC_VALIDNAME_STRING_A,__STRING_FIX046,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36148);}while(r); } dl_exit_4577:; S_39769:; if ((-(*_FUNC_VALIDNAME_LONG_L> 40 ))||new_error){ if(qbevent){evnt(36150);if(r)goto S_39769;} do{ goto exit_subfunc; if(!qbevent)break;evnt(36150);}while(r); } do{ *_FUNC_VALIDNAME_LONG_L=_FUNC_VALIDNAME_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36151);}while(r); } S_39774:; if ((-(*_FUNC_VALIDNAME_LONG_L>= 2 ))||new_error){ if(qbevent){evnt(36155);if(r)goto S_39774;} S_39775:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_VALIDNAME_STRING_A, 1 )== 95 ))&(-(qbs_asc(_FUNC_VALIDNAME_STRING_A, 2 )!= 95 ))))||new_error){ if(qbevent){evnt(36156);if(r)goto S_39775;} do{ goto exit_subfunc; if(!qbevent)break;evnt(36156);}while(r); } } S_39779:; fornext_value4581= 1 ; fornext_finalvalue4581=*_FUNC_VALIDNAME_LONG_L; fornext_step4581= 1 ; if (fornext_step4581<0) fornext_step_negative4581=1; else fornext_step_negative4581=0; if (new_error) goto fornext_error4581; goto fornext_entrylabel4581; while(1){ fornext_value4581=fornext_step4581+(*_FUNC_VALIDNAME_LONG_I); fornext_entrylabel4581: *_FUNC_VALIDNAME_LONG_I=fornext_value4581; if (fornext_step_negative4581){ if (fornext_value4581fornext_finalvalue4581) break; } fornext_error4581:; if(qbevent){evnt(36159);if(r)goto S_39779;} do{ *_FUNC_VALIDNAME_LONG_A=qbs_asc(_FUNC_VALIDNAME_STRING_A,*_FUNC_VALIDNAME_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36160);}while(r); S_39781:; if ((-(((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((*_FUNC_VALIDNAME_LONG_A)-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]== 0 ))||new_error){ if(qbevent){evnt(36161);if(r)goto S_39781;} do{ goto exit_subfunc; if(!qbevent)break;evnt(36161);}while(r); } S_39784:; if ((((int32*)(__ARRAY_LONG_ISNUMERIC[0]))[array_check((*_FUNC_VALIDNAME_LONG_A)-__ARRAY_LONG_ISNUMERIC[4],__ARRAY_LONG_ISNUMERIC[5])])||new_error){ if(qbevent){evnt(36162);if(r)goto S_39784;} do{ *_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE= 0 ; if(!qbevent)break;evnt(36163);}while(r); S_39786:; if ((-(*_FUNC_VALIDNAME_LONG_ALPHABETLETTER== 0 ))||new_error){ if(qbevent){evnt(36164);if(r)goto S_39786;} do{ goto exit_subfunc; if(!qbevent)break;evnt(36164);}while(r); } }else{ S_39790:; if ((-(*_FUNC_VALIDNAME_LONG_A== 95 ))||new_error){ if(qbevent){evnt(36166);if(r)goto S_39790;} do{ *_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE= 1 ; if(!qbevent)break;evnt(36167);}while(r); }else{ do{ *_FUNC_VALIDNAME_LONG_ALPHABETLETTER= 1 ; if(!qbevent)break;evnt(36169);}while(r); do{ *_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE= 0 ; if(!qbevent)break;evnt(36170);}while(r); } } } fornext_exit_4580:; S_39798:; if ((*_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE)||new_error){ if(qbevent){evnt(36174);if(r)goto S_39798;} do{ goto exit_subfunc; if(!qbevent)break;evnt(36174);}while(r); } do{ *_FUNC_VALIDNAME_LONG_VALIDNAME= 1 ; if(!qbevent)break;evnt(36175);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free163.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; return *_FUNC_VALIDNAME_LONG_VALIDNAME; } qbs* FUNC_STR_NTH(int32*_FUNC_STR_NTH_LONG_X){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data164.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_39802:; if ((-(*_FUNC_STR_NTH_LONG_X== 1 ))||new_error){ if(qbevent){evnt(36179);if(r)goto S_39802;} do{ qbs_set(_FUNC_STR_NTH_STRING_STR_NTH,qbs_new_txt_len("1st",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36179);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36179);}while(r); } S_39806:; if ((-(*_FUNC_STR_NTH_LONG_X== 2 ))||new_error){ if(qbevent){evnt(36180);if(r)goto S_39806;} do{ qbs_set(_FUNC_STR_NTH_STRING_STR_NTH,qbs_new_txt_len("2nd",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36180);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36180);}while(r); } S_39810:; if ((-(*_FUNC_STR_NTH_LONG_X== 3 ))||new_error){ if(qbevent){evnt(36181);if(r)goto S_39810;} do{ qbs_set(_FUNC_STR_NTH_STRING_STR_NTH,qbs_new_txt_len("3rd",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36181);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36181);}while(r); } do{ qbs_set(_FUNC_STR_NTH_STRING_STR_NTH,qbs_add(FUNC_STR2(_FUNC_STR_NTH_LONG_X),qbs_new_txt_len("th",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36182);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free164.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_STR_NTH_STRING_STR_NTH);return _FUNC_STR_NTH_STRING_STR_NTH; } void SUB_GIVE_ERROR(qbs*_SUB_GIVE_ERROR_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data165.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *__LONG_ERROR_HAPPENED= 1 ; if(!qbevent)break;evnt(36186);}while(r); do{ qbs_set(__STRING_ERROR_MESSAGE,_SUB_GIVE_ERROR_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36187);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free165.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_GETINPUT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data166.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_39817:; if ((*__LONG_ICHECKLATER)||new_error){ if(qbevent){evnt(36191);if(r)goto S_39817;} do{ *__LONG_ICHECKLATER= 0 ; if(!qbevent)break;evnt(36191);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36191);}while(r); } do{ *__LONG_ICHANGED= 0 ; if(!qbevent)break;evnt(36193);}while(r); do{ *__LONG_KSTATECHANGED= 0 ; if(!qbevent)break;evnt(36194);}while(r); do{ *__LONG_MCLICK= 0 ; if(!qbevent)break;evnt(36195);}while(r); do{ *__LONG_MCLICK2= 0 ; if(!qbevent)break;evnt(36195);}while(r); do{ *__LONG_MRELEASE= 0 ; if(!qbevent)break;evnt(36195);}while(r); do{ *__LONG_MRELEASE2= 0 ; if(!qbevent)break;evnt(36195);}while(r); do{ *__LONG_MWHEEL= 0 ; if(!qbevent)break;evnt(36196);}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36197);}while(r); do{ *__LONG_KB= 0 ; if(!qbevent)break;evnt(36197);}while(r); do{ *__LONG_MOB=*__LONG_MB; if(!qbevent)break;evnt(36198);}while(r); do{ *__LONG_MOB2=*__LONG_MB2; if(!qbevent)break;evnt(36198);}while(r); do{ *__LONG_KOALT=*__LONG_KALT; if(!qbevent)break;evnt(36199);}while(r); do{ *__LONG_KALTPRESS= 0 ; if(!qbevent)break;evnt(36199);}while(r); do{ *__LONG_KALTRELEASE= 0 ; if(!qbevent)break;evnt(36199);}while(r); S_39835:; do{ if(qbevent){evnt(36201);if(r)goto S_39835;} S_39836:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_inkey(),qbs_new_txt_len("",0)))))&&(!new_error)); dl_exit_4583:; if(qbevent){evnt(36201);if(r)goto S_39836;} do{ *_SUB_GETINPUT_LONG_K=func__keyhit(); if(!qbevent)break;evnt(36203);}while(r); S_39838:; if ((*_SUB_GETINPUT_LONG_K)||new_error){ if(qbevent){evnt(36204);if(r)goto S_39838;} S_39839:; if ((-(*_SUB_GETINPUT_LONG_K< 0 ))||new_error){ if(qbevent){evnt(36205);if(r)goto S_39839;} do{ *_SUB_GETINPUT_LONG_K=-(*_SUB_GETINPUT_LONG_K); if(!qbevent)break;evnt(36205);}while(r); do{ *_SUB_GETINPUT_LONG_RELEASE= 1 ; if(!qbevent)break;evnt(36205);}while(r); } S_39843:; if (((-(*_SUB_GETINPUT_LONG_K== 100304 ))|(-(*_SUB_GETINPUT_LONG_K== 100303 )))||new_error){ if(qbevent){evnt(36207);if(r)goto S_39843;} S_39844:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(36208);if(r)goto S_39844;} do{ *__LONG_KSHIFT= 0 ; if(!qbevent)break;evnt(36208);}while(r); }else{ do{ *__LONG_KSHIFT= -1 ; if(!qbevent)break;evnt(36208);}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(36209);}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(36209);}while(r); } S_39852:; if (((-(*_SUB_GETINPUT_LONG_K== 100308 ))|(-(*_SUB_GETINPUT_LONG_K== 100307 )))||new_error){ if(qbevent){evnt(36211);if(r)goto S_39852;} S_39853:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(36212);if(r)goto S_39853;} do{ *__LONG_KALT= 0 ; if(!qbevent)break;evnt(36212);}while(r); do{ *__LONG_KALTRELEASE= -1 ; if(!qbevent)break;evnt(36212);}while(r); }else{ do{ *__LONG_KALT= -1 ; if(!qbevent)break;evnt(36212);}while(r); do{ *__LONG_KALTPRESS= -1 ; if(!qbevent)break;evnt(36212);}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(36213);}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(36213);}while(r); } S_39863:; if (((-(*_SUB_GETINPUT_LONG_K== 100306 ))|(-(*_SUB_GETINPUT_LONG_K== 100305 )))||new_error){ if(qbevent){evnt(36215);if(r)goto S_39863;} S_39864:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(36216);if(r)goto S_39864;} do{ *__LONG_KCTRL= 0 ; if(!qbevent)break;evnt(36216);}while(r); do{ *__LONG_KCONTROL= 0 ; if(!qbevent)break;evnt(36216);}while(r); }else{ do{ *__LONG_KCTRL= -1 ; if(!qbevent)break;evnt(36216);}while(r); do{ *__LONG_KCONTROL= -1 ; if(!qbevent)break;evnt(36216);}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(36217);}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(36217);}while(r); } S_39874:; if (((-(*_SUB_GETINPUT_LONG_K== 100310 ))|(-(*_SUB_GETINPUT_LONG_K== 100309 )))||new_error){ if(qbevent){evnt(36219);if(r)goto S_39874;} S_39875:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(36220);if(r)goto S_39875;} do{ *__LONG_KCONTROL= 0 ; if(!qbevent)break;evnt(36220);}while(r); }else{ do{ *__LONG_KCONTROL= -1 ; if(!qbevent)break;evnt(36220);}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(36221);}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(36221);}while(r); } S_39883:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 0 ))||new_error){ if(qbevent){evnt(36224);if(r)goto S_39883;} do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(36225);}while(r); S_39885:; if ((-(*_SUB_GETINPUT_LONG_K<= 255 ))||new_error){ if(qbevent){evnt(36226);if(r)goto S_39885;} do{ qbs_set(__STRING_K,func_chr(*_SUB_GETINPUT_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36226);}while(r); } S_39888:; if (((-(*_SUB_GETINPUT_LONG_K>= 256 ))&(-(*_SUB_GETINPUT_LONG_K<= 65535 ))&((-((*_SUB_GETINPUT_LONG_K& 255 )== 0 ))))||new_error){ if(qbevent){evnt(36227);if(r)goto S_39888;} do{ qbs_set(__STRING_K,qbs_add(func_chr( 0 ),func_chr(*_SUB_GETINPUT_LONG_K/ 256 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36227);}while(r); } do{ *__LONG_KB=*_SUB_GETINPUT_LONG_K; if(!qbevent)break;evnt(36228);}while(r); } S_39893:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(36230);if(r)goto S_39893;} do{ goto exit_subfunc; if(!qbevent)break;evnt(36230);}while(r); } } S_39897:; while((func__mouseinput())||new_error){ if(qbevent){evnt(36232);if(r)goto S_39897;} do{ *__LONG_ICHANGED= 1 ; if(!qbevent)break;evnt(36233);}while(r); do{ *__LONG_MB=func__mousebutton( 1 ); if(!qbevent)break;evnt(36234);}while(r); do{ *__LONG_MB2=func__mousebutton( 2 ); if(!qbevent)break;evnt(36234);}while(r); do{ *__LONG_MWHEEL=*__LONG_MWHEEL+func__mousewheel(); if(!qbevent)break;evnt(36235);}while(r); do{ *__LONG_MX=qbr(func__mousex()); if(!qbevent)break;evnt(36236);}while(r); do{ *__LONG_MY=qbr(func__mousey()); if(!qbevent)break;evnt(36236);}while(r); S_39904:; if (((-(*__LONG_MB!= 0 ))&(-(*__LONG_MOB== 0 )))||new_error){ if(qbevent){evnt(36237);if(r)goto S_39904;} do{ *__LONG_MCLICK= -1 ; if(!qbevent)break;evnt(36237);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36237);}while(r); } S_39908:; if (((-(*__LONG_MB2!= 0 ))&(-(*__LONG_MOB2== 0 )))||new_error){ if(qbevent){evnt(36238);if(r)goto S_39908;} do{ *__LONG_MCLICK2= -1 ; if(!qbevent)break;evnt(36238);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36238);}while(r); } S_39912:; if (((-(*__LONG_MB== 0 ))&(-(*__LONG_MOB!= 0 )))||new_error){ if(qbevent){evnt(36239);if(r)goto S_39912;} do{ *__LONG_MRELEASE= -1 ; if(!qbevent)break;evnt(36239);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36239);}while(r); } S_39916:; if (((-(*__LONG_MB2== 0 ))&(-(*__LONG_MOB2!= 0 )))||new_error){ if(qbevent){evnt(36240);if(r)goto S_39916;} do{ *__LONG_MRELEASE2= -1 ; if(!qbevent)break;evnt(36240);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36240);}while(r); } } dl_exit_4584:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free166.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_HELP_SHOWTEXT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data167.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ if(!qbevent)break;evnt(36249);}while(r); S_39922:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_HELP_SHOWTEXT_LONG_SETUP== 0 ))&(-(func_ubound(__ARRAY_STRING_BACK,1,1)== 1 ))))||new_error){ if(qbevent){evnt(36250);if(r)goto S_39922;} do{ *_SUB_HELP_SHOWTEXT_LONG_SETUP= 1 ; if(!qbevent)break;evnt(36251);}while(r); do{ qbs_set(_SUB_HELP_SHOWTEXT_STRING_A,FUNC_WIKI(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check(( 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36252);}while(r); do{ SUB_WIKIPARSE(_SUB_HELP_SHOWTEXT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36253);}while(r); } do{ if (__ARRAY_LONG_HELP_LINELEN[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_HELP_LINELEN)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_HELP_LINELEN[2]&1){ if (__ARRAY_LONG_HELP_LINELEN[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_HELP_LINELEN[0])); }else{ free((void*)(__ARRAY_LONG_HELP_LINELEN[0])); } } __ARRAY_LONG_HELP_LINELEN[4]= 0 ; __ARRAY_LONG_HELP_LINELEN[5]=(*__LONG_HELP_WH)-__ARRAY_LONG_HELP_LINELEN[4]+1; __ARRAY_LONG_HELP_LINELEN[6]=1; if (__ARRAY_LONG_HELP_LINELEN[2]&4){ __ARRAY_LONG_HELP_LINELEN[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HELP_LINELEN[5]*4); memset((void*)(__ARRAY_LONG_HELP_LINELEN[0]),0,__ARRAY_LONG_HELP_LINELEN[5]*4); }else{ __ARRAY_LONG_HELP_LINELEN[0]=(ptrszint)calloc(__ARRAY_LONG_HELP_LINELEN[5]*4,1); if (!__ARRAY_LONG_HELP_LINELEN[0]) error(257); } __ARRAY_LONG_HELP_LINELEN[2]|=1; } if(!qbevent)break;evnt(36256);}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(36258);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_SY=*__LONG_HELP_WY1; if(!qbevent)break;evnt(36267);}while(r); S_39930:; fornext_value4586=*__LONG_HELP_SY; fornext_finalvalue4586=*__LONG_HELP_SY+*__LONG_HELP_WH- 1 ; fornext_step4586= 1 ; if (fornext_step4586<0) fornext_step_negative4586=1; else fornext_step_negative4586=0; if (new_error) goto fornext_error4586; goto fornext_entrylabel4586; while(1){ fornext_value4586=fornext_step4586+(*_SUB_HELP_SHOWTEXT_LONG_Y); fornext_entrylabel4586: *_SUB_HELP_SHOWTEXT_LONG_Y=fornext_value4586; if (fornext_step_negative4586){ if (fornext_value4586fornext_finalvalue4586) break; } fornext_error4586:; if(qbevent){evnt(36268);if(r)goto S_39930;} S_39931:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_H))||new_error){ if(qbevent){evnt(36269);if(r)goto S_39931;} do{ *_SUB_HELP_SHOWTEXT_LONG_L=string2l(func_mid(__STRING_HELP_LINE,((*_SUB_HELP_SHOWTEXT_LONG_Y- 1 )* 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36271);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X=*_SUB_HELP_SHOWTEXT_LONG_L; if(!qbevent)break;evnt(36272);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3= 1 ; if(!qbevent)break;evnt(36273);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_SX=*__LONG_HELP_WX1; if(!qbevent)break;evnt(36275);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36276);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_COL=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36276);}while(r); do{ qbg_sub_locate(*_SUB_HELP_SHOWTEXT_LONG_SY,*_SUB_HELP_SHOWTEXT_LONG_SX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(36277);}while(r); S_39939:; while((!(-(*_SUB_HELP_SHOWTEXT_LONG_C== 13 )))||new_error){ if(qbevent){evnt(36278);if(r)goto S_39939;} do{ qbg_sub_color(*_SUB_HELP_SHOWTEXT_LONG_COL& 15 ,*_SUB_HELP_SHOWTEXT_LONG_COL/ 16 ,NULL,3); if(!qbevent)break;evnt(36279);}while(r); S_39941:; if ((-(*__LONG_HELP_SELECT== 2 ))||new_error){ if(qbevent){evnt(36280);if(r)goto S_39941;} S_39942:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(36281);if(r)goto S_39942;} S_39943:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(36282);if(r)goto S_39943;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(36283);}while(r); } } } S_39948:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SX))||new_error){ if(qbevent){evnt(36287);if(r)goto S_39948;} S_39949:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_SX<=*__LONG_HELP_WX2))||new_error){ if(qbevent){evnt(36288);if(r)goto S_39949;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(*_SUB_HELP_SHOWTEXT_LONG_C)); if (new_error) goto skip4588; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4588: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36289);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_SX=*_SUB_HELP_SHOWTEXT_LONG_SX+ 1 ; if(!qbevent)break;evnt(36290);}while(r); } } do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ; if(!qbevent)break;evnt(36293);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X=*_SUB_HELP_SHOWTEXT_LONG_X+ 4 ; if(!qbevent)break;evnt(36293);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36293);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_COL=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X+ 1 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36293);}while(r); } dl_exit_4587:; do{ tmp_long=array_check((*_SUB_HELP_SHOWTEXT_LONG_Y-*__LONG_HELP_SY)-__ARRAY_LONG_HELP_LINELEN[4],__ARRAY_LONG_HELP_LINELEN[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HELP_LINELEN[0]))[tmp_long]=*_SUB_HELP_SHOWTEXT_LONG_X3- 1 ; if(!qbevent)break;evnt(36296);}while(r); S_39960:; fornext_value4590= 1 ; fornext_finalvalue4590=*__LONG_HELP_WX2-func_pos( 0 )+ 1 ; fornext_step4590= 1 ; if (fornext_step4590<0) fornext_step_negative4590=1; else fornext_step_negative4590=0; if (new_error) goto fornext_error4590; goto fornext_entrylabel4590; while(1){ fornext_value4590=fornext_step4590+(*_SUB_HELP_SHOWTEXT_LONG_X4); fornext_entrylabel4590: *_SUB_HELP_SHOWTEXT_LONG_X4=fornext_value4590; if (fornext_step_negative4590){ if (fornext_value4590fornext_finalvalue4590) break; } fornext_error4590:; if(qbevent){evnt(36298);if(r)goto S_39960;} S_39961:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_COL== 0 ))||new_error){ if(qbevent){evnt(36299);if(r)goto S_39961;} do{ *_SUB_HELP_SHOWTEXT_LONG_COL= 7 ; if(!qbevent)break;evnt(36299);}while(r); } do{ qbg_sub_color(*_SUB_HELP_SHOWTEXT_LONG_COL& 15 ,*_SUB_HELP_SHOWTEXT_LONG_COL/ 16 ,NULL,3); if(!qbevent)break;evnt(36300);}while(r); S_39965:; if ((-(*__LONG_HELP_SELECT== 2 ))||new_error){ if(qbevent){evnt(36301);if(r)goto S_39965;} S_39966:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(36302);if(r)goto S_39966;} S_39967:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(36303);if(r)goto S_39967;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(36304);}while(r); } } } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" ",1)); if (new_error) goto skip4591; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4591: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36308);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ; if(!qbevent)break;evnt(36309);}while(r); } fornext_exit_4589:; }else{ do{ *_SUB_HELP_SHOWTEXT_LONG_SX=*__LONG_HELP_WX1; if(!qbevent)break;evnt(36314);}while(r); do{ qbg_sub_locate(*_SUB_HELP_SHOWTEXT_LONG_SY,*_SUB_HELP_SHOWTEXT_LONG_SX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(36315);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*__LONG_HELP_SX; if(!qbevent)break;evnt(36316);}while(r); S_39979:; fornext_value4593= 1 ; fornext_finalvalue4593=*__LONG_HELP_WW; fornext_step4593= 1 ; if (fornext_step4593<0) fornext_step_negative4593=1; else fornext_step_negative4593=0; if (new_error) goto fornext_error4593; goto fornext_entrylabel4593; while(1){ fornext_value4593=fornext_step4593+(*_SUB_HELP_SHOWTEXT_LONG_X4); fornext_entrylabel4593: *_SUB_HELP_SHOWTEXT_LONG_X4=fornext_value4593; if (fornext_step_negative4593){ if (fornext_value4593fornext_finalvalue4593) break; } fornext_error4593:; if(qbevent){evnt(36317);if(r)goto S_39979;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(36318);}while(r); S_39981:; if ((-(*__LONG_HELP_SELECT== 2 ))||new_error){ if(qbevent){evnt(36319);if(r)goto S_39981;} S_39982:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(36320);if(r)goto S_39982;} S_39983:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(36321);if(r)goto S_39983;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(36322);}while(r); } } } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" ",1)); if (new_error) goto skip4594; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); skip4594: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36326);}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ; if(!qbevent)break;evnt(36327);}while(r); } fornext_exit_4592:; do{ tmp_long=array_check((*_SUB_HELP_SHOWTEXT_LONG_Y-*__LONG_HELP_SY)-__ARRAY_LONG_HELP_LINELEN[4],__ARRAY_LONG_HELP_LINELEN[5]); if (!new_error) ((int32*)(__ARRAY_LONG_HELP_LINELEN[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(36329);}while(r); } do{ *_SUB_HELP_SHOWTEXT_LONG_SY=*_SUB_HELP_SHOWTEXT_LONG_SY+ 1 ; if(!qbevent)break;evnt(36332);}while(r); } fornext_exit_4585:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free167.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_SETDEPENDENCY(int32*_SUB_SETDEPENDENCY_LONG_REQUIREMENT){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data168.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_39995:; if ((*_SUB_SETDEPENDENCY_LONG_REQUIREMENT)||new_error){ if(qbevent){evnt(36353);if(r)goto S_39995;} do{ tmp_long=array_check((*_SUB_SETDEPENDENCY_LONG_REQUIREMENT)-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(36354);}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free168.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_BUILD(qbs*_SUB_BUILD_STRING_PATH){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data169.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ *_SUB_BUILD_LONG_DEPTH= 1 ; if(!qbevent)break;evnt(36361);}while(r); S_39999:; fornext_value4597= 1 ; fornext_finalvalue4597=_SUB_BUILD_STRING_PATH->len; fornext_step4597= 1 ; if (fornext_step4597<0) fornext_step_negative4597=1; else fornext_step_negative4597=0; if (new_error) goto fornext_error4597; goto fornext_entrylabel4597; while(1){ fornext_value4597=fornext_step4597+(*_SUB_BUILD_LONG_X); fornext_entrylabel4597: *_SUB_BUILD_LONG_X=fornext_value4597; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4597){ if (fornext_value4597fornext_finalvalue4597) break; } fornext_error4597:; if(qbevent){evnt(36362);if(r)goto S_39999;} S_40000:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_BUILD_STRING_PATH,*_SUB_BUILD_LONG_X)== 92 ))|(-(qbs_asc(_SUB_BUILD_STRING_PATH,*_SUB_BUILD_LONG_X)== 47 ))))||new_error){ if(qbevent){evnt(36363);if(r)goto S_40000;} do{ *_SUB_BUILD_LONG_DEPTH=*_SUB_BUILD_LONG_DEPTH+ 1 ; if(!qbevent)break;evnt(36363);}while(r); } } fornext_exit_4596:; do{ sub_chdir(_SUB_BUILD_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36365);}while(r); do{ *_SUB_BUILD_LONG_BFH=func_freefile(); if(!qbevent)break;evnt(36367);}while(r); do{ sub_open(qbs_add(qbs_new_txt_len("build",5),__STRING_BATCHFILE_EXTENSION), 3 ,NULL,NULL,*_SUB_BUILD_LONG_BFH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36369);}while(r); S_40007:; while((!(func_eof(*_SUB_BUILD_LONG_BFH)))||new_error){ if(qbevent){evnt(36370);if(r)goto S_40007;} do{ tmp_fileno=*_SUB_BUILD_LONG_BFH; if (new_error) goto skip4600; sub_file_line_input_string(tmp_fileno,_SUB_BUILD_STRING_C); if (new_error) goto skip4600; skip4600: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36371);}while(r); do{ *_SUB_BUILD_LONG_USE= 0 ; if(!qbevent)break;evnt(36372);}while(r); S_40010:; if ((qbs_cleanup(qbs_tmp_base,_SUB_BUILD_STRING_C->len))||new_error){ if(qbevent){evnt(36373);if(r)goto S_40010;} do{ *_SUB_BUILD_LONG_USE= 1 ; if(!qbevent)break;evnt(36373);}while(r); } S_40013:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILD_STRING_C,qbs_new_txt_len("pause",5))))||new_error){ if(qbevent){evnt(36374);if(r)goto S_40013;} do{ *_SUB_BUILD_LONG_USE= 0 ; if(!qbevent)break;evnt(36374);}while(r); } S_40016:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_BUILD_STRING_C, 1 ),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(36375);if(r)goto S_40016;} do{ *_SUB_BUILD_LONG_USE= 0 ; if(!qbevent)break;evnt(36375);}while(r); } S_40019:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_left(_SUB_BUILD_STRING_C, 13 )),(qbs_add(qbs_add(qbs_new_txt_len("cd ",3),func_chr( 34 )),qbs_new_txt_len("$(dirname",9))))))||new_error){ if(qbevent){evnt(36376);if(r)goto S_40019;} do{ *_SUB_BUILD_LONG_USE= 0 ; if(!qbevent)break;evnt(36376);}while(r); } S_40022:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,qbs_lcase(_SUB_BUILD_STRING_C),qbs_new_txt_len("press any key",13),0)))||new_error){ if(qbevent){evnt(36377);if(r)goto S_40022;} do{ goto dl_exit_4599; if(!qbevent)break;evnt(36377);}while(r); } do{ qbs_set(_SUB_BUILD_STRING_C,FUNC_GDB_FIX(_SUB_BUILD_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36378);}while(r); S_40026:; if ((*_SUB_BUILD_LONG_USE)||new_error){ if(qbevent){evnt(36379);if(r)goto S_40026;} S_40027:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(36380);if(r)goto S_40027;} do{ sub_shell2(qbs_add(qbs_new_txt_len("cmd /C ",7),_SUB_BUILD_STRING_C),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36381);}while(r); }else{ do{ sub_shell2(_SUB_BUILD_STRING_C,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36383);}while(r); } } } dl_exit_4599:; do{ sub_close(*_SUB_BUILD_LONG_BFH,1); if(!qbevent)break;evnt(36387);}while(r); do{ qbs_set(_SUB_BUILD_STRING_RETURN_PATH,qbs_new_txt_len("..",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36389);}while(r); S_40036:; fornext_value4603= 2 ; fornext_finalvalue4603=*_SUB_BUILD_LONG_DEPTH; fornext_step4603= 1 ; if (fornext_step4603<0) fornext_step_negative4603=1; else fornext_step_negative4603=0; if (new_error) goto fornext_error4603; goto fornext_entrylabel4603; while(1){ fornext_value4603=fornext_step4603+(*_SUB_BUILD_LONG_X); fornext_entrylabel4603: *_SUB_BUILD_LONG_X=fornext_value4603; if (fornext_step_negative4603){ if (fornext_value4603fornext_finalvalue4603) break; } fornext_error4603:; if(qbevent){evnt(36390);if(r)goto S_40036;} do{ qbs_set(_SUB_BUILD_STRING_RETURN_PATH,qbs_add(_SUB_BUILD_STRING_RETURN_PATH,qbs_new_txt_len("\\..",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36391);}while(r); } fornext_exit_4602:; do{ sub_chdir(_SUB_BUILD_STRING_RETURN_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36393);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free169.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_GDB_FIX(qbs*_FUNC_GDB_FIX_STRING_G_COMMAND){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data170.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_GDB_FIX_STRING_C,_FUNC_GDB_FIX_STRING_G_COMMAND); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36398);}while(r); S_40041:; if ((*__LONG_INCLUDE_GDB_DEBUGGING_INFO)||new_error){ if(qbevent){evnt(36399);if(r)goto S_40041;} S_40042:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_GDB_FIX_STRING_C, 4 ),qbs_new_txt_len("gcc ",4)))|(qbs_equal(qbs_left(_FUNC_GDB_FIX_STRING_C, 4 ),qbs_new_txt_len("g++ ",4)))))||new_error){ if(qbevent){evnt(36400);if(r)goto S_40042;} do{ qbs_set(_FUNC_GDB_FIX_STRING_C,qbs_add(qbs_add(qbs_left(_FUNC_GDB_FIX_STRING_C, 4 ),qbs_new_txt_len(" -g ",4)),qbs_right(_FUNC_GDB_FIX_STRING_C,_FUNC_GDB_FIX_STRING_C->len- 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36401);}while(r); do{ goto LABEL_ADDED_GDB_FLAG; if(!qbevent)break;evnt(36402);}while(r); } S_40046:; fornext_value4607= 1 ; fornext_finalvalue4607= 6 ; fornext_step4607= 1 ; if (fornext_step4607<0) fornext_step_negative4607=1; else fornext_step_negative4607=0; if (new_error) goto fornext_error4607; goto fornext_entrylabel4607; while(1){ fornext_value4607=fornext_step4607+(*_FUNC_GDB_FIX_LONG_O); fornext_entrylabel4607: *_FUNC_GDB_FIX_LONG_O=fornext_value4607; if (fornext_step_negative4607){ if (fornext_value4607fornext_finalvalue4607) break; } fornext_error4607:; if(qbevent){evnt(36404);if(r)goto S_40046;} S_40047:; if ((-(*_FUNC_GDB_FIX_LONG_O== 1 ))||new_error){ if(qbevent){evnt(36405);if(r)goto S_40047;} do{ qbs_set(_FUNC_GDB_FIX_STRING_O,qbs_new_txt_len("\\g++ ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36405);}while(r); } S_40050:; if ((-(*_FUNC_GDB_FIX_LONG_O== 2 ))||new_error){ if(qbevent){evnt(36406);if(r)goto S_40050;} do{ qbs_set(_FUNC_GDB_FIX_STRING_O,qbs_new_txt_len("/g++ ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36406);}while(r); } S_40053:; if ((-(*_FUNC_GDB_FIX_LONG_O== 3 ))||new_error){ if(qbevent){evnt(36407);if(r)goto S_40053;} do{ qbs_set(_FUNC_GDB_FIX_STRING_O,qbs_new_txt_len("\\gcc ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36407);}while(r); } S_40056:; if ((-(*_FUNC_GDB_FIX_LONG_O== 4 ))||new_error){ if(qbevent){evnt(36408);if(r)goto S_40056;} do{ qbs_set(_FUNC_GDB_FIX_STRING_O,qbs_new_txt_len("/gcc ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36408);}while(r); } S_40059:; if ((-(*_FUNC_GDB_FIX_LONG_O== 5 ))||new_error){ if(qbevent){evnt(36409);if(r)goto S_40059;} do{ qbs_set(_FUNC_GDB_FIX_STRING_O,qbs_new_txt_len(" gcc ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36409);}while(r); } S_40062:; if ((-(*_FUNC_GDB_FIX_LONG_O== 6 ))||new_error){ if(qbevent){evnt(36410);if(r)goto S_40062;} do{ qbs_set(_FUNC_GDB_FIX_STRING_O,qbs_new_txt_len(" g++ ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36410);}while(r); } do{ *_FUNC_GDB_FIX_LONG_X=func_instr(NULL,qbs_ucase(_FUNC_GDB_FIX_STRING_C),qbs_ucase(_FUNC_GDB_FIX_STRING_O),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36411);}while(r); S_40066:; if ((*_FUNC_GDB_FIX_LONG_X)||new_error){ if(qbevent){evnt(36413);if(r)goto S_40066;} do{ qbs_set(_FUNC_GDB_FIX_STRING_C,qbs_add(qbs_add(qbs_add(qbs_left(_FUNC_GDB_FIX_STRING_C,*_FUNC_GDB_FIX_LONG_X- 1 ),_FUNC_GDB_FIX_STRING_O),qbs_new_txt_len(" -g ",4)),qbs_right(_FUNC_GDB_FIX_STRING_C,_FUNC_GDB_FIX_STRING_C->len-*_FUNC_GDB_FIX_LONG_X-(_FUNC_GDB_FIX_STRING_O->len- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36413);}while(r); do{ goto fornext_exit_4606; if(!qbevent)break;evnt(36413);}while(r); } } fornext_exit_4606:; LABEL_ADDED_GDB_FLAG:; if(qbevent){evnt(36415);r=0;} do{ *_FUNC_GDB_FIX_LONG_X=func_instr(NULL,_FUNC_GDB_FIX_STRING_C,qbs_new_txt_len(" -s ",4),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36417);}while(r); S_40072:; if ((*_FUNC_GDB_FIX_LONG_X)||new_error){ if(qbevent){evnt(36417);if(r)goto S_40072;} do{ qbs_set(_FUNC_GDB_FIX_STRING_C,qbs_add(qbs_add(qbs_left(_FUNC_GDB_FIX_STRING_C,*_FUNC_GDB_FIX_LONG_X- 1 ),qbs_new_txt_len(" ",1)),qbs_right(_FUNC_GDB_FIX_STRING_C,_FUNC_GDB_FIX_STRING_C->len-*_FUNC_GDB_FIX_LONG_X- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36417);}while(r); } } do{ qbs_set(_FUNC_GDB_FIX_STRING_GDB_FIX,_FUNC_GDB_FIX_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36419);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free170.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_GDB_FIX_STRING_GDB_FIX);return _FUNC_GDB_FIX_STRING_GDB_FIX; } void SUB_PATH_SLASH_CORRECT(qbs*_SUB_PATH_SLASH_CORRECT_STRING_A){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data171.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_40077:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(36424);if(r)goto S_40077;} S_40078:; fornext_value4613= 1 ; fornext_finalvalue4613=_SUB_PATH_SLASH_CORRECT_STRING_A->len; fornext_step4613= 1 ; if (fornext_step4613<0) fornext_step_negative4613=1; else fornext_step_negative4613=0; if (new_error) goto fornext_error4613; goto fornext_entrylabel4613; while(1){ fornext_value4613=fornext_step4613+(*_SUB_PATH_SLASH_CORRECT_LONG_X); fornext_entrylabel4613: *_SUB_PATH_SLASH_CORRECT_LONG_X=fornext_value4613; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4613){ if (fornext_value4613fornext_finalvalue4613) break; } fornext_error4613:; if(qbevent){evnt(36425);if(r)goto S_40078;} S_40079:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_PATH_SLASH_CORRECT_STRING_A,*_SUB_PATH_SLASH_CORRECT_LONG_X)== 47 )))||new_error){ if(qbevent){evnt(36426);if(r)goto S_40079;} do{ tqbs=_SUB_PATH_SLASH_CORRECT_STRING_A; if (!new_error){ tmp_fileno=*_SUB_PATH_SLASH_CORRECT_LONG_X; if (!new_error){ tmp_long= 92 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(36426);}while(r); } } fornext_exit_4612:; }else{ S_40084:; fornext_value4616= 1 ; fornext_finalvalue4616=_SUB_PATH_SLASH_CORRECT_STRING_A->len; fornext_step4616= 1 ; if (fornext_step4616<0) fornext_step_negative4616=1; else fornext_step_negative4616=0; if (new_error) goto fornext_error4616; goto fornext_entrylabel4616; while(1){ fornext_value4616=fornext_step4616+(*_SUB_PATH_SLASH_CORRECT_LONG_X); fornext_entrylabel4616: *_SUB_PATH_SLASH_CORRECT_LONG_X=fornext_value4616; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4616){ if (fornext_value4616fornext_finalvalue4616) break; } fornext_error4616:; if(qbevent){evnt(36429);if(r)goto S_40084;} S_40085:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_PATH_SLASH_CORRECT_STRING_A,*_SUB_PATH_SLASH_CORRECT_LONG_X)== 92 )))||new_error){ if(qbevent){evnt(36430);if(r)goto S_40085;} do{ tqbs=_SUB_PATH_SLASH_CORRECT_STRING_A; if (!new_error){ tmp_fileno=*_SUB_PATH_SLASH_CORRECT_LONG_X; if (!new_error){ tmp_long= 47 ; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} if(!qbevent)break;evnt(36430);}while(r); } } fornext_exit_4615:; } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free171.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_GL(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data172.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free172.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } qbs* FUNC_GL2QB_TYPE_CONVERT(qbs*_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs*_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,int32*_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP,qbs*_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data173.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36442);}while(r); S_40091:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLenum",6))))||new_error){ if(qbevent){evnt(36445);if(r)goto S_40091;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_UNSIGNED LONG",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36445);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36445);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36445);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36445);}while(r); } S_40097:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLbitfield",10))))||new_error){ if(qbevent){evnt(36446);if(r)goto S_40097;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_UNSIGNED LONG",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36446);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36446);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36446);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36446);}while(r); } S_40103:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLuint",6))))||new_error){ if(qbevent){evnt(36447);if(r)goto S_40103;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_UNSIGNED LONG",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36447);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36447);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36447);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36447);}while(r); } S_40109:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLint",5))))||new_error){ if(qbevent){evnt(36450);if(r)goto S_40109;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36450);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36450);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36450);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36450);}while(r); } S_40115:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLsizei",7))))||new_error){ if(qbevent){evnt(36451);if(r)goto S_40115;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36451);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36451);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36451);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36451);}while(r); } S_40121:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLboolean",9))))||new_error){ if(qbevent){evnt(36454);if(r)goto S_40121;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_UNSIGNED _BYTE",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36454);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36454);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36454);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("uint8",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36454);}while(r); } S_40127:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLubyte",7))))||new_error){ if(qbevent){evnt(36455);if(r)goto S_40127;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_UNSIGNED _BYTE",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36455);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36455);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36455);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("uint8",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36455);}while(r); } S_40133:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLbyte",6))))||new_error){ if(qbevent){evnt(36458);if(r)goto S_40133;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_BYTE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36458);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("%%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36458);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_BYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36458);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36458);}while(r); } S_40139:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLushort",8))))||new_error){ if(qbevent){evnt(36461);if(r)goto S_40139;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_UNSIGNED INTEGER",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36461);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("~%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36461);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36461);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("uint16",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36461);}while(r); } S_40145:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLshort",7))))||new_error){ if(qbevent){evnt(36464);if(r)goto S_40145;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("INTEGER",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36464);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36464);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36464);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36464);}while(r); } S_40151:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLfloat",7))))||new_error){ if(qbevent){evnt(36467);if(r)goto S_40151;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36467);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36467);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36467);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36467);}while(r); } S_40157:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLclampf",8))))||new_error){ if(qbevent){evnt(36468);if(r)goto S_40157;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36468);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36468);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36468);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36468);}while(r); } S_40163:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLdouble",8))))||new_error){ if(qbevent){evnt(36471);if(r)goto S_40163;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36471);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36471);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36471);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36471);}while(r); } S_40169:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLclampd",8))))||new_error){ if(qbevent){evnt(36472);if(r)goto S_40169;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36472);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36472);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36472);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36472);}while(r); } S_40175:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_A,qbs_new_txt_len("GLvoid",6))))||new_error){ if(qbevent){evnt(36475);if(r)goto S_40175;} do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("_OFFSET",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36475);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36475);}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36475);}while(r); do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36475);}while(r); } S_40181:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(36493);if(r)goto S_40181;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("Unknown type:",13),_FUNC_GL2QB_TYPE_CONVERT_STRING_A)); if (new_error) goto skip4621; makefit(tqbs); qbs_print(tqbs,0); qbs_free(tqbs); qbs_print(nothingstring,1); skip4621: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36493);}while(r); do{ sub_end(); if(!qbevent)break;evnt(36493);}while(r); } do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_GL2QB_TYPE_CONVERT,_FUNC_GL2QB_TYPE_CONVERT_STRING_B); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36494);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free173.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_GL2QB_TYPE_CONVERT_STRING_GL2QB_TYPE_CONVERT);return _FUNC_GL2QB_TYPE_CONVERT_STRING_GL2QB_TYPE_CONVERT; } qbs* FUNC_READCHUNK(qbs*_FUNC_READCHUNK_STRING_A,qbs*_FUNC_READCHUNK_STRING_LAST_CHARACTER){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data174.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; do{ qbs_set(_FUNC_READCHUNK_STRING_A,qbs_ltrim(qbs_rtrim(_FUNC_READCHUNK_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36498);}while(r); S_40187:; fornext_value4625= 1 ; fornext_finalvalue4625=_FUNC_READCHUNK_STRING_A->len; fornext_step4625= 1 ; if (fornext_step4625<0) fornext_step_negative4625=1; else fornext_step_negative4625=0; if (new_error) goto fornext_error4625; goto fornext_entrylabel4625; while(1){ fornext_value4625=fornext_step4625+(*_FUNC_READCHUNK_LONG_X); fornext_entrylabel4625: *_FUNC_READCHUNK_LONG_X=fornext_value4625; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4625){ if (fornext_value4625fornext_finalvalue4625) break; } fornext_error4625:; if(qbevent){evnt(36499);if(r)goto S_40187;} do{ *_FUNC_READCHUNK_LONG_C=qbs_asc(_FUNC_READCHUNK_STRING_A,*_FUNC_READCHUNK_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36500);}while(r); S_40189:; if (((-(*_FUNC_READCHUNK_LONG_C== 32 ))|(-(*_FUNC_READCHUNK_LONG_C== 44 ))|(-(*_FUNC_READCHUNK_LONG_C== 40 ))|(-(*_FUNC_READCHUNK_LONG_C== 41 )))||new_error){ if(qbevent){evnt(36501);if(r)goto S_40189;} do{ qbs_set(_FUNC_READCHUNK_STRING_LAST_CHARACTER,func_chr(*_FUNC_READCHUNK_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36501);}while(r); do{ qbs_set(_FUNC_READCHUNK_STRING_READCHUNK,qbs_left(_FUNC_READCHUNK_STRING_A,*_FUNC_READCHUNK_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36501);}while(r); do{ qbs_set(_FUNC_READCHUNK_STRING_A,qbs_ltrim(qbs_right(_FUNC_READCHUNK_STRING_A,_FUNC_READCHUNK_STRING_A->len-*_FUNC_READCHUNK_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36501);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(36501);}while(r); } } fornext_exit_4624:; do{ qbs_set(_FUNC_READCHUNK_STRING_READCHUNK,_FUNC_READCHUNK_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36503);}while(r); do{ qbs_set(_FUNC_READCHUNK_STRING_LAST_CHARACTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36503);}while(r); do{ qbs_set(_FUNC_READCHUNK_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36503);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free174.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; qbs_maketmp(_FUNC_READCHUNK_STRING_READCHUNK);return _FUNC_READCHUNK_STRING_READCHUNK; } void SUB_GL_SCAN_HEADER(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data175.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_40199:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36509);if(r)goto S_40199;} do{ *_SUB_GL_SCAN_HEADER_LONG_HK=func_freefile(); if(!qbevent)break;evnt(36509);}while(r); do{ sub_open(qbs_new_txt_len("internal\\c\\parts\\core\\gl_header_for_parsing\\temp\\gl_kit.bas",59), 4 ,NULL,NULL,*_SUB_GL_SCAN_HEADER_LONG_HK,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36509);}while(r); } S_40203:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36510);if(r)goto S_40203;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4628; sub_file_print(tmp_fileno,qbs_new_txt_len("DECLARE LIBRARY",15), 0 , 0 , 1 ); if (new_error) goto skip4628; skip4628: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36510);}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_D= 0 ; if(!qbevent)break;evnt(36512);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36512);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_H=func_freefile(); if(!qbevent)break;evnt(36513);}while(r); do{ sub_open(qbs_new_txt_len("internal\\c\\parts\\core\\gl_header_for_parsing\\gl.h",48), 3 ,NULL,NULL,*_SUB_GL_SCAN_HEADER_LONG_H,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36514);}while(r); S_40210:; while((!(func_eof(*_SUB_GL_SCAN_HEADER_LONG_H)))||new_error){ if(qbevent){evnt(36515);if(r)goto S_40210;} do{ tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_H; if (new_error) goto skip4630; sub_file_line_input_string(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_A); if (new_error) goto skip4630; skip4630: revert_input_check(); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36516);}while(r); S_40212:; if ((qbs_cleanup(qbs_tmp_base,_SUB_GL_SCAN_HEADER_STRING_A->len))||new_error){ if(qbevent){evnt(36517);if(r)goto S_40212;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A,qbs_ltrim(qbs_rtrim(_SUB_GL_SCAN_HEADER_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36518);}while(r); S_40214:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_A, 8 ),qbs_new_txt_len("#define ",8))))||new_error){ if(qbevent){evnt(36519);if(r)goto S_40214;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36520);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A,qbs_add(_SUB_GL_SCAN_HEADER_STRING_A,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36521);}while(r); S_40217:; fornext_value4633= 1 ; fornext_finalvalue4633=_SUB_GL_SCAN_HEADER_STRING_A->len; fornext_step4633= 1 ; if (fornext_step4633<0) fornext_step_negative4633=1; else fornext_step_negative4633=0; if (new_error) goto fornext_error4633; goto fornext_entrylabel4633; while(1){ fornext_value4633=fornext_step4633+(*_SUB_GL_SCAN_HEADER_LONG_X); fornext_entrylabel4633: *_SUB_GL_SCAN_HEADER_LONG_X=fornext_value4633; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4633){ if (fornext_value4633fornext_finalvalue4633) break; } fornext_error4633:; if(qbevent){evnt(36522);if(r)goto S_40217;} do{ *_SUB_GL_SCAN_HEADER_LONG_C=qbs_asc(_SUB_GL_SCAN_HEADER_STRING_A,*_SUB_GL_SCAN_HEADER_LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36523);}while(r); S_40219:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_C== 32 ))||new_error){ if(qbevent){evnt(36524);if(r)goto S_40219;} S_40220:; fornext_value4636= 1 ; fornext_finalvalue4636=_SUB_GL_SCAN_HEADER_STRING_A2->len; fornext_step4636= 1 ; if (fornext_step4636<0) fornext_step_negative4636=1; else fornext_step_negative4636=0; if (new_error) goto fornext_error4636; goto fornext_entrylabel4636; while(1){ fornext_value4636=fornext_step4636+(*_SUB_GL_SCAN_HEADER_LONG_X2); fornext_entrylabel4636: *_SUB_GL_SCAN_HEADER_LONG_X2=fornext_value4636; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4636){ if (fornext_value4636fornext_finalvalue4636) break; } fornext_error4636:; if(qbevent){evnt(36525);if(r)goto S_40220;} do{ *_SUB_GL_SCAN_HEADER_LONG_C2=qbs_asc(_SUB_GL_SCAN_HEADER_STRING_A2,*_SUB_GL_SCAN_HEADER_LONG_X2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36526);}while(r); S_40222:; if (((-(*_SUB_GL_SCAN_HEADER_LONG_C2>= 65 ))&(-(*_SUB_GL_SCAN_HEADER_LONG_C2<= 90 )))||new_error){ if(qbevent){evnt(36527);if(r)goto S_40222;} do{ goto LABEL_DEFINE_OK; if(!qbevent)break;evnt(36527);}while(r); } S_40225:; if (((-(*_SUB_GL_SCAN_HEADER_LONG_C2>= 48 ))&(-(*_SUB_GL_SCAN_HEADER_LONG_C2<= 57 ))&(-(*_SUB_GL_SCAN_HEADER_LONG_X2!= 1 )))||new_error){ if(qbevent){evnt(36528);if(r)goto S_40225;} do{ goto LABEL_DEFINE_OK; if(!qbevent)break;evnt(36528);}while(r); } S_40228:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_C2== 95 ))||new_error){ if(qbevent){evnt(36529);if(r)goto S_40228;} do{ goto LABEL_DEFINE_OK; if(!qbevent)break;evnt(36529);}while(r); } do{ goto LABEL_DEFINE_NOT_OK; if(!qbevent)break;evnt(36530);}while(r); LABEL_DEFINE_OK:; if(qbevent){evnt(36531);r=0;} } fornext_exit_4635:; do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VALUE,qbs_ltrim(qbs_rtrim(qbs_right(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_A->len-*_SUB_GL_SCAN_HEADER_LONG_X)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36533);}while(r); S_40234:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_GL_SCAN_HEADER_STRING_VALUE->len== 0 )))||new_error){ if(qbevent){evnt(36534);if(r)goto S_40234;} do{ goto LABEL_DEFINE_NOT_OK; if(!qbevent)break;evnt(36534);}while(r); } S_40237:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_VALUE, 2 ),qbs_new_txt_len("0x",2))))||new_error){ if(qbevent){evnt(36536);if(r)goto S_40237;} do{ *_SUB_GL_SCAN_HEADER_INTEGER64_VALUE=qbr(func_val(qbs_add(qbs_add(qbs_new_txt_len("&H",2),qbs_right(_SUB_GL_SCAN_HEADER_STRING_VALUE,_SUB_GL_SCAN_HEADER_STRING_VALUE->len- 2 )),qbs_new_txt_len("&&",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36537);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ; if(!qbevent)break;evnt(36539);}while(r); do{ tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long])),_SUB_GL_SCAN_HEADER_STRING_A2); if(!qbevent)break;evnt(36539);}while(r); do{ tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]); if (!new_error) ((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[tmp_long]=*_SUB_GL_SCAN_HEADER_INTEGER64_VALUE; if(!qbevent)break;evnt(36539);}while(r); S_40242:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_GL_SCAN_HEADER_STRING_VALUE)>= 48 ))&(-(qbs_asc(_SUB_GL_SCAN_HEADER_STRING_VALUE)<= 57 )))){ if(qbevent){evnt(36540);if(r)goto S_40242;} do{ *_SUB_GL_SCAN_HEADER_INTEGER64_VALUE=qbr(func_val(_SUB_GL_SCAN_HEADER_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36541);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ; if(!qbevent)break;evnt(36543);}while(r); do{ tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long])),_SUB_GL_SCAN_HEADER_STRING_A2); if(!qbevent)break;evnt(36543);}while(r); do{ tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]); if (!new_error) ((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[tmp_long]=*_SUB_GL_SCAN_HEADER_INTEGER64_VALUE; if(!qbevent)break;evnt(36543);}while(r); }else{ S_40248:; fornext_value4642= 1 ; fornext_finalvalue4642=*_SUB_GL_SCAN_HEADER_LONG_D; fornext_step4642= 1 ; if (fornext_step4642<0) fornext_step_negative4642=1; else fornext_step_negative4642=0; if (new_error) goto fornext_error4642; goto fornext_entrylabel4642; while(1){ fornext_value4642=fornext_step4642+(*_SUB_GL_SCAN_HEADER_LONG_I); fornext_entrylabel4642: *_SUB_GL_SCAN_HEADER_LONG_I=fornext_value4642; if (fornext_step_negative4642){ if (fornext_value4642fornext_finalvalue4642) break; } fornext_error4642:; if(qbevent){evnt(36546);if(r)goto S_40248;} S_40249:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5])])),_SUB_GL_SCAN_HEADER_STRING_VALUE)))||new_error){ if(qbevent){evnt(36547);if(r)goto S_40249;} do{ *_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ; if(!qbevent)break;evnt(36548);}while(r); do{ tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long])),_SUB_GL_SCAN_HEADER_STRING_A2); if(!qbevent)break;evnt(36548);}while(r); do{ tmp_long=array_check((*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5]); if (!new_error) ((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[tmp_long]=((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5])]; if(!qbevent)break;evnt(36548);}while(r); do{ goto fornext_exit_4641; if(!qbevent)break;evnt(36550);}while(r); } } fornext_exit_4641:; } } do{ goto LABEL_GOT_DEFINE; if(!qbevent)break;evnt(36554);}while(r); LABEL_DEFINE_NOT_OK:; if(qbevent){evnt(36555);r=0;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36556);}while(r); }else{ do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_add(_SUB_GL_SCAN_HEADER_STRING_A2,func_chr(*_SUB_GL_SCAN_HEADER_LONG_C))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36558);}while(r); } } fornext_exit_4632:; LABEL_GOT_DEFINE:; if(qbevent){evnt(36561);r=0;} } S_40264:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_A, 1 ),qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(36565);if(r)goto S_40264;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36566);}while(r); S_40266:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("WINGDIAPI",9))))||new_error){ if(qbevent){evnt(36566);if(r)goto S_40266;} do{ goto LABEL_DISCARD; if(!qbevent)break;evnt(36566);}while(r); } do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36567);}while(r); S_40270:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_new_txt_len("const",5))))||new_error){ if(qbevent){evnt(36568);if(r)goto S_40270;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36568);}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_IS_FUNC= 0 ; if(!qbevent)break;evnt(36570);}while(r); S_40274:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_new_txt_len("void",4))))||new_error){ if(qbevent){evnt(36570);if(r)goto S_40274;} do{ *_SUB_GL_SCAN_HEADER_LONG_IS_FUNC= 1 ; if(!qbevent)break;evnt(36570);}while(r); } do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36572);}while(r); S_40278:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("*APIENTRY",9))))||new_error){ if(qbevent){evnt(36573);if(r)goto S_40278;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_add(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,qbs_new_txt_len("*",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36573);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("APIENTRY",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36573);}while(r); } S_40282:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("APIENTRY",8))))||new_error){ if(qbevent){evnt(36574);if(r)goto S_40282;} do{ goto LABEL_DISCARD; if(!qbevent)break;evnt(36574);}while(r); } do{ *__LONG_GL_COMMANDS_LAST=*__LONG_GL_COMMANDS_LAST+ 1 ; if(!qbevent)break;evnt(36576);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_C=*__LONG_GL_COMMANDS_LAST; if(!qbevent)break;evnt(36577);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36579);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36580);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 0 ; if(!qbevent)break;evnt(36581);}while(r); S_40290:; if ((*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC)||new_error){ if(qbevent){evnt(36583);if(r)goto S_40290;} do{ *(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+64))= 1 ; if(!qbevent)break;evnt(36584);}while(r); S_40292:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36585);if(r)goto S_40292;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4643; sub_file_print(tmp_fileno,qbs_new_txt_len("FUNCTION ",9), 0 , 0 , 0 ); if (new_error) goto skip4643; skip4643: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36585);}while(r); } }else{ do{ *(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+64))= 2 ; if(!qbevent)break;evnt(36587);}while(r); S_40297:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36588);if(r)goto S_40297;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4644; sub_file_print(tmp_fileno,qbs_new_txt_len("SUB ",4), 0 , 0 , 0 ); if (new_error) goto skip4644; skip4644: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36588);}while(r); } } do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_PROC_NAME,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36591);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216)),64,1),qbs_add(qbs_new_txt_len("_",1),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME)); if(!qbevent)break;evnt(36593);}while(r); S_40303:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36593);if(r)goto S_40303;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4645; sub_file_print(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_PROC_NAME, 0 , 0 , 0 ); if (new_error) goto skip4645; skip4645: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36593);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66)),64,1),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME); if(!qbevent)break;evnt(36594);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212))= 0 ; if(!qbevent)break;evnt(36596);}while(r); S_40308:; if ((*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC)||new_error){ if(qbevent){evnt(36597);if(r)goto S_40308;} do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 0 ; if(!qbevent)break;evnt(36598);}while(r); S_40310:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(36598);if(r)goto S_40310;} do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 1 ; if(!qbevent)break;evnt(36598);}while(r); } S_40313:; if ((*_SUB_GL_SCAN_HEADER_LONG_POINTER)||new_error){ if(qbevent){evnt(36599);if(r)goto S_40313;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_T,qbs_new_txt_len("_OFFSET",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36600);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36600);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212))=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(36601);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("ptrszint ",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36602);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 1 ; if(!qbevent)break;evnt(36603);}while(r); }else{ do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_T,FUNC_GL2QB_TYPE_CONVERT(_SUB_GL_SCAN_HEADER_STRING_RET_TYPE,_SUB_GL_SCAN_HEADER_STRING_S,_SUB_GL_SCAN_HEADER_LONG_TYP,_SUB_GL_SCAN_HEADER_STRING_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36605);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212))=*_SUB_GL_SCAN_HEADER_LONG_TYP; if(!qbevent)break;evnt(36606);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,_SUB_GL_SCAN_HEADER_STRING_CTYP),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36607);}while(r); } S_40324:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36609);if(r)goto S_40324;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4646; sub_file_print(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_S, 0 , 0 , 0 ); if (new_error) goto skip4646; skip4646: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36609);}while(r); } do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len("return (",8)),_SUB_GL_SCAN_HEADER_STRING_CTYP),qbs_new_txt_len(")(",2)),_SUB_GL_SCAN_HEADER_STRING_RET_TYPE),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36610);}while(r); }else{ do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("void ",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36612);}while(r); } S_40331:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36615);if(r)goto S_40331;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4647; sub_file_print(tmp_fileno,qbs_new_txt_len("(",1), 0 , 0 , 0 ); if (new_error) goto skip4647; skip4647: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36615);}while(r); } do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,_SUB_GL_SCAN_HEADER_STRING_PROC_NAME),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36617);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("call_",5)),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME),qbs_new_txt_len("(",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36618);}while(r); do{ *(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130))= 0 ; if(!qbevent)break;evnt(36621);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+132)),80,1),qbs_new_txt_len("",0)); if(!qbevent)break;evnt(36622);}while(r); S_40338:; do{ if(qbevent){evnt(36624);if(r)goto S_40338;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36626);}while(r); S_40340:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("",0)))&(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len("(",1)))))||new_error){ if(qbevent){evnt(36627);if(r)goto S_40340;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36627);}while(r); } S_40343:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("const",5))))||new_error){ if(qbevent){evnt(36628);if(r)goto S_40343;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36628);}while(r); } S_40346:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("void",4)))|(qbs_equal(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(36629);if(r)goto S_40346;} do{ goto LABEL_NO_ARGUMENTS; if(!qbevent)break;evnt(36629);}while(r); } S_40349:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(",",1)))&(qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1)))))||new_error){ if(qbevent){evnt(36630);if(r)goto S_40349;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,FUNC_READCHUNK(_SUB_GL_SCAN_HEADER_STRING_A,_SUB_GL_SCAN_HEADER_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36631);}while(r); S_40351:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(36632);if(r)goto S_40351;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_add(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("*",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36632);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,_SUB_GL_SCAN_HEADER_STRING_VAR_NAME->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36632);}while(r); } S_40355:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(36633);if(r)goto S_40355;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_add(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_new_txt_len("*",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36633);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,_SUB_GL_SCAN_HEADER_STRING_VAR_NAME->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36633);}while(r); } }else{ do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_new_txt_len("no_name",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36636);}while(r); } do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE_BACKUP,_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36639);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 0 ; if(!qbevent)break;evnt(36641);}while(r); S_40364:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(36643);if(r)goto S_40364;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36644);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 1 ; if(!qbevent)break;evnt(36645);}while(r); } S_40368:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(36647);if(r)goto S_40368;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,qbs_left(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36648);}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 2 ; if(!qbevent)break;evnt(36649);}while(r); } S_40372:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 2 ))||new_error){ if(qbevent){evnt(36652);if(r)goto S_40372;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_QB_TYPE,qbs_new_txt_len("_OFFSET",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36653);}while(r); }else{ do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_QB_TYPE,FUNC_GL2QB_TYPE_CONVERT(_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE,_SUB_GL_SCAN_HEADER_STRING_S,_SUB_GL_SCAN_HEADER_LONG_TYP,_SUB_GL_SCAN_HEADER_STRING_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36655);}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 1 ; if(!qbevent)break;evnt(36659);}while(r); S_40378:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36661);if(r)goto S_40378;} S_40379:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 0 ))||new_error){ if(qbevent){evnt(36662);if(r)goto S_40379;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4653; sub_file_print(tmp_fileno,qbs_new_txt_len("BYVAL ",6), 0 , 0 , 0 ); if (new_error) goto skip4653; skip4653: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36662);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4654; sub_file_print(tmp_fileno,qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_VAR_NAME,qbs_new_txt_len(" AS ",4)),_SUB_GL_SCAN_HEADER_STRING_QB_TYPE), 0 , 0 , 0 ); if (new_error) goto skip4654; skip4654: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36663);}while(r); S_40383:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(36664);if(r)goto S_40383;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4655; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0 , 0 , 0 ); if (new_error) goto skip4655; skip4655: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36664);}while(r); } } S_40387:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 0 ))||new_error){ if(qbevent){evnt(36667);if(r)goto S_40387;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*_SUB_GL_SCAN_HEADER_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36668);}while(r); } S_40390:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 1 ))||new_error){ if(qbevent){evnt(36670);if(r)goto S_40390;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36671);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36672);}while(r); } S_40394:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 2 ))||new_error){ if(qbevent){evnt(36674);if(r)goto S_40394;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36675);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36676);}while(r); } do{ *(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130))=*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130))+ 1 ; if(!qbevent)break;evnt(36683);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+132)),80,1),((*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130))- 1 )* 4 )+( 1 ), 4 ,_SUB_GL_SCAN_HEADER_STRING_ARG,1); if(!qbevent)break;evnt(36685);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_LETTER,func_chr( 96 +*(int16*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+130)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36690);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len("(",1)),_SUB_GL_SCAN_HEADER_STRING_VAR_TYPE_BACKUP),qbs_new_txt_len(")",1)),_SUB_GL_SCAN_HEADER_STRING_LETTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36692);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,_SUB_GL_SCAN_HEADER_STRING_CTYP),qbs_new_txt_len(" ",1)),_SUB_GL_SCAN_HEADER_STRING_LETTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36693);}while(r); S_40403:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(36697);if(r)goto S_40403;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36697);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36697);}while(r); } S_40407:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1)))))&&(!new_error)); dl_exit_4648:; if(qbevent){evnt(36699);if(r)goto S_40407;} LABEL_NO_ARGUMENTS:; if(qbevent){evnt(36700);r=0;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36703);}while(r); do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_add(_SUB_GL_SCAN_HEADER_STRING_HC,qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36704);}while(r); S_40410:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36705);if(r)goto S_40410;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4656; sub_file_print(tmp_fileno,qbs_new_txt_len(")",1), 0 , 0 , 1 ); if (new_error) goto skip4656; skip4656: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36705);}while(r); } do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_H,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_GL_SCAN_HEADER_STRING_HD,__STRING_CRLF),qbs_new_txt_len("if (!sub_gl_called) error(270);",31)),__STRING_CRLF),_SUB_GL_SCAN_HEADER_STRING_HC),__STRING_CRLF),qbs_new_txt_len("}",1)),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36706);}while(r); S_40414:; if ((*_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION)||new_error){ if(qbevent){evnt(36708);if(r)goto S_40414;} do{ qbs_set(__STRING_GL_HELPER_CODE,qbs_add(__STRING_GL_HELPER_CODE,_SUB_GL_SCAN_HEADER_STRING_H)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36709);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66)),64,1),qbs_add(qbs_new_txt_len("call_",5),_SUB_GL_SCAN_HEADER_STRING_PROC_NAME)); if(!qbevent)break;evnt(36710);}while(r); } S_40418:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_PROC_NAME,qbs_new_txt_len("glGetString",11))))||new_error){ if(qbevent){evnt(36714);if(r)goto S_40418;} do{ *(int32*)(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+212))=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(36715);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66)),64,1),qbs_add(qbs_new_txt_len("( char* )",11),qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_SCAN_HEADER_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216+66)),64,1)))); if(!qbevent)break;evnt(36716);}while(r); } } } LABEL_DISCARD:; if(qbevent){evnt(36730);r=0;} } dl_exit_4629:; do{ sub_close(*_SUB_GL_SCAN_HEADER_LONG_H,1); if(!qbevent)break;evnt(36732);}while(r); S_40426:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36734);if(r)goto S_40426;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4657; sub_file_print(tmp_fileno,qbs_new_txt_len("END DECLARE",11), 0 , 0 , 1 ); if (new_error) goto skip4657; skip4657: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36734);}while(r); } do{ *__LONG_GL_DEFINES_LAST=*_SUB_GL_SCAN_HEADER_LONG_D; if(!qbevent)break;evnt(36736);}while(r); do{ if (__ARRAY_STRING_GL_DEFINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_GL_DEFINES)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_GL_DEFINES[2]&1){ preserved_elements=__ARRAY_STRING_GL_DEFINES[5]; } else preserved_elements=0; __ARRAY_STRING_GL_DEFINES[4]= 0 ; __ARRAY_STRING_GL_DEFINES[5]=(*_SUB_GL_SCAN_HEADER_LONG_D)-__ARRAY_STRING_GL_DEFINES[4]+1; __ARRAY_STRING_GL_DEFINES[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_GL_DEFINES[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_GL_COMMANDS[2]&1){ preserved_elements=__ARRAY_UDT_GL_COMMANDS[5]; } else preserved_elements=0; __ARRAY_UDT_GL_COMMANDS[4]= 0 ; __ARRAY_UDT_GL_COMMANDS[5]=(*__LONG_GL_COMMANDS_LAST)-__ARRAY_UDT_GL_COMMANDS[4]+1; __ARRAY_UDT_GL_COMMANDS[6]=1; if (__ARRAY_UDT_GL_COMMANDS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_GL_COMMANDS[0]),preserved_elements*1728/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_GL_COMMANDS[0])); tmp_long=__ARRAY_UDT_GL_COMMANDS[5]; __ARRAY_UDT_GL_COMMANDS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1728/8+1); memcpy((void*)(__ARRAY_UDT_GL_COMMANDS[0]),redim_preserve_cmem_buffer,preserved_elements*1728/8+1); if (preserved_elementsfornext_finalvalue4659) break; } fornext_error4659:; if(qbevent){evnt(36744);if(r)goto S_40433;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip4660; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("CONST ",6),((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5])]))),qbs_new_txt_len("=",1)), 0 , 0 , 0 ); if (new_error) goto skip4660; sub_file_print(tmp_fileno,qbs_str((int64)(((int64*)(__ARRAY_INTEGER64_GL_DEFINES_VALUE[0]))[array_check((*_SUB_GL_SCAN_HEADER_LONG_I)-__ARRAY_INTEGER64_GL_DEFINES_VALUE[4],__ARRAY_INTEGER64_GL_DEFINES_VALUE[5])])), 1 , 0 , 1 ); if (new_error) goto skip4660; skip4660: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36745);}while(r); } fornext_exit_4658:; } S_40437:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(36760);if(r)goto S_40437;} do{ sub_close(*_SUB_GL_SCAN_HEADER_LONG_HK,1); if(!qbevent)break;evnt(36760);}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_FH=func_freefile(); if(!qbevent)break;evnt(36763);}while(r); do{ sub_open(qbs_new_txt_len("internal\\c\\parts\\core\\gl_header_for_parsing\\temp\\gl_helper_code.h",65), 4 ,NULL,NULL,*_SUB_GL_SCAN_HEADER_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(36764);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_FH; if (new_error) goto skip4661; sub_file_print(tmp_fileno,__STRING_GL_HELPER_CODE, 0 , 0 , 1 ); if (new_error) goto skip4661; skip4661: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(36765);}while(r); do{ sub_close(*_SUB_GL_SCAN_HEADER_LONG_FH,1); if(!qbevent)break;evnt(36766);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free175.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; } void SUB_GL_INCLUDE_CONTENT(){ qbs *tqbs; ptrszint tmp_long; int32 tmp_fileno; uint32 qbs_tmp_base=qbs_tmp_list_nexti; uint8 *tmp_mem_static_pointer=mem_static_pointer; uint32 tmp_cmem_sp=cmem_sp; #include "data176.txt" if (new_error) goto exit_subfunc; mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; S_40444:; fornext_value4663= 1 ; fornext_finalvalue4663=*__LONG_GL_DEFINES_LAST; fornext_step4663= 1 ; if (fornext_step4663<0) fornext_step_negative4663=1; else fornext_step_negative4663=0; if (new_error) goto fornext_error4663; goto fornext_entrylabel4663; while(1){ fornext_value4663=fornext_step4663+(*_SUB_GL_INCLUDE_CONTENT_LONG_D); fornext_entrylabel4663: *_SUB_GL_INCLUDE_CONTENT_LONG_D=fornext_value4663; if (fornext_step_negative4663){ if (fornext_value4663fornext_finalvalue4663) break; } fornext_error4663:; if(qbevent){evnt(36775);if(r)goto S_40444;} S_40445:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[array_check((*_SUB_GL_INCLUDE_CONTENT_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5])])))!= 95 )))||new_error){ if(qbevent){evnt(36776);if(r)goto S_40445;} do{ tmp_long=array_check((*_SUB_GL_INCLUDE_CONTENT_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[tmp_long])),qbs_add(qbs_new_txt_len("_",1),((qbs*)(((uint64*)(__ARRAY_STRING_GL_DEFINES[0]))[array_check((*_SUB_GL_INCLUDE_CONTENT_LONG_D)-__ARRAY_STRING_GL_DEFINES[4],__ARRAY_STRING_GL_DEFINES[5])])))); if(!qbevent)break;evnt(36777);}while(r); } do{ *__LONG_CONSTLAST=*__LONG_CONSTLAST+ 1 ; if(!qbevent)break;evnt(36779);}while(r); S_40449:; if ((-(*__LONG_CONSTLAST>*__LONG_CONSTMAX))||new_error){ if(qbevent){evnt(36780);if(r)goto S_40449;} do{ *__LONG_CONSTMAX=*__LONG_CONSTMAX* 2 ; if(!qbevent)break;evnt(36781);}while(r); do{ if (__ARRAY_STRING_CONSTNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_CONSTNAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTNAME[2]&1){ preserved_elements=__ARRAY_STRING_CONSTNAME[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTNAME[4]= 0 ; __ARRAY_STRING_CONSTNAME[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTNAME[4]+1; __ARRAY_STRING_CONSTNAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTNAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTCNAME[2]&1){ preserved_elements=__ARRAY_STRING_CONSTCNAME[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTCNAME[4]= 0 ; __ARRAY_STRING_CONSTCNAME[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTCNAME[4]+1; __ARRAY_STRING_CONSTCNAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTCNAME[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTNAMESYMBOL[2]&1){ preserved_elements=__ARRAY_STRING_CONSTNAMESYMBOL[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTNAMESYMBOL[4]= 0 ; __ARRAY_STRING_CONSTNAMESYMBOL[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTNAMESYMBOL[4]+1; __ARRAY_STRING_CONSTNAMESYMBOL[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTNAMESYMBOL[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_CONSTTYPE[2]&1){ preserved_elements=__ARRAY_LONG_CONSTTYPE[5]; } else preserved_elements=0; __ARRAY_LONG_CONSTTYPE[4]= 0 ; __ARRAY_LONG_CONSTTYPE[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTTYPE[4]+1; __ARRAY_LONG_CONSTTYPE[6]=1; if (__ARRAY_LONG_CONSTTYPE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_CONSTTYPE[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTTYPE[0])); tmp_long=__ARRAY_LONG_CONSTTYPE[5]; __ARRAY_LONG_CONSTTYPE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_CONSTTYPE[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER64_CONSTINTEGER[2]&1){ preserved_elements=__ARRAY_INTEGER64_CONSTINTEGER[5]; } else preserved_elements=0; __ARRAY_INTEGER64_CONSTINTEGER[4]= 0 ; __ARRAY_INTEGER64_CONSTINTEGER[5]=(*__LONG_CONSTMAX)-__ARRAY_INTEGER64_CONSTINTEGER[4]+1; __ARRAY_INTEGER64_CONSTINTEGER[6]=1; if (__ARRAY_INTEGER64_CONSTINTEGER[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER64_CONSTINTEGER[0]),preserved_elements*8); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER64_CONSTINTEGER[0])); tmp_long=__ARRAY_INTEGER64_CONSTINTEGER[5]; __ARRAY_INTEGER64_CONSTINTEGER[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*8); memcpy((void*)(__ARRAY_INTEGER64_CONSTINTEGER[0]),redim_preserve_cmem_buffer,preserved_elements*8); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&1){ preserved_elements=__ARRAY_UINTEGER64_CONSTUINTEGER[5]; } else preserved_elements=0; __ARRAY_UINTEGER64_CONSTUINTEGER[4]= 0 ; __ARRAY_UINTEGER64_CONSTUINTEGER[5]=(*__LONG_CONSTMAX)-__ARRAY_UINTEGER64_CONSTUINTEGER[4]+1; __ARRAY_UINTEGER64_CONSTUINTEGER[6]=1; if (__ARRAY_UINTEGER64_CONSTUINTEGER[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]),preserved_elements*8); cmem_dynamic_free((uint8*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0])); tmp_long=__ARRAY_UINTEGER64_CONSTUINTEGER[5]; __ARRAY_UINTEGER64_CONSTUINTEGER[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*8); memcpy((void*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]),redim_preserve_cmem_buffer,preserved_elements*8); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_FLOAT_CONSTFLOAT[2]&1){ preserved_elements=__ARRAY_FLOAT_CONSTFLOAT[5]; } else preserved_elements=0; __ARRAY_FLOAT_CONSTFLOAT[4]= 0 ; __ARRAY_FLOAT_CONSTFLOAT[5]=(*__LONG_CONSTMAX)-__ARRAY_FLOAT_CONSTFLOAT[4]+1; __ARRAY_FLOAT_CONSTFLOAT[6]=1; if (__ARRAY_FLOAT_CONSTFLOAT[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_FLOAT_CONSTFLOAT[0]),preserved_elements*32); cmem_dynamic_free((uint8*)(__ARRAY_FLOAT_CONSTFLOAT[0])); tmp_long=__ARRAY_FLOAT_CONSTFLOAT[5]; __ARRAY_FLOAT_CONSTFLOAT[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*32); memcpy((void*)(__ARRAY_FLOAT_CONSTFLOAT[0]),redim_preserve_cmem_buffer,preserved_elements*32); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_CONSTSTRING[2]&1){ preserved_elements=__ARRAY_STRING_CONSTSTRING[5]; } else preserved_elements=0; __ARRAY_STRING_CONSTSTRING[4]= 0 ; __ARRAY_STRING_CONSTSTRING[5]=(*__LONG_CONSTMAX)-__ARRAY_STRING_CONSTSTRING[4]+1; __ARRAY_STRING_CONSTSTRING[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long=__ARRAY_STRING_CONSTSTRING[5]; if (tmp_longid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_CONSTSUBFUNC[2]&1){ preserved_elements=__ARRAY_LONG_CONSTSUBFUNC[5]; } else preserved_elements=0; __ARRAY_LONG_CONSTSUBFUNC[4]= 0 ; __ARRAY_LONG_CONSTSUBFUNC[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTSUBFUNC[4]+1; __ARRAY_LONG_CONSTSUBFUNC[6]=1; if (__ARRAY_LONG_CONSTSUBFUNC[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_CONSTSUBFUNC[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTSUBFUNC[0])); tmp_long=__ARRAY_LONG_CONSTSUBFUNC[5]; __ARRAY_LONG_CONSTSUBFUNC[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_CONSTSUBFUNC[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_CONSTDEFINED[2]&1){ preserved_elements=__ARRAY_LONG_CONSTDEFINED[5]; } else preserved_elements=0; __ARRAY_LONG_CONSTDEFINED[4]= 0 ; __ARRAY_LONG_CONSTDEFINED[5]=(*__LONG_CONSTMAX)-__ARRAY_LONG_CONSTDEFINED[4]+1; __ARRAY_LONG_CONSTDEFINED[6]=1; if (__ARRAY_LONG_CONSTDEFINED[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_CONSTDEFINED[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_CONSTDEFINED[0])); tmp_long=__ARRAY_LONG_CONSTDEFINED[5]; __ARRAY_LONG_CONSTDEFINED[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_CONSTDEFINED[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsfornext_finalvalue4666) break; } fornext_error4666:; if(qbevent){evnt(36807);if(r)goto S_40472;} do{ if(!qbevent)break;evnt(36808);}while(r); do{ memcpy((((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(0)),(((char*)__ARRAY_UDT_GL_COMMANDS[0])+((array_check((*_SUB_GL_INCLUDE_CONTENT_LONG_C)-__ARRAY_UDT_GL_COMMANDS[4],__ARRAY_UDT_GL_COMMANDS[5]))*216)),216); if(!qbevent)break;evnt(36817);}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(36819);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(36820);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(806))= 1 ; if(!qbevent)break;evnt(36821);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_rtrim(qbs_new_fixed((((uint8*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(0)),64,1))); if(!qbevent)break;evnt(36822);}while(r); do{ *_SUB_GL_INCLUDE_CONTENT_LONG_S=*(int16*)(((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(64)); if(!qbevent)break;evnt(36823);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))=*_SUB_GL_INCLUDE_CONTENT_LONG_S; if(!qbevent)break;evnt(36824);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_rtrim(qbs_new_fixed((((uint8*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(66)),64,1))); if(!qbevent)break;evnt(36825);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))=*(int16*)(((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(130)); if(!qbevent)break;evnt(36826);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_new_fixed((((uint8*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(132)),80,1)); if(!qbevent)break;evnt(36827);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2378))=*(int32*)(((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(212)); if(!qbevent)break;evnt(36828);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(36829);}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(36830);}while(r); } fornext_exit_4665:; do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(36836);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(36837);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_gluPerspective",15)); if(!qbevent)break;evnt(36838);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(36839);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("gluPerspective",14)); if(!qbevent)break;evnt(36840);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(808))= 4 ; if(!qbevent)break;evnt(36841);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(810)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); if(!qbevent)break;evnt(36842);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(36843);}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(36844);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free176.txt" if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static; cmem_sp=tmp_cmem_sp; }